require 'funcs' local GameMode = require 'tetris.modes.gamemode' local Piece = require 'tetris.components.piece' local History6RollsRandomizer = require 'tetris.randomizers.history_6rolls' local TGMPlusGame = GameMode:extend() TGMPlusGame.name = "Marathon A2+" TGMPlusGame.hash = "A2Plus" TGMPlusGame.tagline = "The garbage rises steadily! Can you make it to level 999?" function TGMPlusGame:new() TGMPlusGame.super:new() self.roll_frames = 0 self.combo = 1 self.SGnames = { "9", "8", "7", "6", "5", "4", "3", "2", "1", "S1", "S2", "S3", "S4", "S5", "S6", "S7", "S8", "S9", "GM" } self.randomizer = History6RollsRandomizer() self.lock_drop = false self.enable_hold = false self.next_queue_length = 1 self.garbage_queue = 0 self.garbage_pos = 0 self.garbage_rows = { [0] = {"e", "b", "b", "b", "b", "b", "b", "b", "b", "b"}, {"e", "b", "b", "b", "b", "b", "b", "b", "b", "b"}, {"e", "b", "b", "b", "b", "b", "b", "b", "b", "b"}, {"e", "b", "b", "b", "b", "b", "b", "b", "b", "b"}, {"b", "b", "b", "b", "b", "b", "b", "b", "b", "e"}, {"b", "b", "b", "b", "b", "b", "b", "b", "b", "e"}, {"b", "b", "b", "b", "b", "b", "b", "b", "b", "e"}, {"b", "b", "b", "b", "b", "b", "b", "b", "b", "e"}, {"e", "e", "b", "b", "b", "b", "b", "b", "b", "b"}, {"e", "b", "b", "b", "b", "b", "b", "b", "b", "b"}, {"e", "b", "b", "b", "b", "b", "b", "b", "b", "b"}, {"b", "b", "b", "b", "b", "b", "b", "b", "e", "e"}, {"b", "b", "b", "b", "b", "b", "b", "b", "b", "e"}, {"b", "b", "b", "b", "b", "b", "b", "b", "b", "e"}, {"b", "b", "e", "b", "b", "b", "b", "b", "b", "b"}, {"b", "e", "e", "b", "b", "b", "b", "b", "b", "b"}, {"b", "e", "b", "b", "b", "b", "b", "b", "b", "b"}, {"b", "b", "b", "b", "b", "b", "b", "e", "b", "b"}, {"b", "b", "b", "b", "b", "b", "b", "e", "e", "b"}, {"b", "b", "b", "b", "b", "b", "b", "b", "e", "b"}, {"b", "b", "b", "b", "e", "e", "b", "b", "b", "b"}, {"b", "b", "b", "b", "e", "e", "b", "b", "b", "b"}, {"b", "b", "b", "b", "e", "b", "b", "b", "b", "b"}, {"b", "b", "b", "e", "e", "e", "b", "b", "b", "b"}, } end function TGMPlusGame:getARE() return 25 end function TGMPlusGame:getDasLimit() return 15 end function TGMPlusGame:getLockDelay() return 30 end function TGMPlusGame:getLineClearDelay() return 40 end function TGMPlusGame:getGravity() if (self.level < 30) then return 4/256 elseif (self.level < 35) then return 6/256 elseif (self.level < 40) then return 8/256 elseif (self.level < 50) then return 10/256 elseif (self.level < 60) then return 12/256 elseif (self.level < 70) then return 16/256 elseif (self.level < 80) then return 32/256 elseif (self.level < 90) then return 48/256 elseif (self.level < 100) then return 64/256 elseif (self.level < 120) then return 80/256 elseif (self.level < 140) then return 96/256 elseif (self.level < 160) then return 112/256 elseif (self.level < 170) then return 128/256 elseif (self.level < 200) then return 144/256 elseif (self.level < 220) then return 4/256 elseif (self.level < 230) then return 32/256 elseif (self.level < 233) then return 64/256 elseif (self.level < 236) then return 96/256 elseif (self.level < 239) then return 128/256 elseif (self.level < 243) then return 160/256 elseif (self.level < 247) then return 192/256 elseif (self.level < 251) then return 224/256 elseif (self.level < 300) then return 1 elseif (self.level < 330) then return 2 elseif (self.level < 360) then return 3 elseif (self.level < 400) then return 4 elseif (self.level < 420) then return 5 elseif (self.level < 450) then return 4 elseif (self.level < 500) then return 3 else return 20 end end function TGMPlusGame:getGarbageLimit() return 13 - math.floor(self.level / 100) end function TGMPlusGame:advanceOneFrame() if self.clear then self.roll_frames = self.roll_frames + 1 if self.roll_frames > 3694 then self.completed = true end elseif self.ready_frames == 0 then self.frames = self.frames + 1 end return true end function TGMPlusGame:onPieceEnter() if (self.level % 100 ~= 99 and self.level ~= 998) and not self.clear and self.frames ~= 0 then self.level = self.level + 1 end end function TGMPlusGame:onPieceLock(piece, cleared_row_count) if cleared_row_count == 0 then self:advanceBottomRow() end end function TGMPlusGame:onLineClear(cleared_row_count) self.level = math.min(self.level + cleared_row_count, 999) if self.level == 999 and not self.clear then self.clear = true end end function TGMPlusGame:advanceBottomRow() self.garbage_queue = self.garbage_queue + 1 if self.garbage_queue >= self:getGarbageLimit() then self.grid:garbageRise(self.garbage_rows[self.garbage_pos]) self.garbage_queue = 0 self.garbage_pos = (self.garbage_pos + 1) % 24 end end function TGMPlusGame:updateScore(level, drop_bonus, cleared_lines) if not self.clear then if self.grid:checkForBravo(cleared_lines) then self.bravo = 4 else self.bravo = 1 end if cleared_lines > 0 then self.combo = self.combo + (cleared_lines - 1) * 2 self.score = self.score + ( (math.ceil((level + cleared_lines) / 4) + drop_bonus) * cleared_lines * self.combo * self.bravo ) else self.combo = 1 end self.drop_bonus = 0 end end function TGMPlusGame:drawGrid(ruleset) self.grid:draw() if self.piece ~= nil and self.level < 100 then self:drawGhostPiece(ruleset) end end function TGMPlusGame:getHighscoreData() return { score = self.score, level = self.level, frames = self.frames, } end function TGMPlusGame:getSectionEndLevel() if self.level >= 900 then return 999 else return math.floor(self.level / 100 + 1) * 100 end end function TGMPlusGame:getBackground() return math.floor(self.level / 100) end function TGMPlusGame:drawScoringInfo() love.graphics.setColor(1, 1, 1, 1) love.graphics.setFont(font_3x5_2) love.graphics.print( self.das.direction .. " " .. self.das.frames .. " " .. strTrueValues(self.prev_inputs) ) love.graphics.printf("NEXT", 64, 40, 40, "left") love.graphics.printf("SCORE", 240, 200, 40, "left") love.graphics.printf("LEVEL", 240, 320, 40, "left") local sg = self.grid:checkSecretGrade() if sg >= 5 then love.graphics.printf("SECRET GRADE", 240, 430, 180, "left") end love.graphics.setFont(font_3x5_3) love.graphics.printf(self.score, 240, 220, 90, "left") love.graphics.printf(self.level, 240, 340, 40, "right") love.graphics.printf(self:getSectionEndLevel(), 240, 370, 40, "right") if sg >= 5 then love.graphics.printf(self.SGnames[sg], 240, 450, 180, "left") end love.graphics.setFont(font_8x11) love.graphics.printf(formatTime(self.frames), 64, 420, 160, "center") end return TGMPlusGame