Made of little things.

-- title: Nuclear test
-- icon: 💥
-- blurb: A plutonium bomb with a heavy-water booster on a test tower in the desert. The countdown is running.
-- hint: It goes off three seconds after loading. Run it again in Pressure or Heat view.
-- view: 4
-- thumb: 4.2
local NEUT = E.DEFAULT_PT_NEUT
walls(0, 372, 611, 383)
box(0, 344, 611, 371, E.DEFAULT_PT_SAND)

-- Test tower
box(296, 156, 297, 343, E.DEFAULT_PT_METL)
box(314, 156, 315, 343, E.DEFAULT_PT_METL)
for y = 166, 326, 20 do
  line(298, y, 313, y + 10, E.DEFAULT_PT_METL)
  line(313, y, 298, y + 10, E.DEFAULT_PT_METL)
end
box(288, 152, 323, 155, E.DEFAULT_PT_METL)

-- The bomb: plutonium core, heavy water around it, a titanium casing
local bx, by = 306, 128
disc(bx, by, 8, E.DEFAULT_PT_PLUT)
disc(bx, by, 18, E.DEFAULT_PT_DEUT)
disc(bx, by, 21, E.DEFAULT_PT_TTAN)

-- A village on one side, a forest on the other
for n = 0, 3 do
  local hx = 30 + n * 50
  box(hx, 322, hx + 29, 343, E.DEFAULT_PT_WOOD)
  for k = 0, 8 do line(hx - 3 + k, 321 - k, hx + 32 - k, 321 - k, E.DEFAULT_PT_BRCK) end
end
for n = 0, 5 do
  local tx = 420 + n * 32
  box(tx, 312, tx + 3, 343, E.DEFAULT_PT_WOOD)
  disc(tx + 1, 304, 10, E.DEFAULT_PT_PLNT)
end

-- The countdown
local frame = 0
every(function()
  frame = frame + 1
  if frame == 180 then
    for n = 1, 80 do sim.partCreate(-1, bx + math.random(-5, 5), by + math.random(-5, 5), NEUT) end
  end
end)