#!/usr/bin/env lua5.1
local m = 1
local f = 2

local tipos = {
	{"Un collage", m},
	{"Una intervención contrapublicitaria o contrapropaganda", f},
	{"Una cerámica", f},
	{"Un comic", m},
}

local temas = {
	"destrucción ambiental",
	"una canción",
	"otra obra artística",
	"el mercado inmobiliario",
	"redes sociales",
}

local adjetivos = {
	{"", ""},
	{"feo", "fea"},
}

local random_i = 1
local function random(list)
	math.randomseed((''..os.time()):reverse() + random_i)
	random_i = random_i + 5
	return list[math.random(#list)]
end

require'html'

print(render{
	h2{"Algunas obras generadas aleatoriamente"},
	ol(map({1, 2, 3, 4, 5, 6, 7, 8, 9, 10}, function(key, value)
		local tipo = random(tipos)
		local tema = random(temas)
		local adjetivo = random(adjetivos)[tipo[2]]
		return li{tipo[1]," ",adjetivo," sobre ",tema}
	end)),
	h2{"Tipos de obra"},
	ol(map(tipos, function(tipo) return li{tipo[1]} end)),
	h2{"Algunas características (opcional)"},
	ol(map({unpack(adjetivos, 2)}, function(adjetivo)
		return li{adjetivo[1],"/",adjetivo[2]}
	end)),
	h2{"Temas para la obra"},
	ol(map(temas, function(tema) return li{tema} end)),
	p{
		a{
			href = "https://gitea.nulo.in/Nulo/sitio/src/branch/ANTIFASCISTA/Men%C3%BA%20art%C3%ADstico.gen",
			"Código"
		},
	},
})