Files
Techmino/modes/dig_400.lua
2020-10-09 17:55:06 +08:00

43 lines
873 B
Lua

local function check_rise(P)
for i=1,math.min(8,400-P.stat.dig)-P.garbageBeneath do
P:garbageRise(13,1,P:RND(10))
end
if P.stat.dig==400 then
P:win("finish")
end
end
return{
color=color.orange,
env={
pushSpeed=6,
dropPiece=check_rise,
bg="bg2",bgm="way",
},
load=function()
PLY.newPlayer(1,340,15)
local P=players[1]
for _=1,10 do
P:garbageRise(13,1,P:RND(10))
end
P.fieldBeneath=0
end,
mesDisp=function(P)
setFont(55)
mStr(400-P.stat.dig,69,335)
end,
score=function(P)return{P.stat.time,P.stat.piece}end,
scoreDisp=function(D)return toTime(D[1]).." "..D[2].." Pieces"end,
comp=function(a,b)return a[1]<b[1]or a[1]==b[1]and a[2]<b[2]end,
getRank=function(P)
if P.stat.dig<400 then return end
local T=P.stat.time
return
T<=540 and 5 or
T<=720 and 4 or
T<=960 and 3 or
T<=1500 and 2 or
T<=1800 and 1 or
0
end,
}