-- break.lua by hugeblank, Feb 2023
-- A shitty little program for shitty little people
-- who are too lazy to write their own tool to break
-- apart .2dja files.
-- Usage:
-- break <file>.2dja
if #({...}) == 0 then
    print("break <file>.2dja")
    return
end
local input = fs.combine(shell.dir(), ...)
local f = fs.open(input, "r")
local posters = textutils.unserializeJSON(f.readAll())
f.close()

local name = posters.title
local x, y = 0, 0
for i, poster in pairs(posters.pages) do
    if x%posters.width == 0 then
        y = y+1
    end
    x = (x%posters.width)+1
    
    poster.label = name.." "..x.." "..y
    local p = fs.open(fs.combine(shell.dir(), name..i..".2dj"), "w")
    p.write(textutils.serialiseJSON(poster))
    p.close()
end