Дом Деда Мороза

Примечание. Это первая задача, которую я попытался задать. Это было через Песочницу, однако, если вы обнаружите, что с ней что-то не так, пожалуйста, не просто понижайте голос, а оставляйте комментарий, чтобы я мог улучшить его.

Фон

Существует старая детская головоломка, в которой задача состоит в том, чтобы нарисовать коробку с крышей и крестиком через середину, не поднимая ручку из бумаги и не пересекая любую линию дважды.

В Германии это известно как "дас Haus Des Nikolaus" или "Дом Санта-Клауса". Я, честно говоря, не могу вспомнить, как мы это называли. Для тех, кто не знаком с загадкой, полная информация доступна здесь .

Вот ASCII художественное представление дома.

 /\
/__\
|\/|
|/\|
----

Вызов

Напишите программу или функцию, чтобы нарисовать дом Санта-Клауса на любом языке по вашему выбору.

Звучит слишком просто? Ну вот и подвох. Также необходимо вывести каждый этап розыгрыша и соответствовать правилам головоломки. Ваша программа не обязана принимать какие-либо данные. Готовый дом должен выглядеть точно так, как показано выше.

Согласно вышеуказанному сайту существует 44 возможных решения. Вы можете использовать любой из них. Это художественная задача ASCII, поэтому вам не нужно вычислять решение, а только рисовать его.

Выход

Пример требуемого вывода из одного из 44 решений показан ниже:

---- 

 \
  \
----

 __
 \
  \
----

  \
 __\
 \
  \
----

 /\
/__\
 \
  \
----

 /\
/__\
|\
| \
----

 /\
/__\
|\/
|/\
----

 /\
/__\
|\/|
|/\|
----

правила

• Я добавил 1 дополнительный символ новой строки между каждым ожидаемым выводом, чтобы попытаться прояснить требования. Это необязательно. Допускается любое количество пустых строк между каждым выводом.
• Ваш вывод должен состоять только из символов /, \, -, _ и пробела, как показано выше. Промежуточные пробелы разрешены.
• Каждая линия на вашем чертеже должна продолжаться с конца предыдущей строки, и вы не можете повторять какую-либо линию.
• Стандартные лазейки запрещены.
• Вы не обязаны выводить рифму, упомянутую в приведенной выше ссылке.
• Это код гольф, поэтому самый короткий ответ в байтах будет победителем.

Результат

Некоторые отличные ответы и спасибо и уважение всем, кто написал. Я сказал наименьшее количество байтов, но я отметил как лучший ответ не только за это, но и за отличное объяснение кода. Хороший один @ Деннис.

Желе , 40 39 36 байт

“ḥ%DtƊVḍI’ḃ9W;“|_/-\/\|‘Ė¤y@\FỌ»⁶s4Y

Попробуйте онлайн!

Как это устроено

“ḥ%DtƊVḍI’

является биективным основанием-буквал 250; каждый символ соответствует своей кодовой точке на кодовой странице желе . Результатом является целое число 13192938935880491074 .

          ḃ9

преобразует сгенерированное целое число в биективное основание 9, получая массив целых чисел
[9, 6, 7, 9, 6, 2, 2, 7, 1, 5, 3, 8, 1, 3, 5, 8, 4, 4, 4, 4] . Целые числа соответствуют порядку штриха, за исключением 9 , которое указывает пробел.

            W

заключает сгенерированный массив в одноэлементный массив, который потребуется для добавления его к массиву, который мы сейчас сгенерируем.

              “|_/-\/\|‘Ė¤

работает следующим образом. ¤объединяет две ссылки слева в ниладическую цепочку. Первый, “|_/-\/\|‘дает кодовые точки указанных символов, приводя к [124, 95, 47, 45, 92, 47, 92, 124] . Затем Ėперечисляет кодовые точки, получая
[[1, 124], [2, 95], [3, 47], [4, 45], [5, 92], [6, 47], [7, 92] , [8, 124]] . Пара [n, c] означает, что n- ^й штрих будет символом ASCII с кодовой точкой c .

             ;

объединяет сгенерированные массивы. Результатом является массив
[[9,6,7,9,6,2,2,7,1,5,3,8,1,3,5,8,4,4,4,4], [1,124 ], [2,95], [3,47], [4,45], [5,92], [6,47], [7,92], [8,124]] .

                          y@\

выполняет кумулятивное (т. е. показывает все промежуточные шаги) уменьшение с использованием транслитерации ( y) с замененными аргументами ( @). На первом этапе, например, мы заменяем каждую 1 в исходном массиве на 124 , что является кодовой точкой символа | ,

                             FỌ

выравнивает результат и заменяет все кодовые точки соответствующими символами ASCII. На всех этапах это создаст некоторые непечатаемые символы с кодовыми точками от 1 до 9 .

                               »⁶

принимает символьный максимум с пробелом, заменяя все непечатаемые символы пробелами.

                                 s4Y

разбивает сгенерированную строку на куски длиной четыре и объединяет их с переводом строки в качестве разделителя.

Javascript (ES6), 119 116 96 92 91 байт

for(i=8;i--;)console.log(`834
3554
2610
2160
7777`.replace(/./g,c=>'|/|/\\_\\- '[c<i?8:c]))

Пакет, 356 344 341 337 байт

@set s=@set "
%s%g=@goto 1
%s%r=
%s%c=
%s%u=|
%s%l=|
%s%f=
@for /l %%i in (1,1,7)do @call:%%i
%s%u=|\/|
%s%l=|/\|
%g%
:7
%s%u=|\/
%s%l=|/\
%g%
:6
%s%f=----
%g%
:5
%s%u=|\
%s%l=| \
%g%
:4
%s%c=/__\
%g%
:3
%s%r= /\
%s%c=/  \
%g%
:2
%s%r= /
%s%c=/
:1
@for %%l in ("%r%" "%c%" "%u%" "%l%" "%f%")do @echo(%%~l

Глупые |правила пакетного цитирования ... если вы хотите использовать a |в переменной, вам нужно заключить его в кавычки с тремя ^s, поэтому @вместо него дешевле использовать его и заменять при выводе, хотя для достижения этого я должен начать с левой стены. Первая строка имеет завершающий пробел. echo(используется потому r, что переменные c, и, fмогут быть пустыми, и мы не хотим ECHO is off.печатать.

Редактировать: Сохранено 12 байтов с использованием сквозного для последней части. Сохраняя 3 байта, используя forцикл для печати каждой части, это означает, что я теперь использую |s в своих переменных, что делает код немного легче для чтения. Сохранено 4 байта с использованием явных @символов вместо @echo off. Я думаю, что начиная с левой стены все еще требуется меньше байтов.

C 118 байт

main(){char *p,n;for(n='B';n++<'J';)for(p="ZFEAFDDEAGCHIAGHCIABBBBAA";*p;p++)putchar(" \n-\\_\\/|/|"[(*p<n)**p&15]);}

/// , 112 байт

/!/\/\///*/----
 !@/\\\\!$/ @@!^/
*@\/@@
@\/__@@
/*@
 $
*__
$
 $
*$
 __@
$
 $^$
 $^|@
|$^|@\/
|\/@^|@\/|
|\/@|
*

Попробуйте онлайн!

PHP, 98 95 байт

вдохновленный решением Арно

for($i=8;$i--;)for($p=24;$p--;)echo"|/|/\\_\\- 
"[($c="977779061290162945539438"[$p])<$i?8:$c];

Примечание: первая строка кода имеет завершающий пробел.

PHP с GD, 348 338 байт (не конкурирует)

не совсем то, что просили, но ...

function f($v,$w){global$x,$y,$i;imageline($i,$x,$y,$x=$v,$y=$w,1);ob_start();imagepng($i);$s=ob_get_clean();ob_end_clean();echo'<img src="data:image/png;base64,',base64_encode($s),'" > ';}$i=imagecreate($w=9,$h=$w+$z=$w/2);imagecolorallocate($i,255,255,255);f(--$w,$y=--$h);f(0,$z);f($w,$z);f($w/2,0);f(0,$z);f(0,$h);f($w,$z);f($w,$h);

сохранить в файл, позвонить в браузер

сломать

function f($v,$w)
{
    global$x,$y,$i;
    imageline($i,$x,$y,$x=$v,$y=$w,1);      // draw line, set end coords as new start coords
    ob_start();imagepng($i);$s=ob_get_clean();ob_end_clean();           // get image output
    echo'<img src="data:image/png;base64,',base64_encode($s),'" > ';    // print <img> tag
}
// calculate dimensions, create image, allocate background color (foreground implicitly black)
$i=imagecreate($w=9,$h=$w+$z=$w/2);imagecolorallocate($i,255,255,255);
// paint lines: implicit `$x=0`
f(--$w,$y=--$h);f(0,$z);f($w,$z);f($w/2,0);f(0,$z);f(0,$h);f($w,$z);f($w,$h);

Чтобы нарисовать больший дом, измените $w=9желаемую ширину.