initial commit

src/ui/DexEntryMenu.lua

@@ -0,0 +1,72 @@
+-- Pokédex entry page: front sprite, kind, height/weight and the real
+-- dex description (data/pokemon/dex_entries.asm + dex_text.asm).
+
+local Font = require("src.render.Font")
+
+local DexEntryMenu = {}
+DexEntryMenu.__index = DexEntryMenu
+DexEntryMenu.isOpaque = true
+
+-- SGB: PalPacket_Pokedex (BROWNMON) + the mon pic zone in its palette
+function DexEntryMenu:sgbPalettes(game)
+  local P = require("src.render.PaletteFX")
+  local base = P.pal(game.data, "BROWNMON")
+  if not base then return nil end
+  return { P.whole(base),
+           P.zone(P.monPal(game.data, self.def and self.def.id), 1, 1, 8, 8) }
+end
+
+function DexEntryMenu.new(game, species)
+  local self = setmetatable({ game = game }, DexEntryMenu)
+  self.def = game.data.pokemon[species]
+  local ok, img = pcall(love.graphics.newImage, self.def.spriteFront)
+  self.sprite = ok and img or nil
+  require("src.core.Sound").playCry(game.data, species)
+  return self
+end
+
+function DexEntryMenu:update(dt)
+  local input = self.game.input
+  if input:wasPressed("a") or input:wasPressed("b") then
+    self.game.stack:pop()
+  end
+end
+
+function DexEntryMenu:draw()
+  love.graphics.setColor(1, 1, 1, 1)
+  love.graphics.rectangle("fill", 0, 0, 160, 144)
+  local def = self.def
+  if self.sprite then
+    love.graphics.draw(self.sprite, 8, math.max(0, 60 - self.sprite:getHeight()))
+  end
+  love.graphics.setColor(0, 0, 0, 1)
+  Font.draw(def.name, 72, 8)
+  local e = def.dexEntry or {}
+  Font.draw((e.kind or "?") .. " POKéMON", 72, 20)
+  Font.draw(("No.%03d"):format(def.dex or 0), 72, 32)
+  local owned = self.game.save.pokedex and self.game.save.pokedex.owned[def.id]
+  -- height/weight print only once owned, like the description
+  -- (pokedex.asm: "if the pokemon has not been owned, don't print the
+  -- height, weight, or description")
+  if owned and e.heightFt then
+    -- feet/inches use the dex screen's ′/″ glyphs ("HT  ?′??″" in
+    -- pokedex.asm; the tiles come from gfx/pokedex/pokedex.png via
+    -- engine/gfx/load_pokedex_tiles.asm)
+    Font.draw(("HT %d′%02d″"):format(e.heightFt, e.heightIn or 0), 72, 44)
+    Font.draw(("WT %.1flb"):format((e.weight or 0) / 10), 72, 54)
+  end
+  local text = owned and e.text and self.game.data.text[e.text] or nil
+  local y = 72
+  if text then
+    for line in (text:gsub("\v", "\n"):gsub("\f", "\n") .. "\n"):gmatch("(.-)\n") do
+      if y > 132 then break end
+      Font.draw(line, 8, y)
+      y = y + 10
+    end
+  else
+    Font.draw("Data unknown.", 8, y)
+  end
+  love.graphics.setColor(1, 1, 1, 1)
+end
+
+return DexEntryMenu