修改几乎所有模式名

parts/modes/dig_400l.lua

@@ -0,0 +1,43 @@
+local function check_rise(P)
+	for _=1,math.min(8,400-P.stat.dig)-P.garbageBeneath do
+		P:garbageRise(21,1,P:getHolePos())
+	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)
+		local P=PLAYERS[1]
+		for _=1,10 do
+			P:garbageRise(21,1,P:getHolePos())
+		end
+		P.fieldBeneath=0
+	end,
+	mesDisp=function(P)
+		setFont(55)
+		mStr(400-P.stat.dig,69,265)
+	end,
+	score=function(P)return{P.stat.frame/60,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.frame/60
+		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,
+}