พิจารณาบล็อก 3x3 ต่อไปนี้ซึ่งอัลกอริทึมกำลังสองยกกำลังจะระบุสำหรับทุกเซลล์ (ด้วย ID ที่มีป้ายกำกับ 0 รายการ):

0:
...
...
...

1:
...
...
\..

2:
...
...
../

3:
...
---
...

4:
..\
...
...

5:
/..
...
../

6:
.|.
.|.
.|.

7:
/..
...
...

8:
/..
...
...

9:
.|.
.|.
.|.

10:
..\
...
\..

11:
..\
...
...

12:
...
---
...

13:
...
...
../

14:
...
...
\..

15:
...
...
...

เป้าหมายของความท้าทายนี้ได้รับเมทริกซ์ 2 มิติของ ID บล็อกวาดโครงร่างเต็มโดยการเรียงเซลล์ขนาดเล็กเหล่านี้เข้าด้วยกัน โปรดทราบว่ามีบางกรณีที่เกิดซ้ำ (เช่น: 0 และ 15 จะเหมือนกัน)

อินพุต

โปรแกรม / ฟังก์ชั่นของคุณควรใช้เป็นอินพุทเมทริกซ์รูปสี่เหลี่ยมผืนผ้าสองมิติของจำนวนเต็มในช่วง[0+a,15+a](ซึ่งaเป็นการเปลี่ยนเลขจำนวนเต็มตามอำเภอใจที่คุณเลือกซึ่งช่วยให้คุณใช้การทำดัชนีแบบ zero-based หรือการทำดัชนีแบบ 1 สำหรับบล็อก) สิ่งนี้อาจมาจากแหล่งใดก็ได้ที่ต้องการ (stdin, function function, ฯลฯ )

เอาท์พุต

โปรแกรม / ฟังก์ชั่นของคุณควรส่งออกสตริงเดี่ยวที่แสดงถึงพล็อตรูปร่างเต็ม ไม่ควรมีช่องว่างนำหน้า / ต่อท้ายพิเศษ แต่อนุญาตให้ขึ้นบรรทัดใหม่ได้หนึ่งบรรทัด ไม่ควรมีการแยกระหว่างบล็อกที่อยู่ติดกันในแนวตั้งหรือแนวนอน

โปรดทราบว่าคุณไม่จำเป็นต้องทำการดูแลเป็นพิเศษสำหรับบล็อกใดที่แมปกับ "อาน" เพียงแค่วาดบล็อคด้วย ID ที่กำหนดตามที่เป็นอยู่

เอาท์พุทอาจจะจมใด ๆ ที่ต้องการ (stdout ค่าตอบแทน ฯลฯ )

ตัวอย่าง

ตัวอย่างทั้งหมดด้านล่างใช้รหัสบล็อกแบบ 0

case 1:

2 1
4 8

......
......
../\..
..\/..
......
......

case 2:

15 13 12 14 15
13 8 0 4 14
11 1 0 2 7
15 11 3 7 15

...............
......---......
...../...\.....
.../.......\...
...............
../.........\..
..\........./..
...............
...\......./...
.....\.../.....
......---......
...............


case 3:

12 12 12 8 4
0 0 0 0 2
0 0 0 2 7
0 2 3 7 15

........./....\
---------......
...............
...............
...............
............../
............/..
...............
.........../...
........./.....
......---......
...../.........

case 4:

0 1 2 3
4 5 6 7
8 9 10 11
12 13 14 15

............
.........---
...\..../...
..\/...|./..
.......|....
...../.|....
/...|...\..\
....|.......
....|.\.....
............
---.........
...../\.....

case 5:

0 0 0 0 6 15 15
0 0 0 0 6 15 15
0 0 0 0 6 15 15
0 0 0 2 7 15 15
0 0 2 5 14 15 15
0 2 5 8 4 12 14
0 4 8 0 0 0 6
0 0 0 0 0 0 4

.............|.......
.............|.......
.............|.......
.............|.......
.............|.......
.............|.......
.............|.......
.............|.......
.............|.......
............/........
.....................
.........../.........
........./...........
.....................
......../../\........
....../../....\......
...............---...
...../../.........\..
.....\/............|.
...................|.
...................|.
....................\
.....................
.....................

เกณฑ์การให้คะแนน

นี่คือรหัสกอล์ฟ รหัสที่สั้นที่สุดในหน่วยไบต์ชนะ ช่องโหว่มาตรฐานใช้

Mathematica, 353 326 ไบต์

s=Table[".",3,3];z=Reverse;l@0=l@15=s;y=s;y[[3,1]]="\\";l@1=l@14=y;y=s;y[[3,3]]="/";l@2=l@13=y;y=s;y[[2,All]]="-";l@3=l@12=y;y=l@4=l@11=z/@z@l@1;y[[3,1]]="\\";l@10=y;y=s;y[[All,2]]="|";l@6=l@9=y;y=l@7=l@8=z/@z@l@2;y[[3,3]]="/";l@5=y;StringReplace[ToString@Grid@Map[Column,Map[StringJoin,Map[l,#,{2}],{3}],{2}],{"\n\n"->"\n"}]&

อินพุต

[{15, 13, 12, 14, 15}, {13, 8, 0, 4, 14}, {11, 1, 0, 2, 7}, {15, 11, 3, 7, 15}} ]

JavaScript (ES6), 195 ไบต์

a=>a.map((r,y)=>r.map((i,x)=>[...s='76843210_'].map((_,j)=>(o[Y=y*3+j/3|0]=o[Y]||[])[x*3+j%3]='.\\/-\\/|/\\'[[0,64,256,56,4,257,146,1,68][k=s[i-8]||i]>>j&1&&k])),o=[])&&o.map(r=>r.join``).join`
`

กรณีทดสอบ

let f =

a=>a.map((r,y)=>r.map((i,x)=>[...s='76843210_'].map((_,j)=>(o[Y=y*3+j/3|0]=o[Y]||[])[x*3+j%3]='.\\/-\\/|/\\'[[0,64,256,56,4,257,146,1,68][k=s[i-8]||i]>>j&1&&k])),o=[])&&o.map(r=>r.join``).join`
`

console.log(f([
  [ 2, 1 ],
  [ 4, 8 ]
]));

console.log(f([
  [ 15, 13, 12, 14, 15 ],
  [ 13,  8,  0,  4, 14 ],
  [ 11,  1,  0,  2,  7 ],
  [ 15, 11,  3,  7, 15 ]
]));

console.log(f([
  [ 12, 12, 12,  8,  4 ],
  [  0,  0,  0,  0,  2 ],
  [  0,  0,  0,  2,  7 ],
  [  0,  2,  3,  7, 15 ]
]));

console.log(f([
  [  0,  1,  2,  3 ],
  [  4,  5,  6,  7 ],
  [  8,  9, 10, 11 ],
  [ 12, 13, 14, 15 ]
]));

console.log(f([
  [  0,  0,  0,  0,  6, 15, 15 ],
  [  0,  0,  0,  0,  6, 15, 15 ],
  [  0,  0,  0,  0,  6, 15, 15 ],
  [  0,  0,  0,  2,  7, 15, 15 ],
  [  0,  0,  2,  5, 14, 15, 15 ],
  [  0,  2,  5,  8,  4, 12, 14 ],
  [  0,  4,  8,  0,  0,  0,  6 ],
  [  0,  0,  0,  0,  0,  0,  4 ]
]));

Mathematica, 173 ไบต์

StringRiffle[ArrayFlatten[ReplacePart[Table[".",16,3,3],{{2|11|15,3,1}|{5|11|12,1,3}->"\\",{3|6|14,3,3}|{6|8|9,1,1}->"/",{4|13,2,_}->"-",{7|10,_,2}->"|"}][[#]]&/@#],"\n",""]&

ลองที่กล่อง Wolfram!

"การ\n" ควรถูกแทนที่ด้วยการขึ้นบรรทัดใหม่ที่เกิดขึ้นจริง การป้อนข้อมูลที่มีการจัดทำดัชนี 1 - {{13,13,13,9,5},{1,1,1,1,3},{1,1,1,3,8},{1,3,4,8,16}}ตัวอย่างเช่นกรณีทดสอบครั้งที่สามจะกลายเป็น เอาต์พุตเป็นสตริง

แนวคิดนี้เป็นแบบเดียวกับคำตอบของ Jenny_mathyทำสิบหกสี่เหลี่ยมโดยใช้ตาราง 3x3 "."และแทนที่อักขระบางตัวจากนั้นต่อสแควร์สเข้าด้วยกัน - แต่ใช้ฟังก์ชั่นที่สั้นลงเล็กน้อยเพื่อทำ (ขอบคุณalephalphaสำหรับเตือนฉันว่าArrayFlattenมีอยู่!)

เป็นไปได้ว่าสิ่งนี้สามารถทำได้ในไม่กี่ไบต์โดยการสร้างสี่เหลี่ยมอย่างชาญฉลาดแทนที่จะเป็นฮาร์ดโค้ดพวกเขา แต่มันต้องใช้ความพยายามมากกว่า ...

เรติน่า 165 ไบต์

T`d`L`1\d
 |\bB\B

.+
X$&¶Y$&¶Z$&
%{`[XYZ]$

([XYZ])[69]
.|.$1
X[^4-B]
...X
X[4AB]
..\X
X[578]
/..X
Y[^369C]
...Y
Y[3C]
---Y
Z[03478BCF]
...Z
Z[1AE]
\..Z
Z[25D]
../Z

ลองออนไลน์! ลิงก์มีตัวอย่างที่สอง คำอธิบาย: สองสเตจแรกแปลงจากทศนิยมเป็นเลขฐานสิบหกอนุญาตให้ลบช่องว่างได้ ขั้นตอนที่สามนั้นเพิ่มขึ้นเป็นสามเท่าในแต่ละบรรทัด จากนั้นเครื่องหมายเหล่านี้จะผ่านตัวเลขฐานสิบหกแปลงเป็นพล็อตรูปร่างตามที่พวกเขาไปจนกว่าจะถึงจุดสิ้นสุดของบรรทัดที่จุดที่พวกเขาจะถูกลบ

Python 2 , 247 ไบต์

J='...'
print'\n'.join(map(''.join,sum([[sum([f[i*3:][:3]for i in j],[])for f in map(list,[J*4+'..\\/...|./../...|...\\..\\'+J*4,J*3+'---.......|........|.......---'+J*3,'...\\..../......../.|........|.\\'+J*3+'./\\.....'])]for j in input()],[])))

ลองออนไลน์!

-1 ไบต์ขอบคุณ LeakyNun

SOGL V0.12 , 106 89 ไบต์

žj}² ³
ē0=?²
{ā;{"⁰9═‼pnk№Ο|╚φ;“2─6nwEX .9*3n²Xƨ.ƨ-¹╬-}²X"č7_#‘3n}² /33³\13³\31³/11žj}┼}O

ลองที่นี่! (ที่มีไบต์พิเศษ→เพื่อความสะดวกในการป้อนข้อมูลมิฉะนั้นจะคาดว่าอาร์เรย์อยู่ในสแต็กแล้ว)

Python 2, 196 191 181 176 ไบต์

ลองออนไลน์!

ฟังก์ชั่นที่รับอาร์เรย์ของ ints และส่งกลับสตริง

J=''.join;N='\n'.join
f=lambda I:N(N(J(J('\/|-.'[C/16-2]*(C%16)for C in map(ord,'o!j1cSe!f1g1aAbAbAa1h1iAbAbAc!c!d!iSk1f!k'))[c*9+3*j:][:3]for c in r)for j in[0,1,2])for r in I)

แก้ไข: บันทึก 5 ไบต์โดยกำหนด J, N; อีก 10 ไบต์เพราะฉันลืมอินพุตถือว่าเป็นอาร์เรย์ของ ints แล้ว และอีก 5 ไบต์ที่บันทึกโดยการแบ่งส่วนอย่างชาญฉลาด ...

สตริงที่ต่อกันของเซลล์ 3x3 ทั้งหมด 16 เซลล์ (144 bytes, ไม่รวม linebreaks) มีการเข้ารหัสความยาวรันเป็นสตริง 41 ไบต์:

o!j1cSe!f1g1aAbAbAa1h1iAbAbAc!c!d!iSk1f!k

ที่แต่ละองค์ประกอบ RLE (cellType, length)ถูกเข้ารหัสกับตัวละครchr(32+16*cellType+length)(มันสะดวกที่การรันสูงสุดคือ 15 และนั่นord(' ')==32คือหารด้วย 16) เมื่อถอดรหัสเรารับ'\/|-.'[cellType]บทเป็นตัวละครที่พิมพ์ได้

ไม่มีอะไรที่ฉลาดโดยเฉพาะหลังจากนั้น ...

05AB1E , 61 ไบต์

v•2mßklJFΘõÿ|åU‚ιØØ•6B5¡∊¶¡110bTǝ.BJ3ô3ôyèøJ»}»4ÝJð«"\./-|."‡

ลองออนไลน์!

สามารถบีบอัดลวดลายครึ่งแรกของรูปแบบเป็น:

5
11111105
1111111125
1113335
1105
2111111125
141141145
25

ครึ่งหลังจะต้องเป็น:

25
141141145
11011105
1105
1113335
1111111125
11111105
5

เราสามารถเพียงแค่แนวตั้งกระจกครึ่งแรกและใส่ในสำหรับbinary 110 (1101110)2111111125

ต่อไปเราจะนำรูปแบบนี้มาแบ่งเป็นห้าชั้นแล้วนำมาประกอบเป็นรูปแบบ:

1 = 111111111
2 = 111111011
3 = 111111112
4 = 111333111
5 = 110111111
6 = 211111112
7 = 141141141
8 = 211111111
9 = 141141141
A = 110111011
B = 110111111
C = 111333111
D = 111111112
E = 111111111

ตอนนี้เรามีหน่วยการสร้างของเราแล้วส่วนสุดท้ายก็แทนที่รายการเมทริกซ์ด้วยหน่วยการสร้างที่เหมาะสมบีบแถวและพิมพ์ให้ผู้ใช้ด้วยสัญลักษณ์แทนที่:

0 = .........
1 = ......\..
2 = ......../
3 = ...---...
4 = ..\......
5 = /......./
6 = .|..|..|.
7 = /........
8 = /........
9 = .|..|..|.
A = ..\...\..
B = ..\......
C = ...---...
D = ......../
E = .........

สามารถโพสต์คำอธิบายการดำเนินการอย่างเป็นทางการหากใครต้องการมันขอบคุณ

เยลลี่ 64 ไบต์

“¡_ḟ5⁸ṫ⁺Y"⁷ƘzƬɼ¥@TR/ṖQ½3yİ>ẎḄT¥⁹iḟQ¬Ɠl¹µŒ’ṃ“/-\|.”s3s3ṙ9ị@³ZY$€Y

ลองออนไลน์!

สิ่งนี้ใช้การบีบอัดแบบไร้เดียงสาและอาจบันทึกได้หลายไบต์ด้วยการเข้ารหัสความยาวรัน

มันทำงานอย่างไร

“¡_ḟ5⁸ṫ⁺Y"⁷ƘzƬɼ¥@TR/ṖQ½3yİ>ẎḄT¥⁹iḟQ¬Ɠl¹µŒ’ṃ“/-\|.”s3s3ṙ9ị@³ZY$€Y
“¡_ḟ5⁸ṫ⁺Y"⁷ƘzƬɼ¥@TR/ṖQ½3yİ>ẎḄT¥⁹iḟQ¬Ɠl¹µŒ’ encodes the integer 4591777158889232952973696500124538798606476761349931038636020730336909822188496590423586252520
ṃ“/-\|.”                   - convert to base 5 and index into the string to get "/......../.........|..|..|...\...\....\.........---.........../......\.................\........../...---.....\....../......./.|..|..|."
        s3s3               - split every 9 characters into a 3x3 square submatrix       
            ṙ9             - rotate left by 9 to line up the submatrix for 1 with index 1
              ị@³          - index the input into this
                 ZY$€Y     - format