More work on sakura, Xray and colour block effects implemented. Added Grid:drawCustom() to handle custom opacity/tint effects.

tetris/components/grid.lua

@@ -410,4 +410,44 @@ function Grid:drawInvisible(opacity_function, garbage_opacity_function, lock_fla
 	end
 end
 
+function Grid:drawCustom(colour_function, gamestate)
+    --[[
+        colour_function: (game, block, x, y, age) -> (R, G, B, A, outlineA)
+        When called, calls the supplied function on every block passing the block itself as argument
+        as well as coordinates and the grid_age value of the same cell.
+        Should return a RGBA colour for the block, as well as the opacity of the stack outline (0 for no outline).
+        
+        gamestate: the gamemode instance itself to pass in colour_function
+    ]]
+	for y = 5, 24 do
+		for x = 1, 10 do
+            local block = self.grid[y][x]
+			if block ~= empty then
+                local R, G, B, A, outline = colour_function(gamestate, block, x, y, self.grid_age[y][x])
+				if self.grid[y][x].colour == "X" then
+					A = 1
+				end
+				love.graphics.setColor(R, G, B, A)
+				love.graphics.draw(blocks[self.grid[y][x].skin][self.grid[y][x].colour], 48+x*16, y*16)
+                if outline > 0 and self.grid[y][x].colour ~= "X" then
+                    love.graphics.setColor(0.64, 0.64, 0.64, outline)
+                    love.graphics.setLineWidth(1)
+                    if y > 1 and self.grid[y-1][x] == empty then
+                        love.graphics.line(48.0+x*16, -0.5+y*16, 64.0+x*16, -0.5+y*16)
+                    end
+                    if y < 24 and self.grid[y+1][x] == empty then
+                        love.graphics.line(48.0+x*16, 16.5+y*16, 64.0+x*16, 16.5+y*16)
+                    end
+                    if x > 1 and self.grid[y][x-1] == empty then
+                        love.graphics.line(47.5+x*16, -0.0+y*16, 47.5+x*16, 16.0+y*16)
+                    end
+                    if x < 10 and self.grid[y][x+1] == empty then
+                        love.graphics.line(64.5+x*16, -0.0+y*16, 64.5+x*16, 16.0+y*16)
+                    end
+                end
+			end
+		end
+	end
+end
+
 return Grid

tetris/modes/sakura.lua

@@ -262,6 +262,8 @@ local maps = {
     },
 }
 
+local STAGE_TRANSITION_TIME = 300
+
 function SakuraGame:new()
     self.super:new()
 
@@ -269,11 +271,12 @@ function SakuraGame:new()
     
     self.current_map = 1
     self.time_limit = 10800
-    self.cleared_frames = 300
+    self.cleared_frames = STAGE_TRANSITION_TIME
     self.stage_frames = 0
     self.time_extend = 0
     self.maps_cleared = 0
     self.map_20_time = 0
+    self.stage_pieces = 0
     self.grid:applyMap(maps[self.current_map])
     
     self.lock_drop = true
@@ -306,6 +309,10 @@ function SakuraGame:onLineClear()
     end
 end
 
+function SakuraGame:onPieceEnter()
+    self.stage_pieces = self.stage_pieces + 1
+end
+
 function SakuraGame:advanceOneFrame(inputs, ruleset)
     if self.ready_frames == 0 then
         if self.lcd > 0 then
@@ -332,7 +339,7 @@ function SakuraGame:advanceOneFrame(inputs, ruleset)
             end
             
             self.hold_queue = nil
-            if (self.stage_frames < 3600 and self.current_map <= 20) then self.maps_cleared = self.maps_cleared + 1 end
+            if self.current_map > 20 or (self.stage_frames < 3600 and self.current_map <= 20) then self.maps_cleared = self.maps_cleared + 1 end
             self.stage_frames = -1
             self.grid:clear()
             if (self.current_map == 20) then self.map_20_time = self.frames end
@@ -343,6 +350,7 @@ function SakuraGame:advanceOneFrame(inputs, ruleset)
             else
                 self.current_map = self.current_map + 1
                 self.ready_frames = 100
+                self.stage_pieces = 0
                 self.grid:applyMap(maps[self.current_map])
             end
             
@@ -356,7 +364,7 @@ function SakuraGame:advanceOneFrame(inputs, ruleset)
         self.time_limit = self.time_limit - 1
         if self.time_limit <= 0 then self.game_over = true end
     else
-        self.cleared_frames = 300
+        self.cleared_frames = STAGE_TRANSITION_TIME
         if not self.prev_inputs.hold and inputs.hold then
             self.hold_queue = table.remove(self.next_queue, 1)
             table.insert(self.next_queue, self:getNextPiece(ruleset))
@@ -365,9 +373,41 @@ function SakuraGame:advanceOneFrame(inputs, ruleset)
     return true
 end
 
+local function colourXRay(game, block, x, y, age)
+    local r, g, b, a = .75,.75,.75
+    if ((game.stage_frames/2 - x) % 30 < 1)
+    or game.stage_frames == 0
+    or game.cleared_frames ~= STAGE_TRANSITION_TIME
+    or game.stage_pieces % 2 == 0
+    then
+        a = 1
+    else
+        a = 0
+    end
+    return r, g, b, a, a
+end
+
+local function colourColor(game, block, x, y, age)
+    local r, g, b, a = .75,.75,.75
+    if game.stage_frames == 0 or game.cleared_frames ~= STAGE_TRANSITION_TIME then
+        a = 1
+    else
+        a = (game.stage_frames/60 + (y + math.abs(x-5.5))/5) % 1
+    end
+    return r, g, b, a, 0
+end
+
 function SakuraGame:drawGrid()
+    if effects[self.current_map] == "xray" then
+        self.grid:drawCustom(colourXRay, self)
+	elseif effects[self.current_map] == "color" then
+        self.grid:drawCustom(colourColor, self)
+	else
         self.grid:draw()
-    self:drawGhostPiece()
+        -- if self.piece ~= nil and self.level < 100 then
+            self:drawGhostPiece(ruleset)
+        -- end
+	end
 end
 
 function SakuraGame:drawScoringInfo()