58 lines
1.3 KiB
Lua
Executable file
58 lines
1.3 KiB
Lua
Executable file
#!/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"
|
|
},
|
|
},
|
|
})
|
|
|