ช่วยทรัมป์สร้างกำแพง!


68

ทรัมป์ต้องการกำแพงที่สร้างขึ้นแล้วคุณจะทำมัน! เพื่อสร้างกำแพงของเขาให้มีประสิทธิภาพมากที่สุดฉันได้สร้างรูปแบบที่เรียบง่ายและทำซ้ำได้เพื่อให้คุณใช้

    __   __    
   |  |_|  |   
___|       |___
-   -   -   -  
 - - - - - - - 
- - - - - - - -
———————————————

ทรัมป์จะบอกคุณว่าเขาต้องการกลุ่มผนังกี่ชิ้นและคุณจะสร้างพวกเขาให้เป็นแบบนี้

นี่คือรูปแบบ:

    __   __     <-- 4-2-3-2-4          ' _ _ '
   |  |_|  |    <-- 3-1-2-1-1-1-2-1-3  ' | |_| | '
___|       |___ <-- 3-1-7-1-3          '_| |_'
-   -   -   -   <-- 1-3-1-3-1-3-1-1    '- - - - '
 - - - - - - -  <-- 1-1-...-1-1        ' - -...- - '
- - - - - - - - <-- 1-1-...-1-1        '- - ... - -'
——————————————— <-- 15                 Unicode U+2014

ข้อมูลที่ป้อนจะเป็นจำนวนเต็ม> 0 เสมอ

กรณีทดสอบ:

1
    __   __    
   |  |_|  |   
___|       |___
-   -   -   -  
 - - - - - - - 
- - - - - - - -
———————————————

2
    __   __        __   __    
   |  |_|  |      |  |_|  |   
___|       |______|       |___
-   -   -   -  -   -   -   -  
 - - - - - - -  - - - - - - - 
- - - - - - - -- - - - - - - -
——————————————————————————————

5
    __   __        __   __        __   __        __   __        __   __
   |  |_|  |      |  |_|  |      |  |_|  |      |  |_|  |      |  |_|  |
___|       |______|       |______|       |______|       |______|       |___
-   -   -   -  -   -   -   -  -   -   -   -  -   -   -   -  -   -   -   -
 - - - - - - -  - - - - - - -  - - - - - - -  - - - - - - -  - - - - - - - 
- - - - - - - -- - - - - - - -- - - - - - - -- - - - - - - -- - - - - - - -
———————————————————————————————————————————————————————————————————————————

เนื่องจากคุณต้องทำสิ่งนี้อย่างรวดเร็วเขียนโปรแกรมที่สั้นที่สุดเท่าที่จะเป็นไปได้!

ถ้ามันช่วยได้ฉันเขียนความท้าทายเป็นอันดับแรกโดยใช้ชื่อล่าสุด;)

คำตอบ:


9

05AB1E , 38 ไบต์

•4H’*»È%f·ù„áÅ'4•4B3ÝJ"_ -|"‡8ô€ûvy¹×»

ลองออนไลน์!

•4H’*»È%f·ù„áÅ'4•     # Push '1724427993555739020619095486300160'
4B                    # Convert to base 4 (turns it into an 8x8 bitmap).
  3ÝJ"_ -|"‡          # Replace digits 0-3 with _, , -, or |.
            8ô        # Split into pieces of 8.
              €û      # Palindromize each piece.
                vy¹×» # For each row, dupe it n times (hori) and print it.

1724427993555739020619095486300160 แปลงเป็นฐาน 4:

11110011111311300003111121112111121212122121212100000000

11110011111311300003111121112111121212121212121212100000000 ด้วยอักขระที่ถูกแทนที่:

__ | |____| - - - - - -- - - - ________

รูปแบบก่อนหน้านี้แบ่งออกเป็น 8 ชิ้น:

    __  
   |  |_
___|    
-   -   
 - - - -
- - - - 
________

จากนั้นให้คุณทำให้เป็นก้อนและทำตามที่ต้องการผ่านการทำซ้ำ


29

CJam, 52 ไบต์

F,ri*"s@;b6(MBZF,fu"128b6b"_ 
|-—"f=N/ff=zN*

รวมอักขระ ASCII ที่ไม่สามารถพิมพ์ได้จำนวนหนึ่ง hexdump ของสตริงตัวอักษรแรกที่ผลักคือ:

01 73 06 40 3B 62 36 28 1E 4D 07 42 5A 14 1B 46 2C 66 75

ลองที่นี่!

คำอธิบาย

เลขฐานสิบหกข้างต้นถูกตีความว่าเป็นตัวเลขฐาน -12 จากนั้นแปลงเป็นฐาน 6 เพื่อรับรายการนี้:

[1 1 1 1 0 0 1 1 1 0 0 2
 1 1 1 3 1 1 3 0 3 1 1 3 2
 0 0 0 3 1 1 1 1 1 1 1 3 2
 4 1 1 1 2
 1 4 2
 4 1 2
 5]

นี้เราใช้การทำแผนที่0 → _, 1 → space, 2 → \n, 3 → |, ,4 → - 5 → —นี่ทำให้เราได้รับสตริง:

    __   __
   |  |_|  |
___|       |
-   
 -
- 
—

ประกอบด้วย "รอบระยะเวลา" ของแต่ละบรรทัด คือเราสามารถวงจรบรรทัดที่ห้าที่จะได้รับ" -"" - - - - - - - "

จากนั้นเราเรียกใช้โปรแกรมย่อยนี้:

N/               Split into lines.
  Ff*            Repeat each line 15 times (to cycle it).
     Ff<         Take the first 15 chars of each line.
        rif*     Repeat these chars input() times.
            N*   Join lines.

(เวอร์ชั่นใหม่ทำสิ่งนี้ในลักษณะที่แตกต่างออกไปเล็กน้อยที่จริงแล้วฉันไม่สามารถคาดศีรษะตัวเองได้ดีเพราะมันใช้ff=)


21
ฉันไม่ทำอะไรเลยแม้แต่นี้
Conor O'Brien

4
ภาษานี้ทำขึ้นเป็นพิเศษสำหรับคำตอบนี้หรือไม่?
Erdal G.

5
@ErdalG ไม่แม้ว่าCJamนั้นถูกสร้างขึ้นโดย PPCG ( aditsu ) แต่มันก็ใช้เวลาพอสมควร คุณจะพบได้ทั่วเว็บไซต์ :)
Alex A.

@AlexA โอเคเข้าท่ามากกว่านี้แล้ว ฉันค่อนข้างใหม่ที่นี่ขอบคุณ! :)
Erdal G.

@ErdalG ด้วยความยินดี. ยินดีต้อนรับสู่เว็บไซต์!
Alex A.

13

JavaScript (ES6), 116 115 ไบต์

n=>"__   __    n|  |_|  |   n|       |___n -  n- n -n—".split`n`.map(l=>l.repeat(15).slice(-15).repeat(n)).join`
`

บันทึกเป็นไบต์ด้วย@Neil !

คำอธิบาย

ค่อนข้างเหมือนกับวิธี CJam ของ @Maurisแต่ไม่มีการแม็พอักขระ

ชิ้นส่วนผนังอยู่ในรูปแบบ:

__   __    
|  |_|  |   
|       |___
 -  
- 
 -
—

เพราะถ้าคุณทำซ้ำแต่ละบรรทัด 15 ครั้งคุณจะได้รับ:

...    __   __    __   __    __   __    
... |  |_|  |   |  |_|  |   |  |_|  |   
... |       |___|       |___|       |___
 -   -   -   -   -   -   -   -   -   -  
          - - - - - - - - - - - - - - - 
           - - - - - - - - - - - - - - -
                         ———————————————

และหลังจากตัดเหลือเพียง 15 ตัวอักษรคุณจะได้รับ:

    __   __    
   |  |_|  |   
___|       |___
-   -   -   -  
 - - - - - - - 
- - - - - - - -
———————————————

Ungolfed

n=>

  // array of wall line parts
  "__   __    n|  |_|  |   n|       |___n -  n- n -n—".split`n`

  .map(l=>       // for each wall line
    l.repeat(15) // repeat the line 15 times to create a complete wall line
    .slice(-15)  // each wall piece is only 15 characters long
    .repeat(n)   // repeat the wall n times
  )
  .join`
`                // output the resulting wall

ทดสอบ


คุณสามารถบันทึก byte โดยใช้.slice(-15)แทนได้หรือไม่?
Neil

การแก้ไขนั้นง่ายเพียงแค่ใช้ส่วนต่ำสุดที่เหมาะสมแทนส่วนต่ำสุดที่เหลือ:__ __ n| |_| | n| |___n - n- n -n—
Neil

ฉลาดมากดีมาก ๆ !
J Atkin

@ Neil Ah คุณพูดถูก ขอบคุณสำหรับทิป!
user81655

5

Jolf , 135 ไบต์

สามารถตีกอล์ฟได้มาก ปิดการพิมพ์ที่สวยงามและล้างผลลัพธ์เพื่อผลลัพธ์ที่ดีขึ้น ลองที่นี่! . นอกจากนี้ให้ใช้สิ่งนี้เพื่อทดสอบหมายเลขโดยพลการได้ง่ายขึ้น

oHpAt++++++++++++*"    __   __    "jH*"   |  |_|  |   "jH*"___|       |___"jH*j"-   -   -   -  "H*+*" -"7' jH*"- - - - - - - -"jH*M35j'—

ฉันจะเพิ่มคำอธิบายในภายหลัง


6
@Connor O'Brien ดังนั้นกทพ. ดูเหมือนคำอธิบายนั้นคืออะไร: D
Rohan Jhunjhunwala

5

Haskell, 116 118 108 bytes

h n=take(n*15).cycle
f n=unlines$h n.h 1<$>lines"    __   __\n   |  |_|  |\n___|       |\n-   \n -\n- \n—"

ตัวอย่างการใช้งาน:

*Main> putStr $ f 3
    __   __        __   __        __   __    
   |  |_|  |      |  |_|  |      |  |_|  |   
___|       |______|       |______|       |___
-   -   -   -  -   -   -   -  -   -   -   -  
 - - - - - - -  - - - - - - -  - - - - - - - 
- - - - - - - -- - - - - - - -- - - - - - - -
—————————————————————————————————————————————

วิธีนี้ใช้กลยุทธ์เดียวกับคำตอบอื่น ๆ ที่นี่: แต่ละบรรทัดของกำแพงเป็นหนึ่งรอบของรูปแบบเช่น "-" (เส้นประ + ช่องว่าง) สำหรับบรรทัดสุดท้ายที่สอง ทำซ้ำแต่ละรูปแบบใช้เวลา 15 ตัวอักษรเพื่อให้ได้หนึ่งส่วนผนังซ้ำอีกครั้งและใช้15*nตัวอักษรสำหรับnกลุ่ม

แก้ไข: @Mauris พบ 10 ไบต์ ขอบคุณ!


บรรทัดล่างควรเป็น - (U + 2014) ไม่ใช่เส้นประ ASCII; ฉันคิดว่านี่หมายความว่าคุณจะเสีย 2 ไบต์
ลินน์

@Mauris: ถูกต้อง ซ่อมมัน. ขอขอบคุณที่ค้นพบ
nimi

คุณสามารถยุติช่วงเวลาสำหรับบรรทัดที่ 1-3 ก่อนหน้านี้ได้โดยประหยัด 4 + 3 + 3 ไบต์ (คำตอบ CJam ของฉันทำในสิ่งเดียวกัน)
ลินน์

@Mauris: อาใช่เพราะรอบแรกถูกตัดออกหลังจาก 15 ตัวอักษร ขอบคุณ!
nimi

4

ยูทิลิตี Bash + Linux ( 247 186 180 ไบต์)

read x
for i in {1..7}
do
tail -n +7 $0|gzip -dc|sed -nr "$i s/(.*)/$(printf '\\1%.0s' $(seq 1 $x))/p"
done
exit
ˈ ELzVSPPPȏǑ
\@\D񵠚k>ĄÚ ܋ɀÜ@r²uٞ5L! 󰰹͠  

เนื่องจากอักขระที่ไม่สามารถพิมพ์ได้มีการใช้อย่างไม่เห็นแก่ตัวในการสร้างสคริปต์ด้านบนนี่คือ hexdump:

00000000  72 65 61 64 20 78 0a 66  6f 72 20 69 20 69 6e 20  |read x.for i in |
00000010  7b 31 2e 2e 37 7d 0a 64  6f 0a 74 61 69 6c 20 2d  |{1..7}.do.tail -|
00000020  6e 20 2b 37 20 24 30 7c  67 7a 69 70 20 2d 64 63  |n +7 $0|gzip -dc|
00000030  7c 73 65 64 20 2d 6e 72  20 22 24 69 20 73 2f 28  ||sed -nr "$i s/(|
00000040  2e 2a 29 2f 24 28 70 72  69 6e 74 66 20 27 5c 5c  |.*)/$(printf '\\|
00000050  31 25 2e 30 73 27 20 24  28 73 65 71 20 31 20 24  |1%.0s' $(seq 1 $|
00000060  78 29 29 2f 70 22 0a 64  6f 6e 65 0a 65 78 69 74  |x))/p".done.exit|
00000070  0a 1f 8b 08 00 45 4c 7a  56 02 03 53 50 50 50 88  |.....ELzV..SPPP.|
00000080  8f 87 11 0a 5c 40 5c 03  44 f1 35 60 5a 81 2b 3e  |....\@\.D.5`Z.+>|
00000090  1e c4 04 83 1a 20 9b 4b  17 c8 40 c2 5c 40 02 19  |..... .K..@.\@..|
000000a0  72 a1 72 75 b9 1e 35 4c  21 1e 01 00 f3 30 f0 f9  |r.ru..5L!....0..|
000000b0  8d 00 00 00                                       |....|
000000b4

4

PowerShell, 103 100 ตัวอักษร (105 ไบต์บนดิสก์, 102 w / o BOM)

สวยมากเช่นเดียวกับ@ user81655 วิธี

Param($c)'    __   __n   |  |_|  |n___|       |n-   n -n- n—'-split'n'|%{($_*15).Substring(0,15)*$c}

เวอร์ชันที่ไม่ดี

# Assign input to variable,
Param($c)

# Split array of wall parts and send them down the pipeline
'    __   __n   |  |_|  |n___|       |n-   n -n- n—' -split 'n' |
    ForEach-Object { # For each piece of wall
        ($_*15) # Repeat the line 15 times to create a complete wall line
        .Substring(0,15) # Each wall piece is only 15 characters long
        *$c # Repeat the wall n times
    }

ตัวอย่างการใช้งาน

PS> .\TrumpWall.ps1 3
    __   __        __   __        __   __    
   |  |_|  |      |  |_|  |      |  |_|  |   
___|       |______|       |______|       |___
-   -   -   -  -   -   -   -  -   -   -   -  
 - - - - - - -  - - - - - - -  - - - - - - - 
- - - - - - - -- - - - - - - -- - - - - - - -
—————————————————————————————————————————————

1
97 bytes:param($c);' __ __n | |_| |n___| |n- n -n- n—'-split'n'|%{-join($_*15)[0..14]*$c}
mazzy

4

PHP 5.4, ( 182 175 ตัวอักษร)

foreach(['    __   __    ','   |  |_|  |   ','___|       |___','-   -   -   -  ', ' - - - - - - - ','- - - - - - - -','———————————————'] as$d)echo str_repeat($d,$argv[1])."\n";

เวอร์ชันที่ไม่ดี

$s=['    __   __    ',
    '   |  |_|  |   ',
    '___|       |___',
    '-   -   -   -  ',
    ' - - - - - - - ',
    '- - - - - - - -',
    '———————————————'
];
foreach($s as $d) {
    echo str_repeat($d,$argv[1])."\n";
}

[7 ตัวละครที่บันทึกไว้โดยทำตามคำแนะนำ Blackhole ]

อีกรุ่นหนึ่งที่มีไบต์น้อยกว่า แต่มีอักขระมากกว่าตัว

PHP 5.4, (176 ตัวอักษร, 178 ไบต์)

foreach(['    __   __    ','   |  |_|  |   ','___|       |___','-   -   -   -  ',' - - - - - - - ','- - - - - - - -',str_repeat('—',15)] as$d)echo str_repeat($d,$argv[1])."\n";

เพียงแค่แทนที่ m-dash 15 อินสแตนซ์ด้วยหนึ่งขีดด้วยฟังก์ชัน str_repeat


2
1) ไม่กำหนดตัวแปรสำหรับ$sใช้งานได้โดยตรงในวงของคุณ: foreach([…,…] as $d)2) นำเว้นแต่พื้นที่ก่อน$d: foreach(… as$d)3) "\n"ใช้บรรทัดใหม่แทน
Blackhole

คุณไม่ได้แสดงความจริง รหัสของคุณมีอักขระ 182 ตัว แต่ 212 ไบต์
Tschallacka

@MichaelDibbets ขอโทษที่สับสนเกี่ยวกับไบต์เทียบกับตัวละครแก้ไข
kuldeep.kamboj

1
ใช้บางอย่างเช่นmothereff.in/byte-counterเพื่อนับจำนวนไบต์
Tschallacka

3

C, 148 ไบต์

#define q 16843009
i;p[]={-1,q*17,q*68,q*16,-8388417,8577152,3936000};
f(n){for(i=n*105;i--;i%(15*n)||puts(""))putchar(" -|_"[p[i/15/n]>>i%15*2&3]);}

คะแนนไม่รวมบรรทัดใหม่ที่ไม่จำเป็นก่อนf(n)ที่จะรวมไว้เพื่อความชัดเจน

หมายเลขเวทย์มนตร์ในการpเข้ารหัสอักขระสำหรับกำแพงในฐาน 4 ซึ่งสร้างขึ้นใหม่จากสตริง" -|_" 0,1,2,3 ตามลำดับ

168430090x1010101ในฐานสิบหกคือ สิ่งนี้ใช้สำหรับบรรทัดที่มี-ในนั้น

เพราะ_จะถูกเข้ารหัสโดย3บรรทัดด้านล่างสามารถเข้ารหัสเป็นเพียงซึ่งเป็นจำนวนที่มีทุกบิตที่กำหนดให้-11


ดี แต่คุณสามารถบันทึกได้ 3 ไบต์โดยไม่ได้ใช้งาน#define qและเพียงเข้ารหัสค่า
Johan du Toit

2

Vitsy , 121 ไบต์

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

V0v7\[v1+v&V\[vDvm]a]y\[?Z]
"    __   __    "
"   |  |_|  |   "
"___|       |___"
4\["-   "]Xr
6mXr" "
8\["- "]X
"—"e\D

ลองออนไลน์!


2

PHP5.5, 182 172 ไบต์ 168 ไบต์

ตามคำตอบของ @ kuldeep.kamboj ซึ่งจริงๆแล้วเป็น 212 ไบต์ในขณะที่ฉันเขียน แต่ 182 ตัวอักษร ฉันหวังว่ากำแพงจะสูงขึ้นเล็กน้อยจากนั้นฉันสามารถเพิ่มประสิทธิภาพได้อีก ;-)

อันนี้เป็น 168 ไบต์ขอบคุณ @ JörgHülsermann

$r='str_repeat';$d=$r(' -',7);$x='   ';foreach(["$x __   __ $x","$x|  |_|  |$x","___|$x$x |___","-$x-$x-$x-  ","$d ","-$d",$r('—',15)] as$z){echo$r($z,$argv[1])."
";}

อันนี้เป็น 172 ไบต์

$r='str_repeat';$d=$r(' -',7);$x=$r(' ',3);foreach(["$x __   __ $x","$x|  |_|  |$x","___|$x$x |___","-$x-$x-$x-  ","$d ","-$d",$r('—',15)] as$z){echo$r($z,$argv[1])."
";}

อันนี้คือ 182 ไบต์ :-)

$r='str_repeat';$d=$r(' -',7);$x=$r(' ',4);foreach([$x.'__   __'.$x,'   |  |_|  |   ','___|       |___','-   -   -   -  ',$d.' ','-'.$d,$r('—',15)] as$z){echo $r($z,$argv[1]).'
';}

รุ่นที่ไม่ได้ถูกดัดแปลง

$r='str_repeat';
$d=$r(' -',7);
$x=$r(' ',3);
$s=["$x __   __ $x",
    "$x|  |_|  |$x",
    "___|$x$x |___",
    "-$x-$x-$x-  ",
    "$d ",
    "-$d",
    $r('—',15)
];
foreach($s as $z) {
  echo$r($z,$argv[1])."
";
}

ลบช่องว่างออกก่อนที่จะเป็นและลบวงเล็บ -3 Bytes
JörgHülsermann

$x=$r(' ',3);สามารถย่อให้เหลือ$x=' ';
JörgHülsermann

คุณไม่จำเป็นต้องใช้วงเล็บสำหรับห่วง foreach และ `เป็น $ z` สามารถเขียนเป็นas$z
JörgHülsermann

2

Python 3, 132 122 120 ไบต์

def f(n):[print((s*15*n)[:15*n])for s in['    __   __    ','   |  |_|  |   ','___|       |___','-   ', ' -', '- ', '—']]

Ungolfed:

def f(n):
    [print((s*15*n)[:15*n])for s in['    __   __    ',
                                    '   |  |_|  |   ',
                                    '___|       |___',
                                    '-   ',
                                    ' -',
                                    '- ',
                                    '—']]

คุณสามารถลบช่องว่างเพื่อรับ)for s in[...
Cyoce

2

Python 2, (161 ตัวอักษร, 191 ไบต์)

x=input();a=['    __   __    ','   |  |_|  |   ','___|       |___','-   -   -   -  ',' - - - - - - - ','- - - - - - - -','———————————————']
for i in a:print i*x

2

SOGL V0.12 , 32 ไบต์

→↔\ιδ»►℮⁰}▒║ΙOģΠp~⁵‘ ¾“ζ'¹*+'¹n*

ลองที่นี่!

คำอธิบาย:

...‘ ¾“ζ'¹*+'¹n*
...‘              push a string of the top 6 lines of 1 wall piece (no newlines)
     ¾“           push 8212
       ζ          convert to char from unicode codepoint
        '¹*       repeat 15 times
           +      add that to the previous compressed string
            '¹n   split into lines with length 15
               *  repeat horizontally input times

กลับไปที่คำถามศิลปะ ASCII ทั้งหมดและ upvotes dzamia สำหรับตีฉันทั้งหมดด้วย SOGL ในบางจุด
Magic Octopus Urn

1

เป็นกลุ่ม, 90 ปุ่ม

สมมติว่าอินพุตอยู่ในบัฟเฟอร์ด้วยตัวเองต่อไปนี้จะทำงาน (ขึ้นบรรทัดใหม่เพื่อการอ่านเท่านั้น)

"aDi    __   __    ^M   |  |_|  |   ^M___|       |___^M^[
4i-   ^[xo-^[Y7P8JY2PxA ^[GVr^K-M^Vgg$d@aP

ที่^Mเป็นreturn, ^[คือescape, ^Kเป็นctrl+kและเป็น^Vctrl+v

สิ่งนี้มีโอกาสมากที่จะทำให้กอล์ฟลงได้เล็กน้อยเนื่องจากอาจมีวิธีที่ดีกว่าในการสร้างรูปแบบ


0

Java 11, 236 235 231 229 ไบต์

n->{String w[]={"","","","","","",""},t="- ".repeat(7);for(;n-->0;w[0]+="x __x__x ",w[1]+="x|  |_|  |x",w[2]+="___|xx |___",w[3]+="-x-x-x-  ",w[4]+=" "+t,w[5]+=t+"-")w[6]+="_".repeat(15);return"".join("\n",w).replace("x","   ");}

ลองออนไลน์
หมายเหตุ: Java 11 ยังไม่ได้อยู่ใน TIO ดังนั้นจึงString.repeat(int)ได้รับการจำลองด้วยrepeat(String,int)(สำหรับจำนวนไบต์เดียวกัน)

คำอธิบาย:

n->{                                // Method with integer parameter and String return-type
  String w[]={"","","","","","",""},//  Start with seven empty rows
         t="- ".repeat(7);          //  Temp String to reduce bytes
  for(;n-->0;                       //  Loop `n` amount of times:
    w[0]+="x __x__x ",              //   Append to the first row
    w[1]+="x|  |_|  |x",            //   Append to the second row
    w[2]+="___|xx |___",            //   Append to the third row
    w[3]+="-x-x-x-  ",              //   Append to the fourth row
    w[4]+=" "+t,                    //   Append to the fifth row
    w[5]+=t+"-")                    //   Append to the sixth row
    w[6]+="_".repeat(15);           //   Append to the seventh row
  return"".join("\n",w)             //  Join all rows by new-lines
          .replace("x","   ");}     //  Then replace all "x" with three spaces,
                                    //  and return the result

0

ไฟล์ Powershell +, 92 ไบต์

บันทึก powershell ไปที่get-trumpwall.ps1(40 ไบต์)

param($c);gc f|%{-join($_*15)[0..14]*$c}

บันทึกไฟล์ข้อมูลที่มีชื่อfและข้อมูลที่มีสัญลักษณ์ Unicode และ Linux LF เท่านั้น (52 ไบต์):

    __   __
   |  |_|  |
___|       |
-   
 -
- 
—

การถ่ายโอนข้อมูล hex:

0000000000: 20 20 20 20 5F 5F 20 20 │ 20 5F 5F 0A 20 20 20 7C      __   __◙   |
0000000010: 20 20 7C 5F 7C 20 20 7C │ 0A 5F 5F 5F 7C 20 20 20    |_|  |◙___|
0000000020: 20 20 20 20 7C 0A 2D 20 │ 20 20 0A 20 2D 0A 2D 20      |◙-   ◙ -◙-
0000000030: 0A E2 80 94             │                          ◙—››

ตัวอย่างการใช้งาน

PS> .\get-trumpwall.ps1 5
    __   __        __   __        __   __        __   __        __   __
   |  |_|  |      |  |_|  |      |  |_|  |      |  |_|  |      |  |_|  |
___|       |______|       |______|       |______|       |______|       |___
-   -   -   -  -   -   -   -  -   -   -   -  -   -   -   -  -   -   -   -
 - - - - - - -  - - - - - - -  - - - - - - -  - - - - - - -  - - - - - - -
- - - - - - - -- - - - - - - -- - - - - - - -- - - - - - - -- - - - - - - -
———————————————————————————————————————————————————————————————————————————
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.