不同用途的随机使用不同随机生成器，框架跟进

Author: MrZ626

Zenitha

@@ -582,6 +582,7 @@ function AP:tickStep()
     end
 
     if IsKeyDown('f4') then
+        -- TODO: debug
         local acry=F[1][1]
         if acry then
             print("--------------------------")

assets/game/acryPlayer.lua

@@ -12,11 +12,12 @@ local sign,expApproach=MATH.sign,MATH.expApproach
 ---@field isMain boolean
 ---@field sound boolean
 ---@field remote boolean
+---@field seed number
+---@field rngPool table<string, love.RandomGenerator>
 ---@field settings Techmino.Mode.Setting.Brik | Techmino.Mode.Setting.Gela | Techmino.Mode.Setting.Acry
 ---@field buffedKey table
 ---@field modeData Techmino.PlayerModeData Warning: may contain anything, choose variable name carefully, suggested to be >=6 characters in total & multiple words (eg. `tspinCount`)
 ---@field soundTimeHistory table
----@field RND love.RandomGenerator
 ---@field pos {x:number, y:number, k:number, a:number, dx:number, dy:number, dk:number, da:number, vx:number, vy:number, vk:number, va:number}
 ---@field finished Techmino.EndReason | boolean Did game finish
 ---@field realTime number Real time, [float] s
@@ -167,26 +168,30 @@ end
 --------------------------------------------------------------
 -- Game methods
 
+function P:getRNG(t)
+    if not self.rngPool[t] then self.rngPool[t]=love.math.newRandomGenerator(self.seed) end
+    return self.rngPool[t]
+end
 ---Random Int or 0~1
-function P:random(a,b)
-    return self.RND:random(a,b)
+function P:random(t,a,b)
+    return self:getRNG(t):random(a,b)
 end
 ---Random Float
-function P:rand(a,b)
-    return a+self.RND:random()*(b-a)
+function P:rand(t,a,b)
+    return a+self:getRNG(t):random()*(b-a)
 end
 ---Random value
-function P:coin(head,tail)
-    return self.RND:random()>.5 and head or tail
+function P:coin(t,head,tail)
+    return self:getRNG(t):random()>.5 and head or tail
 end
 ---Random boolean
-function P:roll(chance)
-    return self.RND:random()<(chance or .5)
+function P:roll(t,chance)
+    return self:getRNG(t):random()<(chance or .5)
 end
 ---Random int with custom weight
-function P:randFreq(fList)
+function P:randFreq(t,fList)
     local sum=MATH.sum(fList)
-    local r=self.RND:random()*sum
+    local r=self:getRNG(t):random()*sum
     for i=1,#fList do
         r=r-fList[i]
         if r<0 then return i end
@@ -753,13 +758,13 @@ function P.new(remote)
     self.isMain=false
     self.sound=false
     self.remote=not not remote
+    self.seed=GAME.seed
+    self.rngPool={}
 
     self.buffedKey={}
     self.modeData={target={},music={id='intensity'}}
     self.soundTimeHistory=setmetatable({},soundTimeMeta)
 
-    self.RND=love.math.newRandomGenerator(GAME.seed+626)
-
     self.pos={
         x=0,y=0,k=1,a=0,
 

assets/game/basePlayer.lua

@@ -692,15 +692,15 @@ function BP:getBrik(shapeData)
         shapeID=shapeData.id
         shapeName=shapeData.name or "?"
         shapeMat=TABLE.copy(shapeData.shape)
-        shapeColor=shapeData.color or self.settings.palette[shapeID] or self:random(64)
+        shapeColor=shapeData.color or self.settings.palette[shapeID] or self:random('color',999)
     else
         ---@cast shapeData Techmino.Brik.Name | Techmino.Brik.ID
         local brik=Brik.get(shapeData)
         if not brik then errorf("invalid shapeData %s",tostring(shapeData)) end
         shapeID=brik.id
         shapeName=brik.name
         shapeMat=TABLE.copy(brik.shape)
-        shapeColor=self.settings.palette[shapeID]
+        shapeColor=self.settings.palette[shapeID] or self:random('color',999)
     end
     self.pieceCount=self.pieceCount+1
 
@@ -843,7 +843,7 @@ function BP:parseAtkInfo(g)
     local count=1+max((g.fatal-50)/20,0)
     local splitRate=0
     if count~=floor(count) then
-        if self:random()>count%1 then
+        if self:random('atkRound')>count%1 then
             splitRate=count%1/2
             count=floor(count)
         else
@@ -896,7 +896,7 @@ function BP:calculateHolePos(count,splitRate,copyRate,sandwichRate)
         -- end
         -- print(str)
 
-        local r=sum*self:random()
+        local r=sum*self:random('attackHoleGen')
         for i=1,#weights do
             r=r-weights[i]
             if r<=0 then
@@ -1308,7 +1308,7 @@ function BP:riseGarbage(holePos,count)
                 L[holePos[i]]=false
             end
         else
-            L[self:random(w)]=false
+            L[self:random('garbageHoleGen',w)]=false
         end
 
         -- Add connection

assets/game/brikPlayer.lua

@@ -446,7 +446,7 @@ end
 function GP:shuffleColor(n)
     local list=self.settings.colorSet
     for i=n,2,-1 do
-        local r=self:random(i)
+        local r=self:random('shuffleColor',i)
         list[i],list[r]=list[r],list[i]
     end
 end
@@ -922,7 +922,7 @@ function GP:dropGarbage(count)
             F:setCell({
                 color=555,
                 diggable=true,
-            },table.remove(pos,self:random(w+1-n)),curGenY)
+            },table.remove(pos,self:random('garbageGen',w+1-n)),curGenY)
         end
     end
 end

assets/game/gelaPlayer.lua

@@ -31,12 +31,12 @@ local pieceShapes do
     }
 end
 local function generateSolidGarbage(P,field,w,growRate,splitRate)
-    local count=math.floor(P:rand(#field<3 and 1 or 0,growRate+1)*2)
-    local pos=P:random(1,#field+1)
+    local count=math.floor(P:rand('acGen',#field<3 and 1 or 0,growRate+1)*2)
+    local pos=P:random('acGen',1,#field+1)
     while count>0 do
         table.insert(field,pos,TABLE.new(true,w))
-        if P:random()<splitRate then
-            pos=P:random()<.5 and pos-1 or pos+2
+        if P:random('acGen')<splitRate then
+            pos=P:random('acGen')<.5 and pos-1 or pos+2
         end
         pos=MATH.clamp(pos,1,#field+1)
         count=count-1
@@ -186,7 +186,7 @@ function allclearGenerator._shuffleSeq(P,seq,holdSlot)
     for i=1,pickArea do pointers[i]=i end
 
     for i=1,#backup do
-        local pick=P:random(#pointers)
+        local pick=P:random('acGen',#pointers)
         seq[pointers[pick]]=backup[i]
         pointers[pick]=i+#pointers
         if pointers[pick]>#backup then
@@ -256,7 +256,7 @@ function allclearGenerator._generateQuestion(P,args)
                 piece.score=(1+highRate*.62)^piece.y
                 totalScore=totalScore+piece.score
             end
-            local r=totalScore*P:random()
+            local r=totalScore*P:random('acGen')
             local piece
             for i=1,#pieces do
                 r=r-pieces[i].score
@@ -335,7 +335,7 @@ function allclearGenerator._getLibQuestion(P,args)
     local attempts=0
     local r
     while true do
-        r=P:random(#seqPool)
+        r=P:random('acGen',#seqPool)
         attempts=attempts+1
         if attempts>26 then break end
         if not args1.avoidRepeat then break end
@@ -349,7 +349,7 @@ function allclearGenerator._getLibQuestion(P,args)
 
     field=TABLE.copy(field)
     seq=STRING.atomize(seq)
-    if 1 or P:roll() then
+    if P:roll('acGen') then
         for i=1,#seq do
             seq[i]=
                 seq[i]=='Z' and 'S' or

assets/game/mechanicLib/brik/allclearGenerator.lua

@@ -4,17 +4,17 @@ local comboGenerator={}
 local function newMap(P)
     local F=P.field
     local w=P.settings.fieldW
-    local difficulty=MATH.clamp(P.modeData.levelsCleared+1+P:random(-1,1),1,10)
-    local height=10+math.floor((difficulty+1)/2)+P:random(-2,2)
+    local difficulty=MATH.clamp(P.modeData.levelsCleared+1+P:random('comboGen',-1,1),1,10)
+    local height=10+math.floor((difficulty+1)/2)+P:random('comboGen',-2,2)
     local wellWidth=MATH.clamp(2+math.floor(difficulty/4),2,4)
-    local widthExpandCounter=math.floor(15-difficulty)+P:random(-2,2)
+    local widthExpandCounter=math.floor(15-difficulty)+P:random('comboGen',-2,2)
     local wellL,wellR
 
     if wellWidth==3 then
         widthExpandCounter=widthExpandCounter+3-widthExpandCounter%3
     end
 
-    wellL=P:random(1,w+1-wellWidth)
+    wellL=P:random('comboGen',1,w+1-wellWidth)
     wellR=wellL+wellWidth-1
 
     TABLE.clear(F._matrix)
@@ -28,36 +28,36 @@ local function newMap(P)
         if wellR-wellL+1<4 then
             widthExpandCounter=widthExpandCounter-1
             if widthExpandCounter==0 then
-                if P:random()<.5 then wellL=wellL-1 else wellR=wellR+1 end
+                if P:random('comboGen')<.5 then wellL=wellL-1 else wellR=wellR+1 end
                 if wellL<1 then wellL,wellR=wellL+1,wellR+1 end
                 if wellR>w then wellL,wellR=wellL-1,wellR-1 end
                 wellL,wellR=MATH.clamp(wellL,1,10),MATH.clamp(wellR,1,10)
-                widthExpandCounter=math.floor(12-difficulty)+P:random(-1,2)
+                widthExpandCounter=math.floor(12-difficulty)+P:random('comboGen',-1,2)
             end
         end
     end
 
     -- 4w base
     if wellWidth==4 then
-        if P:random()<.626 then -- 6-res
+        if P:random('comboGen')<.626 then -- 6-res
             for x=wellL,wellR do
                 for y=1,2 do
                     F._matrix[y][x]=P:newCell(777)
                 end
             end
-            F._matrix[1][P:random(wellL,wellR)]=false
-            F._matrix[2][P:random(wellL,wellR)]=false
+            F._matrix[1][P:random('comboGen',wellL,wellR)]=false
+            F._matrix[2][P:random('comboGen',wellL,wellR)]=false
         else -- 3-res
-            if P:random()<.626 then -- Hook pattern
-                local L=P:random()<.5
+            if P:random('comboGen')<.626 then -- Hook pattern
+                local L=P:random('comboGen')<.5
                 F._matrix[1][L and wellL   or wellR  ]=P:newCell(777)
                 F._matrix[2][L and wellL   or wellR  ]=P:newCell(777)
                 F._matrix[2][L and wellL+1 or wellR-1]=P:newCell(777)
             else -- Flat
                 for x=wellL,wellR do
                     F._matrix[1][x]=P:newCell(777)
                 end
-                F._matrix[1][P:random(wellL,wellR)]=false
+                F._matrix[1][P:random('comboGen',wellL,wellR)]=false
             end
         end
     end

assets/game/mechanicLib/brik/comboGenerator.lua

@@ -5,8 +5,8 @@ local garbageTypes={
     line=function(P)
         if not P.modeData.dig_line_init then
             P.modeData.dig_line_init=true
-            P.modeData.risePosition=math.floor((P.settings.fieldW+1)/2+P:random())
-            P.modeData.riseDirection=P:random(0,1)*2-1
+            P.modeData.risePosition=math.floor((P.settings.fieldW+1)/2+P:random('dig'))
+            P.modeData.riseDirection=P:random('dig',0,1)*2-1
         end
         P:riseGarbage(P.modeData.risePosition)
         if P.modeData.risePosition<=1 or P.modeData.risePosition>=P.settings.fieldW then
@@ -26,7 +26,7 @@ local garbageTypes={
         for i=1,#d do
             sum=sum+d[i]
         end
-        local r=P:random(sum)
+        local r=P:random('dig',sum)
         for x=1,#d do
             r=r-d[x]
             if r<=0 then
@@ -51,7 +51,7 @@ local garbageTypes={
     end,
     shale=function(P)
         P:riseGarbage(P:calculateHolePos(
-            P:random(2,3), -- count
+            P:random('dig',2,3), -- count
             -.2, -- splitRate
             -.1, -- copyRate
             -1   -- sandwichRate
@@ -60,7 +60,7 @@ local garbageTypes={
     end,
     volcanics=function(P)
         P:riseGarbage(P:calculateHolePos(
-            P:random(3,4), -- count
+            P:random('dig',3,4), -- count
             .2,  -- splitRate
             -.1, -- copyRate
             .1   -- sandwichRate

assets/game/mechanicLib/brik/dig.lua

@@ -365,7 +365,7 @@ do -- hypersonic (they are variations of marathon, aren't they?)
                         for x=1,P.settings.fieldW do
                             local c=P.field:getCell(x,y)
                             if c then
-                                c.visTimer=P:random(endVisTime1,endVisTime2)
+                                c.visTimer=P:random('marathon',endVisTime1,endVisTime2)
                                 c.fadeTime=endFadeTime
                             end
                         end
@@ -392,10 +392,10 @@ do -- hypersonic (they are variations of marathon, aren't they?)
                 if md.flashTimer==0 then
                     for y=1,min(P.field:getHeight(),2*P.settings.fieldW) do
                         for x=1,P.settings.fieldW do
-                        if P:random()<flashProbability then
+                        if P:random('marathon')<flashProbability then
                                 local c=P.field:getCell(x,y)
                                 if c then
-                                    c.visTimer=max(c.visTimer or 0,P:random(flashVisTime1,flashVisTime2))
+                                    c.visTimer=max(c.visTimer or 0,P:random('marathon',flashVisTime1,flashVisTime2))
                                     c.fadeTime=max(c.fadeTime or 0,flashFadeTime)
                                 end
                             end