Код гольф ABC: ASCII Box Challenge

14

Учитывая два положительных целых чисел, «A» и «B», выход ASCII - арт «ящик» , который через символы в ширину и б символов высотой. Например, с «4» и «6»:

****
*  *
*  *
*  *
*  *
****

Просто верно? Вот поворот: граница рамки должна состоять из чередующихся символов «a» и «b». Это начинается в верхнем левом углу и продолжается по часовой стрелке. Например, предыдущий пример с 4 и 6 должен быть

4646
6  4
4  6
6  4
4  6
6464

А и В могут быть двузначными числами. Например, входы «10» и «3» должны вывести это:

1031031031
1        0
3013013013

Для того чтобы вывод был относительно небольшим, вам не нужно поддерживать три или более цифр. Кроме того, поскольку входы ограничены положительными целыми числами, «0» является недопустимым входом, с которым вам не нужно обращаться.

Вот еще несколько тестов:

Input: (3, 5)
Output:

353
5 5
3 3
5 5
353

Input: (1, 1)
Output:

1

Input: (4, 4)
Output:

4444
4  4
4  4
4444

Input: (27, 1)
Output:

271271271271271271271271271

Input: (1, 17)
Output:

1
1
7
1
1
7
1
1
7
1
1
7
1
1
7
1
1

Input: (12, 34):
Output:

123412341234
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
4          1
3          2
2          3
1          4
432143214321

Вы можете принимать и выводить данные в любом приемлемом формате, а стандартные лазейки запрещены. Поскольку это код-гольф, выигрывает самый короткий ответ в байтах!

Джеймс
источник
Связанные
Джеймс
Должен ли я начать шаблон с левого верхнего угла по часовой стрелке?
Утренняя монахиня
@ LeakyNun Да, это необходимо.
Джеймс
Если a1, то левая или правая?
Утренняя монахиня
7
Разве первый пример не так? (3,5) должно быть 3 в ширину и 5 в высоту
Брайан

Ответы:

4

C #, 301 байт

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

Черт возьми, я нашел ошибку, когда нижняя строка была в неправильном порядке!

a=>b=>{var s=new string[b];int i=4,c=b-2,k=a;var t="";for(;i++<2*(a+b);)t+=t.EndsWith(a+"")?b:a;s[0]=t.Substring(0,a);if(b>2){for(i=0;++i<b-1;)s[i]=(a<2?t.Substring(1,c):t.Substring(2*a+c))[c-i]+(a>1?new string(' ',a-2)+t.Substring(a,c)[i-1]:"");for(;--k>=0;)s[b-1]+=t.Substring(a+c,a)[k];}return s;};

Старая версия: 280 байт

a=>b=>{var s=new string[b];int i=4,c=b-2;var t="";for(;i++<2*(a+b);)t+=t.EndsWith(a+"")?b:a;s[0]=t.Substring(0,a);if(b>2){for(i=0;++i<b-1;)s[i]=(a<2?t.Substring(1,c):t.Substring(2*a+c))[c-i]+(a>1?new string(' ',a-2)+t.Substring(a,c)[i-1]:"");s[b-1]=t.Substring(a+c,a);}return s;};
TheLethalCoder
источник
2

Python 2, 199 байт

w,h=input()
s=(`w`+`h`)*w*h
r=[s[:w]]+[[" "for i in[0]*w]for j in[0]*(h-2)]+[s[w+h-2:2*w+h-2][::-1]]*(h>1)
for y in range(1,h-1):r[y][w-1],r[y][0]=s[w+y-1],s[w+h+w-2-y]
print"\n".join(map("".join,r))
Loovjo
источник
2

Рубин, 128 байт

->w,h{s="%d%d"%[w,h]*q=w+h;a=[s[0,w]];(h-2).times{|i|a<<(s[2*q-5-i].ljust(w-1)+s[w+i,1])[-w,w]};puts a,h>1?(s[q-2,w].reverse):p}

Вывод трейлинга новой строки, если высота равна 1.

Идеальная ссылка: https://ideone.com/96WYHt

Leibrug
источник
1
Вы можете использовать [w,h]*""вместо "%d%d"%[w,h]4 байтов, и вам не нужны круглые скобки s[q-2,w].reverse, но тогда вам понадобится пробел после :, поэтому -1 байт.
Джордан
2

JavaScript, 213 212 202

c=>a=>{for(a=$=a,c=_=c,l=c*a*2,b=0,s=Array(l+1).join(c+""+a),O=W=s.substr(0,a),W=W.substr(0,a-2).replace(/./g," ");--_;)O+="\n"+s[l-c+_]+W+s[$++];return O+"\n"+[...s.substr(l-a-c+1,a)].reverse().join``}

Конечно, есть возможности для улучшения.

Изменить: Сохраненный байт благодаря TheLethalCoder

user2428118
источник
Я думаю, `${c}${a}`.repeat(l+1)может сэкономить вам байт.
Нил
О, и не W=W.substr(0,a-2).replace(/./g," ")так W=" ".repeat(a-2)ли? (Ваш код на самом деле работает a=1?)
Нил
2

C, 311 байт

char s[5];sprintf(s,"%d%d",a, b);int z=strlen(s);int i=0;while(i<a){printf("%c",s[i++%z]);}if(b>2){i=1;while(i<b-1){char r=s[(a+i-1)%z];char l=s[(2*a+2*b-i-4)%z];if(a>1){printf("\n%c%*c",l,a-1,r);}else{printf("\n%c",l);}i++;}}printf("\n");if(b>1){i=0;while(i<a){printf("%c",s[(2*a+b-i-3)%z]);i++;}printf("\n");}

Использует автоматически включенные библиотеки stdio.hи string.h.

ncke
источник
2

JavaScript (ES6), 171 байт

(w,h)=>[...Array(h)].map((_,i)=>i?++i<h?(w>1?s[p+p+1-i]+` `.repeat(w-2):``)+s[w+i-2]:[...s.substr(p,w)].reverse().join``:s.slice(0,w),s=`${w}${h}`.repeat(p=w+h-2)).join`\n`

Где \nпредставляет буквальный символ новой строки. Создает повторяющуюся строку цифр, а затем решает, что объединить, основываясь на том, в какой строке мы находимся; верхняя строка - это просто начальный фрагмент повторяющейся строки цифр, нижняя строка (если есть) - это обратный срез от середины строки, а промежуточные строки создаются с использованием символов, взятых из других частей строки.

Нил
источник
Вы можете использовать карри, переключившись (w,h)=>на w=>h=>сохранение байта
TheLethalCoder
0

TSQL, 291 байт

Golfed:

DECLARE @ INT=5,@2 INT=4

,@t INT,@z varchar(max)SELECT @t=iif(@*@2=1,1,(@+@2)*2-4),@z=left(replicate(concat(@,@2),99),@t)v:PRINT iif(len(@z)=@t,left(@z,@),iif(len(@z)>@,right(@z,1)+isnull(space(@-2)+left(@z,1),''),reverse(@z)))SET @z=iif(len(@z)=@t,stuff(@z,1,@,''),substring(@z,2,abs(len(@z)-2)))IF @<=len(@z)goto v

Ungolfed:

DECLARE @ INT=5,@2 INT=4

,@t INT,@z varchar(max)
SELECT @t=iif(@*@2=1,1,(@+@2)*2-4),@z=left(replicate(concat(@,@2),99),@t)

v:
  PRINT
    iif(len(@z)=@t,left(@z,@),iif(len(@z)>@,right(@z,1)
      +isnull(space(@-2)+left(@z,1),''),reverse(@z)))
  SET @z=iif(len(@z)=@t,stuff(@z,1,@,''),substring(@z,2,abs(len(@z)-2)))
IF @<=len(@z)goto v

скрипка

t-clausen.dk
источник
0

Python 3, 155 148 байт

Гольф от 7 дополнительных байтов:

p=print
def f(w,h):
 s=((str(w)+str(h))*w*h)[:2*w+2*h-4or 1];p(s[:w])
 for i in range(h-2):p(['',s[-i-1]][w>1]+' '*(w-2)+s[w+i])
 p(s[1-h:1-h-w:-1])

Заменены 2*w+2*h-4or 1на max(1,2*w+2*h-4)и ['',s[-i-1]][w>1]для (s[-i-1]if w>1else'').

Предыдущая версия:

p=print
def f(w,h):
 s=((str(w)+str(h))*w*h)[:max(1,2*w+2*h-4)];p(s[:w])
 for i in range(h-2):p((s[-i-1]if w>1else'')+' '*(w-2)+s[w+i])
 p(s[1-h:1-h-w:-1])
RootTwo
источник