联网推进36,部分功能已经可用

This commit is contained in:
MrZ626
2021-02-07 03:50:24 +08:00
parent eec05e7eb6
commit d86eb59963
22 changed files with 454 additions and 100 deletions

View File

@@ -359,6 +359,10 @@ end
--Game --Game
function generateLine(hole)
-- return 2^10-1-2^(hole-1)
return 1023-2^(hole-1)
end
function freshDate() function freshDate()
local date=os.date("%Y/%m/%d") local date=os.date("%Y/%m/%d")
if STAT.date~=date then if STAT.date~=date then
@@ -694,7 +698,7 @@ end
]] ]]
function dumpRecording(list,ptr) function dumpRecording(list,ptr)
local out="" local out=""
local buffer="" local buffer,buffer2=""
if not ptr then ptr=1 end if not ptr then ptr=1 end
local prevFrm=list[ptr-2]or 0 local prevFrm=list[ptr-2]or 0
while list[ptr]do while list[ptr]do
@@ -707,19 +711,31 @@ function dumpRecording(list,ptr)
--Encode time --Encode time
local t=list[ptr]-prevFrm local t=list[ptr]-prevFrm
prevFrm=list[ptr] prevFrm=list[ptr]
while t>=255 do if t>=128 then
buffer=buffer.."\255" buffer2=char(t%128)
t=t-255 t=int(t/128)
while t>=128 do
buffer2=char(128+t%128)..buffer2
t=int(t/128)
end end
buffer=buffer..char(128+t)..buffer2
else
buffer=buffer..char(t) buffer=buffer..char(t)
end
--Encode event --Encode event
t=list[ptr+1] t=list[ptr+1]
while t>=255 do if t>=128 then
buffer=buffer.."\255" buffer2=char(t%128)
t=t-255 t=int(t/128)
while t>=128 do
buffer2=char(128+t%128)..buffer2
t=int(t/128)
end end
buffer=buffer..char(128+t)..buffer2
else
buffer=buffer..char(t) buffer=buffer..char(t)
end
--Step --Step
ptr=ptr+2 ptr=ptr+2
@@ -731,29 +747,30 @@ function pumpRecording(str,L)
local p=1 local p=1
local curFrm=L[#L-1]or 0 local curFrm=L[#L-1]or 0
local code
while p<=len do while p<=len do
--Read delta time --Read delta time
code=0
::nextByte1:: ::nextByte1::
local b=byte(str,p) local b=byte(str,p)
if b==255 then if b>=128 then
curFrm=curFrm+255 code=code*128+b-128
p=p+1 p=p+1
goto nextByte1 goto nextByte1
end end
curFrm=curFrm+b curFrm=curFrm+code*128+b
L[#L+1]=curFrm L[#L+1]=curFrm
p=p+1 p=p+1
local event=0
::nextByte2:: ::nextByte2::
b=byte(str,p) b=byte(str,p)
local event=0 if b>=128 then
if b==255 then event=event*128+b-128
event=event+255
p=p+1 p=p+1
goto nextByte2 goto nextByte2
end end
event=event+b L[#L+1]=event*128+b
L[#L+1]=event
p=p+1 p=p+1
end end
end end

View File

@@ -96,6 +96,7 @@ return{
joinRoom="joined the room.", joinRoom="joined the room.",
leaveRoom="left the room.", leaveRoom="left the room.",
waiting="Waiting",
chatRemain="Online: ", chatRemain="Online: ",
chatStart="------Beginning of log------", chatStart="------Beginning of log------",
chatHistory="------New messages below------", chatHistory="------New messages below------",

View File

@@ -98,6 +98,7 @@ return{
-- joinRoom="joined the room.", -- joinRoom="joined the room.",
-- leaveRoom="left the room.", -- leaveRoom="left the room.",
-- waiting="Waiting",
-- chatRemain="Online: ", -- chatRemain="Online: ",
-- chatStart="------Beginning of log------", -- chatStart="------Beginning of log------",
-- chatHistory="------New messages below------", -- chatHistory="------New messages below------",

View File

@@ -96,6 +96,7 @@ return{
joinRoom="Entrou a sala.", joinRoom="Entrou a sala.",
leaveRoom="Saiu da sala.", leaveRoom="Saiu da sala.",
-- waiting="Waiting",
chatRemain="Online: ", chatRemain="Online: ",
chatStart="------Começo do log------", chatStart="------Começo do log------",
chatHistory="------Novas mensagens abaixo------", chatHistory="------Novas mensagens abaixo------",

View File

@@ -99,6 +99,7 @@ return{
-- joinRoom="joined the room.", -- joinRoom="joined the room.",
-- leaveRoom="left the room.", -- leaveRoom="left the room.",
-- waiting="Waiting",
-- chatRemain="Online: ", -- chatRemain="Online: ",
-- chatStart="------Beginning of log------", -- chatStart="------Beginning of log------",
-- chatHistory="------New messages below------", -- chatHistory="------New messages below------",

View File

@@ -40,6 +40,7 @@ return{
diffPassword="字不认识?", diffPassword="字不认识?",
ranks={"","","","",""}, ranks={"","","","",""},
waiting="歇着",
stat={ stat={
"开了几次:", "开了几次:",

View File

@@ -97,6 +97,7 @@ return{
joinRoom="进入房间", joinRoom="进入房间",
leaveRoom="离开房间", leaveRoom="离开房间",
waiting="等待中",
chatRemain="人数:", chatRemain="人数:",
chatStart="------消息的开头------", chatStart="------消息的开头------",
chatHistory="------以上是历史消息------", chatHistory="------以上是历史消息------",

View File

@@ -14,12 +14,12 @@ return{
local t local t
if D.event<20 then if D.event<20 then
t=1500-30*D.event--1500~900 t=1500-30*D.event--1500~900
B[p]= {pos=P:RND(4,7),amount=12,countdown=t,cd0=t,time=0,sent=false,lv=3} B[p]= {line=generateLine(P:RND(4,7)),amount=12,countdown=t,cd0=t,time=0,sent=false,lv=3}
B[p+1]= {pos=P:RND(3,8),amount=10,countdown=t,cd0=t,time=0,sent=false,lv=4} B[p+1]= {line=generateLine(P:RND(3,8)),amount=10,countdown=t,cd0=t,time=0,sent=false,lv=4}
else else
t=900-10*(D.event-20)--900~600 t=900-10*(D.event-20)--900~600
B[p]= {pos=P:RND(10),amount=14,countdown=t,cd0=t,time=0,sent=false,lv=4} B[p]= {line=generateLine(P:RND(10)),amount=14,countdown=t,cd0=t,time=0,sent=false,lv=4}
B[p+1]= {pos=P:RND(4,7),amount=8,countdown=t,cd0=t,time=0,sent=false,lv=5} B[p+1]= {line=generateLine(P:RND(4,7)),amount=8,countdown=t,cd0=t,time=0,sent=false,lv=5}
end end
B.sum=B.sum+22 B.sum=B.sum+22
P.stat.recv=P.stat.recv+22 P.stat.recv=P.stat.recv+22

View File

@@ -17,7 +17,7 @@ return{
if D.counter>=t then if D.counter>=t then
D.counter=0 D.counter=0
for _=1,4 do for _=1,4 do
P.atkBuffer[#P.atkBuffer+1]={pos=P:RND(10),amount=1,countdown=5*t,cd0=5*t,time=0,sent=false,lv=2} P.atkBuffer[#P.atkBuffer+1]={line=generateLine(P:RND(10)),amount=1,countdown=5*t,cd0=5*t,time=0,sent=false,lv=2}
end end
P.atkBuffer.sum=P.atkBuffer.sum+4 P.atkBuffer.sum=P.atkBuffer.sum+4
P.stat.recv=P.stat.recv+4 P.stat.recv=P.stat.recv+4

View File

@@ -10,7 +10,7 @@ local function check_rise(P)
end end
end end
for _=1,8-L do for _=1,8-L do
P:garbageRise(13,1,P:RND(10)) P:garbageRise(13,1,generateLine(P:RND(10)))
end end
else else
if L==0 then if L==0 then
@@ -18,7 +18,7 @@ local function check_rise(P)
SFX.play("clear") SFX.play("clear")
BG.send(26) BG.send(26)
for _=1,8 do for _=1,8 do
P:garbageRise(13,1,P:RND(10)) P:garbageRise(13,1,generateLine(P:RND(10)))
end end
else else
BG.send(#P.clearedRow) BG.send(#P.clearedRow)
@@ -39,7 +39,7 @@ return{
PLY.newPlayer(1) PLY.newPlayer(1)
local P=PLAYERS[1] local P=PLAYERS[1]
for _=1,8 do for _=1,8 do
P:garbageRise(13,1,P:RND(10)) P:garbageRise(13,1,generateLine(P:RND(10)))
end end
P.fieldBeneath=0 P.fieldBeneath=0
end, end,

View File

@@ -5,10 +5,11 @@ return{
}, },
load=function(playerData) load=function(playerData)
PLY.newPlayer(1) PLY.newPlayer(1)
local N=2 if playerData[1]then
for i=1,#playerData do PLAYERS[1].subID=playerData[1].sid
PLY.newRemotePlayer(N,false,playerData[i]) end
N=N+1 for i=2,#playerData do
PLY.newRemotePlayer(i,false,playerData[i])
end end
end, end,
} }

View File

@@ -9,7 +9,7 @@ return{
if P.control and SCN.cur=="play"then if P.control and SCN.cur=="play"then
P.modeData.counter=P.modeData.counter+1 P.modeData.counter=P.modeData.counter+1
if P.modeData.counter>=math.max(60,150-2*P.modeData.event)and P.atkBuffer.sum<4 then if P.modeData.counter>=math.max(60,150-2*P.modeData.event)and P.atkBuffer.sum<4 then
P.atkBuffer[#P.atkBuffer+1]={pos=P:RND(10),amount=1,countdown=30,cd0=30,time=0,sent=false,lv=1} P.atkBuffer[#P.atkBuffer+1]={line=generateLine(P:RND(10)),amount=1,countdown=30,cd0=30,time=0,sent=false,lv=1}
P.atkBuffer.sum=P.atkBuffer.sum+1 P.atkBuffer.sum=P.atkBuffer.sum+1
P.stat.recv=P.stat.recv+1 P.stat.recv=P.stat.recv+1
if P.modeData.event==45 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end if P.modeData.event==45 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end

View File

@@ -12,9 +12,9 @@ return{
if P.modeData.counter>=math.max(60,180-2*P.modeData.event)and B.sum<15 then if P.modeData.counter>=math.max(60,180-2*P.modeData.event)and B.sum<15 then
B[#B+1]= B[#B+1]=
P.modeData.event%3<2 and P.modeData.event%3<2 and
{pos=P:RND(10),amount=1,countdown=0,cd0=0,time=0,sent=false,lv=1} {line=generateLine(P:RND(10)),amount=1,countdown=0,cd0=0,time=0,sent=false,lv=1}
or or
{pos=P:RND(10),amount=3,countdown=60,cd0=60,time=0,sent=false,lv=2} {line=generateLine(P:RND(10)),amount=3,countdown=60,cd0=60,time=0,sent=false,lv=2}
local R=(P.modeData.event%3<2 and 1 or 3) local R=(P.modeData.event%3<2 and 1 or 3)
B.sum=B.sum+R B.sum=B.sum+R
P.stat.recv=P.stat.recv+R P.stat.recv=P.stat.recv+R

View File

@@ -10,7 +10,7 @@ return{
P.modeData.counter=P.modeData.counter+1 P.modeData.counter=P.modeData.counter+1
if P.modeData.counter>=math.max(60,150-P.modeData.event)and P.atkBuffer.sum<20 then if P.modeData.counter>=math.max(60,150-P.modeData.event)and P.atkBuffer.sum<20 then
local t=math.max(60,90-P.modeData.event) local t=math.max(60,90-P.modeData.event)
P.atkBuffer[#P.atkBuffer+1]={pos=P:RND(10),amount=4,countdown=t,cd0=t,time=0,sent=false,lv=3} P.atkBuffer[#P.atkBuffer+1]={line=generateLine(P:RND(10)),amount=4,countdown=t,cd0=t,time=0,sent=false,lv=3}
P.atkBuffer.sum=P.atkBuffer.sum+4 P.atkBuffer.sum=P.atkBuffer.sum+4
P.stat.recv=P.stat.recv+4 P.stat.recv=P.stat.recv+4
if P.modeData.event==60 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end if P.modeData.event==60 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end

View File

@@ -11,10 +11,10 @@ return{
if P.modeData.counter>=math.max(90,180-2*P.modeData.event)and P.atkBuffer.sum<8 then if P.modeData.counter>=math.max(90,180-2*P.modeData.event)and P.atkBuffer.sum<8 then
local d=P.modeData.event+1 local d=P.modeData.event+1
P.atkBuffer[#P.atkBuffer+1]= P.atkBuffer[#P.atkBuffer+1]=
d%4==0 and{pos=P:RND(10),amount=1,countdown=60,cd0=60,time=0,sent=false,lv=1}or d%4==0 and{line=generateLine(P:RND(10)),amount=1,countdown=60,cd0=60,time=0,sent=false,lv=1}or
d%4==1 and{pos=P:RND(10),amount=2,countdown=70,cd0=70,time=0,sent=false,lv=1}or d%4==1 and{line=generateLine(P:RND(10)),amount=2,countdown=70,cd0=70,time=0,sent=false,lv=1}or
d%4==2 and{pos=P:RND(10),amount=3,countdown=80,cd0=80,time=0,sent=false,lv=2}or d%4==2 and{line=generateLine(P:RND(10)),amount=3,countdown=80,cd0=80,time=0,sent=false,lv=2}or
d%4==3 and{pos=P:RND(10),amount=4,countdown=90,cd0=90,time=0,sent=false,lv=3} d%4==3 and{line=generateLine(P:RND(10)),amount=4,countdown=90,cd0=90,time=0,sent=false,lv=3}
P.atkBuffer.sum=P.atkBuffer.sum+d%4+1 P.atkBuffer.sum=P.atkBuffer.sum+d%4+1
P.stat.recv=P.stat.recv+d%4+1 P.stat.recv=P.stat.recv+d%4+1
if P.modeData.event==45 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end if P.modeData.event==45 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end

View File

@@ -13,10 +13,10 @@ return{
if P.modeData.counter>=math.max(300,600-10*P.modeData.event)and P.atkBuffer.sum<20 then if P.modeData.counter>=math.max(300,600-10*P.modeData.event)and P.atkBuffer.sum<20 then
local t=math.max(300,480-12*P.modeData.event) local t=math.max(300,480-12*P.modeData.event)
local p=#P.atkBuffer+1 local p=#P.atkBuffer+1
P.atkBuffer[p] ={pos=P:RND(10),amount=4,countdown=t,cd0=t,time=0,sent=false,lv=2} P.atkBuffer[p] ={line=generateLine(P:RND(10)),amount=4,countdown=t,cd0=t,time=0,sent=false,lv=2}
P.atkBuffer[p+1]={pos=P:RND(10),amount=4,countdown=t,cd0=t,time=0,sent=false,lv=3} P.atkBuffer[p+1]={line=generateLine(P:RND(10)),amount=4,countdown=t,cd0=t,time=0,sent=false,lv=3}
P.atkBuffer[p+2]={pos=P:RND(10),amount=6,countdown=1.2*t,cd0=1.2*t,time=0,sent=false,lv=4} P.atkBuffer[p+2]={line=generateLine(P:RND(10)),amount=6,countdown=1.2*t,cd0=1.2*t,time=0,sent=false,lv=4}
P.atkBuffer[p+3]={pos=P:RND(10),amount=6,countdown=1.5*t,cd0=1.5*t,time=0,sent=false,lv=5} P.atkBuffer[p+3]={line=generateLine(P:RND(10)),amount=6,countdown=1.5*t,cd0=1.5*t,time=0,sent=false,lv=5}
P.atkBuffer.sum=P.atkBuffer.sum+20 P.atkBuffer.sum=P.atkBuffer.sum+20
P.stat.recv=P.stat.recv+20 P.stat.recv=P.stat.recv+20
if P.modeData.event==31 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end if P.modeData.event==31 then P:showTextF(text.maxspeed,0,-140,100,"appear",.6)end

View File

@@ -349,11 +349,6 @@ function draw.norm(P)
--Field-related things --Field-related things
gc_push("transform") gc_push("transform")
gc_translate(150,0) gc_translate(150,0)
if P.userName then
setFont(30)
gc_setColor(1,1,1)
mStr(P.userName,150,-60)
end
--Things shake with field --Things shake with field
gc_push("transform") gc_push("transform")
@@ -479,8 +474,8 @@ function draw.norm(P)
gc_rectangle("fill",-14,599,11,-b*.6) gc_rectangle("fill",-14,599,11,-b*.6)
gc_setColor(P.b2b<40 and COLOR.white or P.b2b<=800 and COLOR.lRed or COLOR.lBlue) gc_setColor(P.b2b<40 and COLOR.white or P.b2b<=800 and COLOR.lRed or COLOR.lBlue)
gc_rectangle("fill",-14,599,11,-a*.6) gc_rectangle("fill",-14,599,11,-a*.6)
gc_setColor(1,1,1)
if t%.5<.3 then if t%.5<.3 then
gc_setColor(1,1,1)
gc_rectangle("fill",-15,b<40 and 568.5 or 118.5,13,3) gc_rectangle("fill",-15,b<40 and 568.5 or 118.5,13,3)
end end
@@ -638,6 +633,10 @@ function draw.norm(P)
--Draw starting counter --Draw starting counter
gc_setColor(1,1,1) gc_setColor(1,1,1)
if GAME.frame<180 then if GAME.frame<180 then
if GAME.net and GAME.frame==0 then
setFont(70)
mStr(text.waiting,305,220)
else
local count=179-GAME.frame local count=179-GAME.frame
gc_push("transform") gc_push("transform")
gc_translate(305,220) gc_translate(305,220)
@@ -646,6 +645,298 @@ function draw.norm(P)
mStr(int(count/60+1),0,0) mStr(int(count/60+1),0,0)
gc_pop() gc_pop()
end end
end
gc_pop()
end
function draw.remote_norm(P)
local _
local ENV=P.gameEnv
local FBN,FUP=P.fieldBeneath,P.fieldUp
local t=TIME()
gc_push("transform")
gc_translate(P.x,P.y)gc_scale(P.size)
--Field-related things
gc_push("transform")
gc_translate(150,0)
--Draw username
setFont(30)
gc_setColor(1,1,1)
mStr(P.userName,150,-60)
--Things shake with field
gc_push("transform")
gc_translate(P.fieldOff.x,P.fieldOff.y)
--Fill field
gc_setColor(0,0,0,.6)
gc_rectangle("fill",0,-10,300,610)
--Draw grid
if ENV.grid then drawGrid(P,ENV.grid)end
--In-field things
gc_push("transform")
if ENV.flipBoard then
if ENV.flipBoard=="U-D"then
gc_translate(0,590)
gc_scale(1,-1)
elseif ENV.flipBoard=="L-R"then
gc_translate(300,0)
gc_scale(-1,1)
elseif ENV.flipBoard=="180"then
gc_translate(300,590)
gc_scale(-1,-1)
end
end
gc_translate(0,600+FBN+FUP)
gc.setScissor(SCR.x+(P.absFieldX+P.fieldOff.x)*SCR.k,SCR.y+(P.absFieldY+P.fieldOff.y)*SCR.k,300*P.size*SCR.k,610*P.size*SCR.k)
--Draw dangerous area
gc_setColor(1,0,0,.3)
gc_rectangle("fill",0,-600,300,-FUP-FBN-10)
--Draw field
drawField(P)
--Draw spawn line
gc_setColor(1,sin(t)*.4+.5,0,.5)
gc_setLineWidth(4)
gc_line(0,-600-FBN,300,-600-FBN)
--Draw FXs
drawFXs(P)
--Draw current block
if P.cur and P.waiting==-1 then
local curColor=P.cur.color
local trans=P.lockDelay/ENV.lock
local centerX=30*(P.curX+P.sc[2])-15
--Draw ghost & rotation center
if ENV.ghost then drawGhost(P,curColor)end
if ENV.center and ENV.ghost then
gc_setColor(1,1,1,trans*ENV.center)
gc_draw(IMG.spinCenter,centerX,-30*(P.ghoY+P.sc[1])+15,nil,nil,nil,4,4)
end
local dy=ENV.smooth and P.ghoY~=P.curY and(P.dropDelay/ENV.drop-1)*30 or 0
gc_translate(0,-dy)
--Draw block & rotation center
if ENV.block then
drawBlockOutline(P,SKIN.curText[curColor],trans)
drawBlock(P,curColor)
end
if ENV.center and ENV.block then
gc_setColor(1,1,1,ENV.center)
gc_draw(IMG.spinCenter,centerX,-30*(P.curY+P.sc[1])+15,nil,nil,nil,4,4)
end
gc_translate(0,dy)
end
--Draw next preview
if ENV.nextPos and P.nextQueue[1]then
drawNextPreview(P,P.nextQueue[1].bk)
end
gc.setScissor()
gc_pop()
gc_setLineWidth(2)
gc_setColor(frameColorList[P.frameColor])
gc_rectangle("line",-1,-11,302,612)--Boarder
gc_rectangle("line",301,-3,15,604)--AtkBuffer boarder
gc_rectangle("line",-16,-3,15,604)--B2b bar boarder
--Buffer line
local h=0
for i=1,#P.atkBuffer do
local A=P.atkBuffer[i]
local bar=A.amount*30
if h+bar>600 then bar=600-h end
if not A.sent then
--Appear
if A.time<20 then
bar=bar*(20*A.time)^.5*.05
end
if A.countdown>0 then
--Timing
gc_setColor(attackColor[A.lv][1])
gc_rectangle("fill",303,599-h,11,-bar)
gc_setColor(attackColor[A.lv][2])
gc_rectangle("fill",303,599-h-bar,11,bar*(1-A.countdown/A.cd0))
else
--Warning
local a=math.sin((t-i)*30)*.5+.5
local c1,c2=attackColor[A.lv][1],attackColor[A.lv][2]
gc_setColor(c1[1]*a+c2[1]*(1-a),c1[2]*a+c2[2]*(1-a),c1[3]*a+c2[3]*(1-a))
gc_rectangle("fill",303,599-h,11,-bar)
end
else
gc_setColor(attackColor[A.lv][1])
bar=bar*(20-A.time)*.05
gc_rectangle("fill",303,599-h,11,-bar)
--Disappear
end
h=h+bar
end
--B2B indictator
local a,b=P.b2b,P.b2b1 if a>b then a,b=b,a end
gc_setColor(.8,1,.2)
gc_rectangle("fill",-14,599,11,-b*.6)
gc_setColor(P.b2b<40 and COLOR.white or P.b2b<=800 and COLOR.lRed or COLOR.lBlue)
gc_rectangle("fill",-14,599,11,-a*.6)
if t%.5<.3 then
gc_setColor(1,1,1)
gc_rectangle("fill",-15,b<40 and 568.5 or 118.5,13,3)
end
--LockDelay indicator
if ENV.easyFresh then
gc_setColor(1,1,1)
else
gc_setColor(1,.26,.26)
end
if P.lockDelay>=0 then
gc_rectangle("fill",0,602,300*P.lockDelay/ENV.lock,6)--Lock delay indicator
end
local x=3
for _=1,min(P.freshTime,15)do
gc_rectangle("fill",x,615,14,5)
x=x+20
end
--Draw Hold
P:drawHold()
--Draw Next(s)
P:drawNext()
--Draw target selecting pad
if GAME.modeEnv.royaleMode then
if P.atkMode then
gc_setColor(1,.8,0,P.swappingAtkMode*.02)
gc_rectangle("fill",RCPB[2*P.atkMode-1],RCPB[2*P.atkMode],90,35,8,4)
end
gc_setColor(1,1,1,P.swappingAtkMode*.025)
setFont(35)
for i=1,4 do
gc_rectangle("line",RCPB[2*i-1],RCPB[2*i],90,35,8,4)
gc.printf(text.atkModeName[i],RCPB[2*i-1]-4,RCPB[2*i]+4,200,"center",nil,.5)
end
end
if ENV.hideBoard then
gc.stencil(hideBoardStencil[ENV.hideBoard],"replace",1)
gc.setStencilTest("equal",1)
gc_setLineWidth(20)
for i=0,24 do
gc_setColor(COLOR.rainbow_grey(t*.626+i*.1))
gc_line(20*i-190,-2,20*i+10,602)
end
gc.setStencilTest()
end
gc_pop()
--Bonus texts
TEXT.draw(P.bonus)
gc_pop()
--Speed dials
setFont(25)
drawDial(510,510,P.dropSpeed)
drawDial(555,565,P.keySpeed)
local S=P.stat
--Score & Time
setFont(25)
gc_setColor(0,0,0,.3)
gc_print(P.score1,18,509)
gc_print(format("%.2f",S.time),18,539)
gc_setColor(COLOR.lYellow)gc_print(P.score1,20,510)
gc_setColor(COLOR.sky)gc_print(format("%.2f",S.time),20,540)
--FinesseCombo
if P.finesseCombo>2 then
_=P.finesseComboTime
local str=P.finesseCombo.."x"
if S.finesseRate==5*S.piece then
gc_setColor(.9,.9,.3,_*.2)
elseif S.maxFinesseCombo==S.piece then
gc_setColor(.7,.7,1,_*.2)
else
gc_setColor(1,1,1,_*.2)
end
gc_print(str,20,570)
end
--Lives
if P.life>0 then
gc_setColor(1,1,1)
if P.life<=3 then
for i=1,P.life do
gc_draw(IMG.lifeIcon,450+25*i,595,nil,.8)
end
else
gc_draw(IMG.lifeIcon,475,595,nil,.8)
setFont(20)
gc_print("x",503,595)
gc_print(P.life,517,595)
end
end
--Other messages
gc_setColor(1,1,1)
if GAME.curMode.mesDisp then
GAME.curMode.mesDisp(P)
end
--Missions
if P.curMission then
local missionEnum=missionEnum
local L=ENV.mission
--Draw current mission
setFont(35)
if ENV.missionKill then
gc_setColor(1,.7+.2*sin(t*6.26),.4)
else
gc_setColor(1,1,1)
end
gc_print(missionEnum[L[P.curMission]],85,110)
--Draw next mission
setFont(20)
for i=1,3 do
local m=L[P.curMission+i]
if m then
m=missionEnum[m]
gc_print(m,87-28*i,117)
else
break
end
end
end
--Draw starting counter
gc_setColor(1,1,1)
if GAME.frame<180 then
if GAME.frame==0 then
setFont(70)
mStr(text.waiting,305,220)
else
local count=179-GAME.frame
gc_push("transform")
gc_translate(305,220)
setFont(95)
if count%60>45 then gc_scale(1+(count%60-45)^2*.01,1)end
mStr(int(count/60+1),0,0)
gc_pop()
end
end
gc_pop() gc_pop()
end end

View File

@@ -358,12 +358,15 @@ function PLY.newRemotePlayer(id,mini,playerData)
P.type="remote" P.type="remote"
P.update=PLY.update.remote_alive P.update=PLY.update.remote_alive
P.draw=PLY.draw.remote_norm
P.stream={} P.stream={}
P.streamProgress=1 P.streamProgress=1
playerData.p=P playerData.p=P
P.userName=playerData.name P.userName=playerData.name
P.userID=playerData.id P.userID=playerData.id
P.subID=playerData.sid
loadRemoteEnv(P,playerData.conf or{}) loadRemoteEnv(P,playerData.conf or{})
applyGameEnv(P) applyGameEnv(P)

View File

@@ -234,11 +234,11 @@ end
function Player.getHolePos(P)--Get a good garbage-line hole position function Player.getHolePos(P)--Get a good garbage-line hole position
if P.garbageBeneath==0 then if P.garbageBeneath==0 then
return P:RND(10) return generateLine(P:RND(10))
else else
local p=P:RND(10) local p=P:RND(10)
if P.field[1][p]<=0 then if P.field[1][p]<=0 then
return P:RND(10) return generateLine(P:RND(10))
end end
return p return p
end end
@@ -248,7 +248,7 @@ function Player.garbageRelease(P)--Check garbage buffer and try to release them
while true do while true do
local A=P.atkBuffer[n] local A=P.atkBuffer[n]
if A and A.countdown<=0 and not A.sent then if A and A.countdown<=0 and not A.sent then
P:garbageRise(19+A.lv,A.amount,A.pos) P:garbageRise(19+A.lv,A.amount,A.line)
P.atkBuffer.sum=P.atkBuffer.sum-A.amount P.atkBuffer.sum=P.atkBuffer.sum-A.amount
A.sent,A.time=true,0 A.sent,A.time=true,0
P.stat.pend=P.stat.pend+A.amount P.stat.pend=P.stat.pend+A.amount
@@ -260,13 +260,15 @@ function Player.garbageRelease(P)--Check garbage buffer and try to release them
end end
if flag and P.AI_mode=="CC"then CC.updateField(P)end if flag and P.AI_mode=="CC"then CC.updateField(P)end
end end
function Player.garbageRise(P,color,amount,pos)--Release n-lines garbage to field function Player.garbageRise(P,color,amount,line)--Release n-lines garbage to field
local _ local _
local t=P.showTime*2 local t=P.showTime*2
for _=1,amount do for _=1,amount do
ins(P.field,1,FREEROW.get(color,true)) ins(P.field,1,FREEROW.get(0,true))
ins(P.visTime,1,FREEROW.get(t)) ins(P.visTime,1,FREEROW.get(t))
P.field[1][pos]=0 for i=1,10 do
P.field[1][i]=bit.rshift(line,i-1)%2==1 and color or 0
end
end end
P.fieldBeneath=P.fieldBeneath+amount*30 P.fieldBeneath=P.fieldBeneath+amount*30
if P.cur then if P.cur then
@@ -336,22 +338,36 @@ function Player.ifoverlap(P,bk,x,y)
end end
end end
end end
function Player.attack(P,R,send,time,...) function Player.attack(P,R,send,time,line,fromStream)
if SETTING.atkFX>0 then print(string.format("P%d attack P%d with %d lines, %d frames, line data:%d",P.id,R.id,send,time,line))
P:createBeam(R,send,time,...)
end
if GAME.net then if GAME.net then
if P.type=="human"then if P.type=="human"then--Local player attack others
--TODO ins(GAME.rep,GAME.frame+1)
ins(GAME.rep,
R.subID+
send*0x100+
time*0x10000+
line*0x100000000+
0x2000000000000
)
end end
if R.type=="human"then if fromStream and R.type=="human"then--Local player receiving lines
--TODO ins(GAME.rep,GAME.frame+1)
ins(GAME.rep,
P.subID+
send*0x100+
time*0x10000+
line*0x100000000+
0x1000000000000
)
R:receive(P,send,time,line)
end end
else else
R:receive(P,send,time) R:receive(P,send,time,line)
end end
end end
function Player.receive(P,A,send,time) function Player.receive(P,A,send,time,line)
print(string.format("P%d was attacked by P%d's %d lines, %d frames, line data:%d",P.id,A.id,send,time,line))
P.lastRecv=A P.lastRecv=A
local B=P.atkBuffer local B=P.atkBuffer
if B.sum<26 then if B.sum<26 then
@@ -362,7 +378,7 @@ function Player.receive(P,A,send,time)
B[i+1]=B[i] B[i+1]=B[i]
end end
B[k]={ B[k]={
pos=A:RND(10), line=line,
amount=send, amount=send,
countdown=time, countdown=time,
cd0=time, cd0=time,
@@ -1204,7 +1220,7 @@ do--Player.drop(P)--Place piece
end end
P:showText(text.clear[cc],0,-30,35,"appear",(8-cc)*.3) P:showText(text.clear[cc],0,-30,35,"appear",(8-cc)*.3)
atk=cc-.5 atk=cc-.5
sendTime=20+atk*20 sendTime=20+int(atk*20)
cscore=cscore+clearSCR[cc] cscore=cscore+clearSCR[cc]
end end
@@ -1250,7 +1266,10 @@ do--Player.drop(P)--Place piece
local M=#P.atker local M=#P.atker
if M>0 then if M>0 then
for i=1,M do for i=1,M do
P:attack(P.atker[i],send,C.color) P:attack(P.atker[i],send,sendTime,generateLine(P:RND(10)))
if SETTING.atkFX>0 then
P:createBeam(P.atker[i],send,C.color)
end
end end
else else
T=randomTarget(P) T=randomTarget(P)
@@ -1263,7 +1282,10 @@ do--Player.drop(P)--Place piece
T=randomTarget(P) T=randomTarget(P)
end end
if T then if T then
P:attack(T,send,C.color) P:attack(T,send,sendTime,generateLine(P:RND(10)))
if SETTING.atkFX>0 then
P:createBeam(T,send,C.color)
end
end end
end end
if P.sound and send>3 then SFX.play("emit",min(send,7)*.1)end if P.sound and send>3 then SFX.play("emit",min(send,7)*.1)end

View File

@@ -380,20 +380,41 @@ function update.remote_alive(P,dt)
local eventTime=P.stream[pos] local eventTime=P.stream[pos]
if eventTime then if eventTime then
if P.stat.frame==eventTime then if P.stat.frame==eventTime then
local key=P.stream[pos+1] local event=P.stream[pos+1]
if key==0 then--Just wait if event==0 then--Just wait
elseif key<=32 then--Press key elseif event<=32 then--Press key
P:pressKey(key) P:pressKey(event)
elseif key<=64 then--Release key elseif event<=64 then--Release key
P:releaseKey(key-32) P:releaseKey(event-32)
elseif key>1023 then--Receiving garbage elseif event>0x2000000000000 then--Sending lines
local line=key%1024 local sid=event%0x100
local amount=int(key/1024)%256 local amount=int(event/0x100)%0x100
local color=int(key/262144)%256 local time=int(event/0x10000)%0x10000
local sid=int(key/67108864)%256 local line=int(event/0x100000000)%0x10000
local time=int(key/17179869184)%256 local L=PLAYERS.alive
P:receive() for i=1,#L do
--TODO if L[i].subID==sid then
P:attack(L[i],amount,time,line,true)
if SETTING.atkFX>0 then
P:createBeam(L[i],amount,P.cur.color)
end
break
end
end
elseif event>0x1000000000000 then--Receiving lines
local L=PLAYERS.alive
local sid=event%0x100
for i=1,#L do
if L[i].subID==sid then
P:receive(
L[i],
int(event/0x100)%0x100,--amount
int(event/0x10000)%0x10000,--time
int(event/0x100000000)%0x10000--line
)
break
end
end
end end
P.streamProgress=pos+2 P.streamProgress=pos+2
goto readNext goto readNext

View File

@@ -188,7 +188,6 @@ end
function scene.socketRead(mes) function scene.socketRead(mes)
local cmd=mes:sub(1,1) local cmd=mes:sub(1,1)
local args=splitStr(mes:sub(2),":") local args=splitStr(mes:sub(2),":")
print(cmd.." "..table.concat(args, " ; "))-------DEBUG PRINT
if cmd=="J"or cmd=="L"then if cmd=="J"or cmd=="L"then
textBox:push{ textBox:push{
COLOR.lR,args[1], COLOR.lR,args[1],
@@ -198,8 +197,10 @@ function scene.socketRead(mes)
if cmd=="J"then if cmd=="J"then
if tostring(USER.id)~=args[2]then if tostring(USER.id)~=args[2]then
wsWrite("C"..dumpBasicConfig()) wsWrite("C"..dumpBasicConfig())
ins(playerData,{name=args[1],id=args[2]}) ins(playerData,{name=args[1],id=args[2],sid=tonumber(args[3])})
resetGameData("qn",playerData) resetGameData("qn",playerData)
else
ins(playerData,1,{name=args[1],id=args[2],sid=tonumber(args[3])})
end end
else else
for i=1,#playerData do for i=1,#playerData do
@@ -230,7 +231,7 @@ function scene.socketRead(mes)
} }
elseif cmd=="C"then elseif cmd=="C"then
if tostring(USER.id)~=args[2]then if tostring(USER.id)~=args[2]then
local ENV=json.decode(data.decode("string","base64",args[3])) local ENV=json.decode(data.decode("string","base64",args[4]))
for i=1,#playerData do for i=1,#playerData do
if playerData[i].id==args[2]then if playerData[i].id==args[2]then
playerData[i].conf=ENV playerData[i].conf=ENV
@@ -238,7 +239,7 @@ function scene.socketRead(mes)
return return
end end
end end
ins(playerData,{name=args[1],id=args[2],conf=ENV}) ins(playerData,{name=args[1],id=args[2],sid=tonumber(args[3]),conf=ENV})
resetGameData("qn",playerData) resetGameData("qn",playerData)
end end
elseif cmd=="S"then elseif cmd=="S"then

View File

@@ -191,14 +191,6 @@ function scene.update(dt)
elseif key<=64 then--Release key elseif key<=64 then--Release key
VK[key-32].isDown=false VK[key-32].isDown=false
P1:releaseKey(key-32) P1:releaseKey(key-32)
elseif key>1023 then--Receiving garbage
local sid=key%256
local amount=int(key/256)%256
local time=int(key/4194304)%16384
local line=int(key/274877906944)%65536
local color=int(key/70368744177664)%256
P1:receive(sid,amount,time,line,color)
--TODO
end end
_=_+2 _=_+2
end end
@@ -206,8 +198,8 @@ function scene.update(dt)
end end
--Counting,include pre-das,directy RETURN,or restart counting --Counting,include pre-das,directy RETURN,or restart counting
if GAME.frame<180 then if GAME.frame<=180 then
if GAME.frame==179 then if GAME.frame==180 then
gameStart() gameStart()
elseif GAME.frame==60 or GAME.frame==120 then elseif GAME.frame==60 or GAME.frame==120 then
SFX.play("ready") SFX.play("ready")