Add flower-field exercise, deprecate minesweeper (#556)

Author: ryanplusplus

config.json

@@ -1302,6 +1302,22 @@
         "practices": [],
         "prerequisites": [],
         "difficulty": 7,
+        "topics": [
+          "arrays",
+          "control_flow_if_else_statements",
+          "control_flow_loops",
+          "exception_handling",
+          "strings"
+        ],
+        "status": "deprecated"
+      },
+      {
+        "slug": "flower-field",
+        "name": "flower-field",
+        "uuid": "7915cf5b-bd42-45aa-abd7-21dfb0059169",
+        "practices": [],
+        "prerequisites": [],
+        "difficulty": 7,
         "topics": [
           "arrays",
           "control_flow_if_else_statements",

exercises/practice/flower-field/.busted

@@ -0,0 +1,5 @@
+return {
+  default = {
+    ROOT = { '.' }
+  }
+}

exercises/practice/flower-field/.docs/instructions.md

@@ -0,0 +1,26 @@
+# Instructions
+
+Your task is to add flower counts to empty squares in a completed Flower Field garden.
+The garden itself is a rectangle board composed of squares that are either empty (`' '`) or a flower (`'*'`).
+
+For each empty square, count the number of flowers adjacent to it (horizontally, vertically, diagonally).
+If the empty square has no adjacent flowers, leave it empty.
+Otherwise replace it with the count of adjacent flowers.
+
+For example, you may receive a 5 x 4 board like this (empty spaces are represented here with the '·' character for display on screen):
+
+```text
+·*·*·
+··*··
+··*··
+·····
+```
+
+Which your code should transform into this:
+
+```text
+1*3*1
+13*31
+·2*2·
+·111·
+```

exercises/practice/flower-field/.docs/introduction.md

@@ -0,0 +1,7 @@
+# Introduction
+
+[Flower Field][history] is a compassionate reimagining of the popular game Minesweeper.
+The object of the game is to find all the flowers in the garden using numeric hints that indicate how many flowers are directly adjacent (horizontally, vertically, diagonally) to a square.
+"Flower Field" shipped in regional versions of Microsoft Windows in Italy, Germany, South Korea, Japan and Taiwan.
+
+[history]: https://web.archive.org/web/20020409051321fw_/http://rcm.usr.dsi.unimi.it/rcmweb/fnm/

exercises/practice/flower-field/.meta/config.json

@@ -0,0 +1,18 @@
+{
+  "authors": [
+    "ryanplusplus"
+  ],
+  "contributors": [],
+  "files": {
+    "solution": [
+      "flower-field.lua"
+    ],
+    "test": [
+      "flower-field_spec.lua"
+    ],
+    "example": [
+      ".meta/example.lua"
+    ]
+  },
+  "blurb": "Mark all the flowers in a garden."
+}

exercises/practice/flower-field/.meta/example.lua

@@ -0,0 +1,67 @@
+local garden = {}
+garden.__index = garden
+
+local function Garden(rep)
+  local height = #rep
+  local width = height > 0 and #rep[1] or 0
+
+  return setmetatable({ rep = rep, width = width, height = height }, garden)
+end
+
+function garden:at(x, y)
+  if x < 1 or x > self.width then
+    return ' '
+  end
+  if y < 1 or y > self.height then
+    return ' '
+  end
+  return self.rep[y]:sub(x, x)
+end
+
+function garden:set(x, y, c)
+  local v = self.rep[y]
+  v = v:sub(1, x - 1) .. c .. v:sub(x + 1)
+  self.rep[y] = v
+end
+
+function garden:neighbors(x, y)
+  return coroutine.wrap(function()
+    for xx = x - 1, x + 1 do
+      for yy = y - 1, y + 1 do
+        coroutine.yield(self:at(xx, yy))
+      end
+    end
+  end)
+end
+
+function garden:empty_spaces()
+  return coroutine.wrap(function()
+    for x = 1, self.width do
+      for y = 1, self.height do
+        if self:at(x, y) == ' ' then
+          coroutine.yield(x, y)
+        end
+      end
+    end
+  end)
+end
+
+local function annotate(garden)
+  local garden = Garden(garden)
+
+  for x, y in garden:empty_spaces() do
+    local flowers = 0
+    for neighbor in garden:neighbors(x, y) do
+      if neighbor == '*' then
+        flowers = flowers + 1
+      end
+    end
+    if flowers > 0 then
+      garden:set(x, y, tostring(flowers))
+    end
+  end
+
+  return garden.rep
+end
+
+return { annotate = annotate }

exercises/practice/flower-field/.meta/spec_generator.lua

@@ -0,0 +1,30 @@
+local map = function(t, f)
+  local mapped = {}
+  for i, v in ipairs(t) do
+    mapped[i] = f(v)
+  end
+  return mapped
+end
+
+local function render_garden(garden)
+  return table.concat(map(garden, function(row)
+    return "'" .. row .. "', --"
+  end), ',\n      ')
+end
+
+return {
+  module_name = 'flower_field',
+
+  generate_test = function(case)
+    local template = [[
+      local garden = {
+        %s
+      }
+      local expected = {
+        %s
+      }
+      assert.same(expected, flower_field.annotate(garden))]]
+
+    return template:format(render_garden(case.input.garden), render_garden(case.expected))
+  end
+}

exercises/practice/flower-field/.meta/tests.toml

@@ -0,0 +1,46 @@
+# This is an auto-generated file.
+#
+# Regenerating this file via `configlet sync` will:
+# - Recreate every `description` key/value pair
+# - Recreate every `reimplements` key/value pair, where they exist in problem-specifications
+# - Remove any `include = true` key/value pair (an omitted `include` key implies inclusion)
+# - Preserve any other key/value pair
+#
+# As user-added comments (using the # character) will be removed when this file
+# is regenerated, comments can be added via a `comment` key.
+
+[237ff487-467a-47e1-9b01-8a891844f86c]
+description = "no rows"
+
+[4b4134ec-e20f-439c-a295-664c38950ba1]
+description = "no columns"
+
+[d774d054-bbad-4867-88ae-069cbd1c4f92]
+description = "no flowers"
+
+[225176a0-725e-43cd-aa13-9dced501f16e]
+description = "garden full of flowers"
+
+[3f345495-f1a5-4132-8411-74bd7ca08c49]
+description = "flower surrounded by spaces"
+
+[6cb04070-4199-4ef7-a6fa-92f68c660fca]
+description = "space surrounded by flowers"
+
+[272d2306-9f62-44fe-8ab5-6b0f43a26338]
+description = "horizontal line"
+
+[c6f0a4b2-58d0-4bf6-ad8d-ccf4144f1f8e]
+description = "horizontal line, flowers at edges"
+
+[a54e84b7-3b25-44a8-b8cf-1753c8bb4cf5]
+description = "vertical line"
+
+[b40f42f5-dec5-4abc-b167-3f08195189c1]
+description = "vertical line, flowers at edges"
+
+[58674965-7b42-4818-b930-0215062d543c]
+description = "cross"
+
+[dd9d4ca8-9e68-4f78-a677-a2a70fd7a7b8]
+description = "large garden"

exercises/practice/flower-field/flower-field.lua

@@ -0,0 +1,4 @@
+local function annotate(garden)
+end
+
+return { annotate = annotate }