Cetak ASCII Voxels

28

Menulis sebuah program yang membaca sebuah n×n×n array nilai biner yang mewakili n×n×n cube, yang terdiri dari n3 kubus kecil. Setiap nilai mengatakan apakah ada voxel (kubus kecil) hadir di posisi yang diberikan atau tidak. Program harus menampilkan array yang diberikan sebagai grafik ASCII (itu berarti output melalui konsol atau menulis ke file).

Contohnya

Mari kita perhatikan susunan 2×2×2 :

[
 [[0,0],
  [1,0]]
 [[1,1],
  [1,0]],
]

[
 [[0,0],
  [0,0]]
 [[1,1],
  [1,1]],
]

Dalam hal ini output akan terlihat seperti ini (tidak terlihat sebagus di sini dalam editor kode / konsol dengan ruang vertikal yang lebih sedikit):

  +----+
 /    /|-+----+
+----+ |     /|
|    | +----+ |
|    | |    | +
+    + |    |/
|    | +----+
|    |/
+----+

    +----+----+
   /         /|
  +         + |
 /         /  +
+----+----+  /
|         | +
|         |/
+----+----+

12×12×127×7×7

Spesifikasi ASCII

Setiap sudut voxel diwakili oleh +selama ada tepi yang mengarah ke sana. Ini +juga ditarik ketika ada ujung lurus yang lebih dari satu unit panjang. Ada tiga jenis tepi: Horisontal kiri ke kanan ----, horizontal kembali ke depan /dan vertikal

|
|

Masing-masing harus diakhiri dengan +(selama terlihat). Tepi tidak akan ditarik ketika mereka membagi satu bidang planar menjadi dua bagian atau lebih (tidak seperti +dalam hubungannya dengan tepi seperti yang dinyatakan di atas). Struktur yang tersembunyi di belakang orang lain tidak boleh ditarik.

'Gambar' pada dasarnya adalah proyeksi paralel sehingga hanya sisi atas, kanan dan depan yang terlihat - selalu dari sudut yang sama.

Detail

n=1,2,,1212×12×123×3×3

10

  • Dimensi 1: lapis demi lapis dari atas ke bawah
  • Dimensi 2: baris demi baris kembali (paling jauh) ke depan (terdekat)
  • Dimensi ke-3: voxels di setiap baris dari kiri ke kanan

Apakah Anda menggunakan konsol atau membaca file sebagai input dan output terserah Anda. Tolong beritahu kami tentang kode Anda / bagaimana Anda mendekatinya.

Menilai

Ini adalah codegolf sehingga jumlah byte yang paling sedikit menang. Ini termasuk HANYA bagian yang benar-benar berfungsi - ketika menghitung byte Anda dapat mempertimbangkan input yang sudah diuraikan dan disimpan dalam variabel dan Anda harus memiliki string output yang disimpan ke variabel, siap untuk dicetak. Parsing dan output itu sendiri tidak masuk hitungan.

(Dan saya akan membatalkan pengiriman dengan contoh kreatif =)

Ini terinspirasi oleh halaman Rob's Puzzle .

cacat
sumber

Jawaban:

12

Python ( 444 361 354 bytes)

Sunting: Saya menemukan bug lain yang akan menghilangkan sudut lintas dalam kasus yang sangat istimewa. Perbaikan lurus ke depan menambahkan 50 byte ke kode jadi saya mencoba untuk menurunkannya sedikit lebih jauh. Sekarang bug diperbaiki dan bahkan 83 byte lebih pendek. Ini menjadi sangat terjal. Saya juga ingin menyingkirkan lima kali lipat untuk loop tetapi belum dapat menemukan solusi. Ada ide?

Sunting 2: Dengan impor yang sangat lama saya dapat menyimpan 7 karakter lainnya.

Tidak terlalu pendek atau sangat elegan, tetapi sekali lagi ini adalah masalah yang kompleks:

#input:
u=[[[1,1,1],[1,0,1],[1,1,1]],
   [[1,0,1],[0,0,0],[1,0,1]],
   [[1,1,1],[1,0,1],[1,1,1]]]

#actual code that counts:
r=range
n=len(u)
g=r(n)
a=([' ']*9*n+['\n'])*6*n
t='/|-+\n '
d=dict(zip(t+'%!=*',2*t))
for y,z,x,i,j in __import__('itertools').product(g,g,g[::-1],r(6),r(8)):
 if abs(i+j-6)<5*u[x][y][z]:a[(9*n+1)*(i+3*x+2*y)+j+5*z-2*y+2*n]+='./    %|+====* ||    ! *|    !/.*----+'[8*i+j-8]
o=''.join((d[x[-1]],' ')[x[-2:]in('%/','!|','=-')or x[-4:]=='*++*']for x in a)

#output:
print o

Pertama-tama menggambar semua voxel individu dengan semua garis di atas satu sama lain. Kemudian hanya menghasilkan karakter paling atas dan menghilangkan garis-garis dan silang pada pesawat planar yang tidak boleh ditarik sesuai dengan spesifikasi.

Saya kira mungkin untuk bermain golf ini turun lagi, tapi 444 adalah angka yang bagus. :)

Contoh output 3x3x3 dan 7x7x7 (dengan beberapa baris dihapus):

        +----+----+----+   
       /              /|   
      +    +----+    + |   
     /    /|   /    /  +   
    +    +----+    +   |   
   /              /  + |   
  +----+----+----+  /| +   
  |              | + | |   
  |              | |-+ |   
  +    +----+    + |/  +   
  |    | +--|    | +  /    
  |    |/   |    |   +     
  +    +----+    +  /      
  |              | +       
  |              |/        
  +----+----+----+         

                +----+----+----+    +----+----+----+           
               /              /|   /              /|           
              +    +----+    + |  +    +----+    + |           
             /    /|   /    /  + /    /|   /    /  +           
            +    + |  +    +  / +    + |  +    +  /            
           /    /  +-/    /  + /    /  +-/    /  +             
          +----+  /-+----+  /-+----+  /-+----+  /--+           
          |    | +  |    | +  |    | +  |    | +  /|           
        +----+ | |+----+ | |+----+ | |+----+ | | + |           
       /    /| + /    /| + /    /| + /    /| + |/  +           
      +    + | |+    + | |+    + | |+    + | | +   |           
     /    /  + /    /  + /    /  + /    /  + |   + |           
    +    +----+    +   |+    +----+    +   | +  /| +           
   /              /  + /              /  + | | + | |           
  +----+----+----+  /|+----+----+----+  /| + |/--+ |           
  |              | + ||              | + | |-+  /  +           
  |              |/--+|              |/--+ |   +  /            
  +----+----+----+  / +----+----+----+  /  +  /  +             
    +    +  / +    +--- +    +  /-+    +  /--+  /--+           
   /    /  + /              /  + /    /  +   | +  /|           
  +----+  / +----+----+----+  /-+----+  /--+ |/  + |           
  |    | +  |              | +  |    | +  /|-+  /  +           
  |    | |-+|              |/  +|    | | + |   +  /            
  +    + |  +----+----+----+  /|+    + |/  +  /  +             
  |    | +----+----+ | |+    + ||    | +  /--+  /              
  |    |/         /| + /    /  +|    |   +   | +               
  +    +----+----+ | |+----+  /-+    +  /--+ |/                
  |              | + ||    | +  |    | +  /|-+                 
  |              | | +|    | | +|    |/  + |                   
  +----+----+    + | |+    + |/|+----+  /  +                   
    +    +--|    | + ||    | + |  +    +  /                    
   /        |    | |-+|    |   +-/    /  +                     
  +----+----+    + |  +    +  / +----+  /                      
  |              | +  |    | +  |    | +                       
  |              |/   |    |/   |    |/                        
  +----+----+----+    +----+    +----+                         
Emil
sumber
1
Pekerjaan yang baik! Sangat kompak dibandingkan dengan kekacauan saya. Periksa tepi cekung Anda! (hilang plus tanda-tanda) - repl.it/XA9/2
PiGuy
@ PiGuy: Tangkapan bagus! Saya pikir saya memperbaikinya. Itu membuat kode saya sedikit lebih lama tetapi saya juga menemukan beberapa hal golf lebih jauh, jadi saya secara ajaib masih pada jumlah byte yang sama.
Emil
Tampaknya ada satu '+' terlalu banyak di dekat '4'. (Bisakah Anda juga mencoba 7x7x7 yang saya posting?)
flawr
@ flawr: Tanda plus itu milik far 4 (sudut kanan bawah jauh) jadi harus benar. :) Saya akan menambahkan case 7x7x7. Saya pertama kali meninggalkannya karena saya pikir itu akan mengacaukan halaman ini jika semua orang mempostingnya, tapi saya rasa itu tidak masalah.
Emil
Ah sekarang saya mengerti - saya pikir saya tertipu oleh ruang vertikal besar.
flawr
20

Lua (1442 bytes)

Animasi bonus! :)
Jika Anda memiliki voxel art keren dalam format yang sama dengan contoh, tautkan di komentar dan saya akan membuat animasi dari itu
7x7x7
Animasi bonus
12x12x12
Bonus 2
Ini adalah kode golf pertama saya, jadi itu cukup berantakan dan saya berencana untuk meningkatkan atau porting ke bahasa yang berbeda.
Inilah yang saya miliki, saat ini di hanya di bawah 2.5kB hampir tidak golf (baru saja menghapus lekukan spasi pada saat ini, saya akan melanjutkan lebih lanjut nanti)

Ini adalah versi sekarang ~ 1.4kB yang di-golf dan diperkecil (perhatikan tabel "a" di baris pertama adalah pengganti untuk matriks voxel):

local a={}
local b,c=table,string;local d,e,f,g,h,i=b.concat,#a,c.gsub,c.gmatch,ipairs,b.insert;local function j(k,l,m)return a[k]and a[k][l]and a[k][l][m]==1 end;local n={}for o=1,e*5+1 do n[o]={}for p=1,e*7+1 do n[o][p]=" "end end;local q=[[
__6hhhh7
_g    ij
1aaaa2 j
b    d 5
b    de_
3cccc4__
]]local function r(k,l,m)local s=q;if j(k,l,m)then local t,u,v,w,x,y,z,A=j(k-1,l,m),j(k+1,l,m),j(k,l,m-1),j(k,l,m+1),j(k,l-1,m),j(k+1,l+1,m),j(k+1,l,m+1)," "if t then s=f(s,"[ai]"," ")end;if u and not y then A=A.."c"end;if u and not z then A=A.."e"end;if v then A=A.."bg"end;if w then A=A.."di"end;if x then if not j(k,l-1,m+1)then A=A.."j"end;A=A.."h"end;if t then if w and j(k-1,l,m+1)then A=A.."2"end;if v and j(k-1,l,m-1)then A=A.."1"end end;if u then if w and j(k+1,l,m+1)then A=A.."4"end;if v and j(k+1,l,m-1)then A=A.."3"end end;if x then if w and j(k,l-1,m+1)then A=A.."7"end;if v and j(k,l-1,m-1)then A=A.."6"end;if u and j(k+1,l-1,m)then A=A.."5"end end;s=f(f(f(f(f(s,"["..A.."]"," "),"[ach]","-"),"[bdj]","|"),"[gie]","/"),"[1234567]","+")else s=nil end;return s end;local B,C;local D=e*2-1;local E=1;for k=e,1,-1 do for l=1,e do for m=1,e do B=(l-1)*-2+(m-1)*5+D;C=(l-1)*2+(k-1)*3+E;local s=r(k,l,m)if s then local F={}for G in s:gmatch("[^\n]+")do local H={}for I in G:gmatch(".")do i(H,I)end;i(F,H)end;for J,K in h(F)do for L,I in h(K)do if I~="_"then n[C+J-1][B+L-1]=I end end end end end end end;for o,a in h(n)do print(d(a))end

Sunting : Ini adalah versi asli (lebih dari 3kB) yang tidak diubah, termasuk suntingan saya untuk membuat animasi (jika Anda menjalankannya sendiri dan ingin animasi, ubah bagian falsedekat bagian bawah kode ke true.

local v = {}
local depth = #v;

function voxel(y,z,x)
  return (v[y] and v[y][z] and v[y][z][x]==1)
end

local canvas = {}
print("Constructing canvas of depth",depth)
for i=1,depth*5+1 do
  canvas[i] = {}
  for j=1,depth*7+1 do
    canvas[i][j] = " "
  end
end

local voxelProto = [[
__6hhhh7
_g    ij
1aaaa2 j
b    d 5
b    de_
3cccc4__
]]

function renderVoxel(y,z,x)
  local vox = voxelProto
  if (voxel(y,z,x)) then
    local up = voxel(y-1,z,x)
    local down = voxel(y+1,z,x)
    local left = voxel(y,z,x-1)
    local right = voxel(y,z,x+1)
    local back = voxel(y,z-1,x)
    local downFront = voxel(y+1,z+1,x)
    local downRight = voxel(y+1,z,x+1)

    if (up) then
      vox = vox:gsub("[ai]"," ")
    end
    if (down and not downFront) then
      vox = vox:gsub("[c]"," ")
    end
    if (down and not downRight) then
      vox = vox:gsub("[e]"," ")
    end
    if (left) then
      vox = vox:gsub("[bg]"," ")
    end
    if (right) then
      vox = vox:gsub("[di]"," ")
    end
    if (back and not voxel(y,z-1,x+1)) then
      vox = vox:gsub("[j]"," ")
    end
    if (back or up) then
      vox = vox:gsub("[h]"," ")
    end
    if (up and right and voxel(y-1,z,x+1)) then
      vox = vox:gsub("[2]"," ")
    end
    if (up and left and voxel(y-1,z,x-1)) then
      vox = vox:gsub("[1]"," ")
    end
    if (down and right and voxel(y+1,z,x+1)) then
      vox = vox:gsub("[4]"," ")
    end
    if (down and left and voxel(y+1,z,x-1)) then
      vox = vox:gsub("[3]"," ")
    end
    if (back and right and voxel(y,z-1,x+1)) then
      vox = vox:gsub("[7]"," ")
    end
    if (back and left and voxel(y,z-1,x-1)) then
      vox = vox:gsub("[6]"," ")
    end
    if (back and down and voxel(y+1,z-1,x)) then
      vox = vox:gsub("[5]"," ")
    end

    vox = vox:gsub("[ach]","-")
    vox = vox:gsub("[bdj]","|")
    vox = vox:gsub("[gie]","/")
    vox = vox:gsub("[1234567]","+")
  else
    vox = nil
  end
  return vox
end
local xpos,ypos
local minx = depth*2-1
local miny = 1;

local pic = {}
function drawCanvas()
  for k,v in pairs(canvas) do
    pic[k] = table.concat(v)
  end
  return table.concat(pic,"\n")
end

local timeline = {}
print("Compositing voxels")
for y=depth,1,-1 do
  for z=1,depth do
    for x = 1,depth do
      xpos = (z-1)*-2 + (x-1)*5 + minx
      ypos = (z-1)*2 + (y-1)*3 + miny
      local vox = renderVoxel(y,z,x)
      if (vox) then
        local vt = {}
        for line in vox:gmatch("[^\n]+") do
          local vtl = {}
          for c in line:gmatch(".") do
            table.insert(vtl,c)
          end
         table.insert(vt,vtl)
        end
        for ly,chars in ipairs(vt) do
          for lx,c in ipairs(chars) do
            if (c ~= "_") then
              canvas[ypos+ly-1][xpos+lx-1] = c
            end
          end
        end
        table.insert(timeline,drawCanvas())
      end
    end
  end
end

if (false) then -- change to true if you want to see the animation!
  for i=1,#timeline do
    local t = os.clock() + 0.05
    io.write(timeline[i],'\n\n')
    io.flush()
    while (t > os.clock()) do end
  end
end         
print(timeline[#timeline])

Berikut adalah contoh kode yang akan mengisi matriks voxel dari string untuk matriks voxel 3x3x3. (Ini akan mengambil string apa pun dalam format yang serupa, tetapi pastikan itu adalah sebuah kubus atau hal-hal yang mungkin akan rusak.)
Untuk menggunakan ini, masukkan potongan ini tepat setelah baris pertamalocal v = {}

local vs = [[
100
000
000

110
100
000

111
110
101
]]
for layer in vs:gmatch("[^a]+") do
 local a = {}
 for row in layer:gmatch("[^\n]+") do
 local b = {}
 for _vox in row:gmatch("[01]") do
 table.insert(b,(_vox=="1") and 1 or 0)
 end
 table.insert(a,b)
 end
 table.insert(v,a)
end

Berikut ini adalah output dari pola voxel 12x12x12 yang diberikan : (dan ya itu terlihat lebih baik pada konsol / perangkat tampilan teks normal, ada sedikit terlalu banyak jarak vertikal di sini)

                                                                          +----+----+
                                                                         /         /|
                                                                        +----+----+ |
                                                                        |         | +
                                                            +----+      |         |/
                                                           /    /|      +    +----+
                                                          +----+ |      |    | +----+
                                                          |    | +      |    |/    /|
                                                          |    | |      +    +----+ |
                                                          +    + |      |         | +
              +----+----+                         +----+--|    | +      |         |/
             /         /|                        /        |    | |      +    +----+
            +----+----+ |                       +----+----+    + |      |    | +----+
            |         | +                       |              | +      |    |/    /|
            |         |/       +----+----+----+ |              | |      +    +----+ |
            +    +----+       /              /| +    +----+    + |      |         | +
            |    | +         +----+----+----+ | |    | +--|    | +      |         |/
            |    | |         |              | + |    |/   |    | |      +----+----+
            +    + |         |              | | +    +----+    + |            
            |    | +         +    +----+    + | |              | +            
            |    | |         |    | +--|    | + |              |/             
            +    + |         |    |/   |    | | +----+----+----+              
            |    | +----+    +    +----+    + |                               
            |    |/    /|    |              | +                               
            +    +----+ |    |              |/                                
            |         | +    +----+----+----+                                 
            |         |/                                                      
            +----+----+                                       +----+----+     
                                                             /         /|     
                                                  +----+    +----+----+ |     
                                                 /    /|    |         | +     
                                                +----+ |    |         |/      
                                                |    | +    +    +----+       
      +----+----+----+  +----+----+----+----+---|    | |---+|    | +----+-+----+----+
     /              /| /                        +    + |    |    |/    /|          /|
    +----+----+----+ |+                         |    | +    +    +----+ |         + |
    |              | +                          |    | |    |         | +        /  +
    |              | |      +----+----+----+    +    + |    |         |/        +  /
    +    +----+    + |     /              /|    |    | +    +    +----+        /  +
    |    | +--|    | +    +----+----+----+ |    |    | |    |    | +          +  /
    |    |/   |    | |    |              | +    +    + |    |    | |         /  +
    +    +----+    + |    |              | |    |    | +    +    + |        +  /
    |              | +    +    +----+    + |    |    | |    |    | +       /  +
    |              | |    |    | +--|    | +    +    + |    |    |/       +  /
    +----+----+    + |    |    |/   |    | |    |    | +    +----+       /  + 
      +----+--|    | +    +    +----+    + |    |    |/                 +  /  
     /        |    | |    |              | +    +----+                 /  +   
    +----+----+    + |    |              |/                           +  /    
    |              | +    +----+----+----+                           /  +     
    |              |/                                               +  /      
    +----+----+----+                                               /  +       
      +                                                           +  /        
     /                                                           /  +         
    +                                                           +  /          
   /                                                           /  +           
  +                                                           +  /            
 /                                                           /  +             
+----+----+----+----+----+----+----+----+----+----+----+----+  /              
|                                                           | +               
|                                                           |/                
+----+----+----+----+----+----+----+----+----+----+----+----+   

Ini adalah output dari contoh 7x7x7 di sini

              +----+----+----+    +----+----+----+
             /              /|   /              /|
            +    +----+    + |  +    +----+    + |
           /    /|   /    /  + /    /|   /    /  +
          +    + |  +    +  / +    + |  +    +  / 
         /    /  +-/    /  + /    /  +-/    /  +  
        +----+  /-+----+  /-+----+  /-+----+  /--+
        |    | +  |    | +  |    | +  |    | +  /|
      +----+ | |+----+ | |+----+ | |+----+ | | + |
     /    /| + /    /| + /    /| + /    /| + |/  +
    +    + | |+    + | |+    + | |+    + | | +   |
   /    /  + /    /  + /    /  + /    /  + |   + |
  +    +----+    +   |+    +----+    +   | +  /| +
 /              /  + /              /  + | | + | |
+----+----+----+  /|+----+----+----+  /| + |/--+ |
|              | + ||              | + | |-+  /  +
|              |/--+|              |/--+ |   +  / 
+----+----+----+  / +----+----+----+  /  +  /  +  
  +    +  / +    +----+    +  /-+    +  /--+  /--+
 /    /  + /              /  + /    /  +   | +  /|
+----+  / +----+----+----+  /-+----+  /--+ |/  + |
|    | +  |              | +  |    | +  /|-+  /  +
|    | |-+|              |/  +|    | | + |   +  / 
+    + |  +----+----+----+  /|+    + |/  +  /  +  
|    | +----+----+ | |+    + ||    | +  /--+  /   
|    |/         /| + /    /  +|    |   +   | +    
+    +----+----+ | |+----+  /-+    +  /--+ |/     
|              | + ||    | +  |    | +  /|-+      
|              | | +|    | | +|    |/  + |        
+----+----+    + | |+    + |/|+----+  /  +        
  +    +--|    | + ||    | + |  +    +  /         
 /        |    | |-+|    |   +-/    /  +          
+----+----+    + |  +    +  / +----+  /           
|              | +  |    | +  |    | +            
|              |/   |    |/   |    |/             
+----+----+----+    +----+    +----+              
PiGuy
sumber
Wow, terlihat hebat =) Bisakah Anda juga memasukkan kode parsing / output meskipun tidak masuk hitungan - hanya agar non-luaners dapat mereproduksi hasil Anda =)
flawr
Saya memasukkan contoh baru, akan lebih bagus jika Anda bisa memasukkan itu juga =)
flawr
Diperbarui dengan sampel 7x7x7 baru, juga menambahkan potongan untuk menghasilkan tabel dari string pastebin.
PiGuy
@ 7x7x7: Sepertinya program Anda tidak menggambar tepi vertikal cekung. Seperti di atas kurva itu di bagian belakang (lebih jauh) dari lapisan atas. atau sama di sisi kanan depan (dekat) pada lapisan terendah. Saya sangat menyukai animasinya!
flawr
@ flawr Terima kasih, saya memperbaikinya dan juga menghabiskan beberapa waktu untuk menghitung mundur byte dan sekarang di bawah 1,5 kB, dan saya menambahkan kode lengkap yang saya gunakan untuk membuat animasi juga.
PiGuy