86 lines
1.9 KiB
Lua
86 lines
1.9 KiB
Lua
local int,rnd=math.floor,math.random
|
|
local ins=table.insert
|
|
local pc_drop={50,45,40,35,30,26,22,18,15,12}
|
|
local pc_lock={55,50,45,40,36,32,30}
|
|
local pc_fall={18,16,14,12,10,9,8,7,6}
|
|
local PCbase=require("parts/PCbase")
|
|
local PClist=require("parts/PClist")
|
|
local PCtype={[0]=1,2,1,3,2,3}
|
|
|
|
local function task_PC(P)
|
|
P.modeData.counter=P.modeData.counter+1
|
|
if P.modeData.counter==26 then
|
|
local base=PCbase[P.modeData.type]
|
|
P:pushLine(base[rnd(#base)],P.modeData.symmetry)
|
|
return true
|
|
end
|
|
end
|
|
local function newPC(P)
|
|
local r=P.field
|
|
if r[1]then
|
|
r=r[#r]
|
|
local c=0
|
|
for i=1,10 do if r[i]>0 then c=c+1 end end
|
|
if c<5 then P:lose()end
|
|
end
|
|
if #P.field==0 then
|
|
local type=PCtype[P.stat.pc]or rnd(2,3)
|
|
local L=PClist[type][rnd(#PClist[1])]
|
|
local symmetry=rnd()>.5
|
|
P.modeData.type=type
|
|
P.modeData.symmetry=symmetry
|
|
P:pushNext(L,symmetry)
|
|
P.modeData.counter=P.stat.piece==0 and 20 or 0
|
|
P:newTask(task_PC)
|
|
|
|
local s=P.stat.pc*.25
|
|
if int(s)==s and s>0 then
|
|
P.gameEnv.drop=pc_drop[s]or 10
|
|
P.gameEnv.lock=pc_lock[s]or 20
|
|
P.gameEnv.fall=pc_fall[s]or 5
|
|
if s==10 then
|
|
P:showTextF(text.maxspeed,0,-140,100,"appear",.6)
|
|
else
|
|
P:showTextF(text.speedup,0,-140,40,"appear",.8)
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
return{
|
|
color=color.red,
|
|
env={
|
|
next=4,
|
|
hold=false,
|
|
drop=60,lock=60,
|
|
fall=20,
|
|
sequence="none",
|
|
freshLimit=15,
|
|
dropPiece=newPC,
|
|
ospin=false,
|
|
bg="rgb",bgm="oxygen",
|
|
},
|
|
pauseLimit=true,
|
|
load=function()
|
|
PLY.newPlayer(1,340,15)
|
|
newPC(players[1])
|
|
end,
|
|
mesDisp=function(P,dx,dy)
|
|
setFont(75)
|
|
mStr(P.stat.pc,-81,330)
|
|
mText(drawableText.pc,-81,412)
|
|
end,
|
|
score=function(P)return{P.stat.pc,P.stat.time}end,
|
|
scoreDisp=function(D)return D[1].." PCs "..toTime(D[2])end,
|
|
comp=function(a,b)return a[1]>b[1]or a[1]==b[1]and a[2]<b[2]end,
|
|
getRank=function(P)
|
|
local L=P.stat.pc
|
|
return
|
|
L>=100 and 5 or
|
|
L>=70 and 4 or
|
|
L>=40 and 3 or
|
|
L>=20 and 2 or
|
|
L>=10 and 1 or
|
|
L>=2 and 0
|
|
end,
|
|
} |