重构模式环境的dropPiece和task事件为更强大的自定义和未来联网任意模式做准备

整理出所有模式的这两个事件独立到一个文件夹并整理所有模式引用它们的方式
警告：很可能有错误，需要他人帮助测试

parts/eventsets/pctrain_l.lua

@@ -0,0 +1,46 @@
+local pc_drop={50,45,40,35,30,26,22,18,15,12}
+local pc_lock={55,50,46,42,39,36,33,31,29,27}
+local pc_fall={18,16,14,12,10,9,8,7,6,5}
+local PCbase=require"parts.modes.PCbase"
+local PClist=require"parts.modes.PClist"
+
+local function task_PC(P)
+    if P.frameRun>180 then
+        P.control=false
+        for _=1,26 do YIELD()end
+        P.control=true
+    end
+    local base=PCbase[P.modeData.type]
+    P:pushLineList(base[P.holeRND:random(#base)],P.modeData.symmetry)
+end
+local function check(P)
+    local f=P.field
+    if #f>0 then
+        if #f+P.stat.row%4>4 then
+            P:lose()
+        end
+    else
+        local type=P.stat.pc<10 and 4 or 5
+        local L=PClist[type][P.holeRND:random(#PClist[type])]
+        local symmetry=P.holeRND:random()>.5
+        P.modeData.type=type
+        P.modeData.symmetry=symmetry
+        P:pushNextList(L,symmetry)
+        P.modeData.counter=P.stat.piece==0 and 20 or 0
+        P:newTask(task_PC)
+
+        local s=P.stat.pc*.25
+        if math.floor(s)==s and s>0 then
+            P.gameEnv.drop=pc_drop[s]or 10
+            P.gameEnv.lock=pc_lock[s]or 25
+            P.gameEnv.fall=pc_fall[s]or 4
+            if s==10 then
+                P:_showText(text.maxspeed,0,-140,100,'appear',.6)
+            end
+        end
+    end
+end
+return{
+    dropPiece=check,
+    task=check,
+}