add support for blocks in progress rendering

src/main.lua

@@ -409,13 +409,18 @@ local function printdes(buf, dimensions)
     local cz = 1
     local direction = 0
     for cy=1,dimensions["y"],1 do
+        local setlists = {
+            {1,4},
+            {1},
+            {1,3,4},
+        }
         for clayer=1,3,1 do -- build walls
             local pbuf = {}
             while true do
                 local target = getnearestunplaced(buf, pbuf, cx,cy,cz,clayer, dimensions["x"],dimensions["z"])
                 if not target then break end
 
-                render(buf, pbuf, cx,cy,cz, target[1],target[2], dimensions["x"],dimensions["z"], {1})
+                render(buf, pbuf, cx,cy,cz, target[1],target[2], dimensions["x"],dimensions["z"], setlists[clayer])
 
                 --read("")