summaryrefslogtreecommitdiff
path: root/2.lua
blob: f8068ef91d646f2afe48c1724a46dd5e340aacc7 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
local function is_safe(a)
  local up = false
  local down = false
  local prev = nil

  for i, number in ipairs(a) do
    number = tonumber(number)

    if prev == nil then
      prev = number
      goto continue
    end

    if down==false and up==false then
      if number < prev then down = true
      elseif number > prev then up = true
      else return false end
    end

    if up then
      if prev > number then return false end
      local r=number-prev
      if r~=1 and r~=2 and r~= 3 then return false end
      prev = number
    end

    if down then
      if number > prev then return false end
      local r=prev-number
      if r~=1 and r~=2 and r~= 3 then return false end
      prev = number
    end

  ::continue::
  end
  return true
end

local file = io.open("2-input.txt", "r")

local safe = 0
local safe_one_skip = 0

for line in file:lines() do
  local numbers = line:gmatch("[^%s]+")
  local numbers_arr = {}
  for i in numbers do
    table.insert(numbers_arr, i)
  end

  if is_safe(numbers_arr) then
    safe = safe + 1
    safe_one_skip = safe_one_skip + 1
  else
    for i=1, #numbers_arr do
      local n = table.remove(numbers_arr, i)
      if is_safe(numbers_arr) then
        safe_one_skip = safe_one_skip + 1
        break
      end
      table.insert(numbers_arr, i, n)
    end
  end

end

file:close()
print("puzzle 1:", safe)
print("puzzle 2:", safe_one_skip)

-- 490
-- 536