Песочные часы вызов

43

Песочные часы

У этих песочных часов есть 60 «песков времени», и они полностью заполняют каждую камеру. Часы имеют 19 символов в ширину и 13 символов в высоту. Каждая камера имеет 5 рядов песка, и в центре есть ряд, в котором может содержаться 1 песок. Верхний ряд может содержать 17 песков, следующий 15 и так далее (см. Ниже). Пески падают в нижнюю камеру со скоростью один песок в секунду.

       START                     3 SECONDS LATER               38 SECONDS LATER

███████████████████            ███████████████████            ███████████████████
█.................█   17       █..............   █   14       █                 █    0
██...............██   15       ██...............██   15       ██               ██    0
███.............███   13       ███.............███   13       ███.......      ███    7  
█████.........█████   09       █████.........█████   09       █████.........█████   09 
███████.....███████   05       ███████.....███████   05       ███████.....███████   05 
█████████.█████████   01       █████████.█████████   01       █████████.█████████   01 
███████     ███████            ███████  .  ███████            ███████  .  ███████  
█████         █████            █████    .    █████            █████    .    █████   
███             ███            ███      .      ███            ███....         ███
██               ██            ██               ██            ██...............██  
█                 █            █                 █            █.................█  
███████████████████            ███████████████████            ███████████████████

Соревнование

Отобразите песочные часы (без цифр или заголовков) по истечении определенного периода времени (0 ≤ t ≤ 60).

Правила кодирования

  1. Песочные часы должны выглядеть точно так, как показано здесь. Вы можете заменить █символ и / или .символ тем, что вам нравится, в соответствии с вашим языком (Unicode, проблемы совместимости ASCII).
  2. На входе должно быть число, например 45 или 7. По прошествии этих секунд на дисплее появятся часы.
  3. Вывод может быть отображен или сохранен в файл. Никакого дополнительного текста или меток, как показано выше, не требуется - только песочные часы - это все, что нам нужно.
  4. Если пользователь вводит t> 60, вам не нужно обрабатывать ошибку.

Точки

  1. Самый короткий код выигрывает.
code-golf ascii-art Рене Лидер
источник
Я не знаю, только ли это я, но песочные часы выглядят совершенно иначе в редакторе, чем в самом посте. Это, вероятно, потому, что символ █ не отображается с правильной шириной.
Деннис
1
Касается ли песчинка текущего слоя, а затем выравнивается по левому краю через секунду?
xnor
2
Каким должен быть вывод при t == 59?
edc65
3
Поздравляю с составлением списка вопросов о горячей сети Stack Exchange!
Алекс А.
1
Это не совсем ответ, так как он не соответствует спецификациям, но посмотрите здесь на представление в Desmos. (Нажмите кнопку воспроизведения и установите скорость 0,15x в течение ~ 1 единицы / секунда)
Конор О'Брайен,

Ответы:

27

JavaScript ( ES6 ), 203 208 233 270 256 символов

Редактировать Пересмотрено, используя цикл вместо последовательности вызовов.

Редактировать Добавлен верхний и нижний ряд, которые отсутствовали.

Функция, возвращающая вывод. Запустите фрагмент в Firefox для проверки.

f=w=>[h='█'[R='repeat'](19),...[17,15,13,9,5,1,5,9,13,15,17].map((d,i)=>(t=i>5?-v:v,v-=i<5?d:1-d,e=' '[R](d/2),b='█'[R](10-d/2),b+('.'[R](t<d&&d-t)+e+' .'[i>4&w>i-6&t>=d|0]+e).slice(0,d)+b),v=w),h].join`
`

// Less golfed
F=
w=>[h='█'.repeat(19),
    ... [17, 15, 13, 9, 5, 1, 5, 9, 13, 15, 17].map(
     (d,i) => (
       t = i>5 ? -v : v,
       v -= i<5 ? d : 1-d, 
       e = ' '.repeat(d / 2),
       b = '█'.repeat(10 - d / 2),
       b + 
        ('.'.repeat(t < d && d - t) 
         + e + ' .'[i > 4 & w > i-6 & t >= d | 0]
         + e).slice(0,d)
       + b
     ), v = w
    ),
    h].join('\n')

// TEST            

O.innerHTML=f(+I.value)

function tick(d) {
  var i=+I.value+d
  I.value=i
  O.innerHTML=f(i)
}

var int=0;

function auto()
{
  function go()
  {
    var t = I.value;
    O.innerHTML=f(++t)
    if (t>70)t=0;
    I.value = t;
  }
  if (A.checked && !int)
  { 
    int = setInterval(go, 200);
  }
  else if (!A.checked && int)
  {
    clearInterval(int);
    int = 0;
  }
}
input[type=text] { width: 3em }
<button onclick='tick(-1)'>-</button>
<input type=text id=I value=0 onchange='tick(0)' >
<button onclick='tick(1)'>+</button>
<input type=checkbox id=A onclick='auto()'>Fly time
<pre id=O><pre>
Развернуть фрагмент

edc65
источник
5
Для моего любопытства, почему это было отвергнуто дважды? Я не могу найти никаких проблем с этим.
manatwork
Этот ответ потрясающий ! Откройте его в Firefox, люди!
Кристиан Лупаску,
1
Хороший ответ, но кажется, что верх и основание песочных часов отсутствуют.
Рене Лидер
@manatwork не уверен (конечно), но действительно был недостаток
edc65
Пожалуйста, сделайте setInterval (), для этого отлично подойдет javascript:setTimeout( tick, 1000);
Martijn
18

Python 2, 200

t=input()+1
s=' '*t+'.'*60+' '*70
n=0
d=sum((1<t<56,2<t<48,3<t<36,4<t<22))
for c in'ctrplhdhlprtc':i=ord(c)-99;print[s[n+i:n:-1],[s[180-n-i+d:][:i],'.'][5+d*3>i>0]][n>59].center(i).center(19,'#');n+=i

xnor сделал 197- байтовую версию в чате .

Я бы опубликовал объяснение, но я потерял представление о том, как это на самом деле работает ...

Также, вот анимированная версия с проклятиями:

песочные часы

from curses import*
w=initscr()

for t in range(1,61):
    s=' '*t+'.'*60+' '*70
    n=0
    d=sum((1<t<56,2<t<48,3<t<36,4<t<22))
    for i in 0,17,15,13,9,5,1,5,9,13,15,17,0:w.addstr([s[n+i:n:-1],[s[180-n-i+d:][:i],'.'][5+d*3>i>0]][n>59].center(i).center(19,'#')+"\n");n+=i
    w.refresh()
    w.clear()
    napms(999)

endwin()
GRC
источник
1
Спасибо, вы заставили меня обнаружить, что у строк есть метод center ()!
Дитер
13

Python 2.7, 362 356 347

e,c,x,a,b,n=' .#ab\n';R,r,s,l,T,m=range,str.replace,'',19,[1,2,3,5,7,9],-1
for t in[T,T[:m][::m]]:s+=''.join([n+x*y+c*(l-y*2)+x*y for y in t]);c=b
s=list(s)
for i in R(130,220,20):s[i]=a
for _ in R(input()):s[s.index('.')]=e;i=s.index(a)if a in s else 219-s[::m].index(b);s[i]='.'
for l in(x*l+r(r(''.join(s),a,e),b,e)+n+x*l).split(n):print l[::m]

песочные часы

Выход за 38 секунд:

###################
#                 #
##               ##
###.......      ###
#####.........#####
#######.....#######
#########.#########
#######  .  #######
#####    .    #####
###...   .      ###
##...............##
#.................#
###################
Dieter
источник
2
Что это за код Python? Я хотел бы научиться кодировать, как они. Пожалуйста, ведите в правильном направлении.
Раджат Саксена
1
Я не уверен, что это правильный ответ. Если вы посмотрите на пример, который он сделал за 38 секунд, вы увидите, что самая низкая точка, которая все еще падает, находится не на линии, где точки совпадают. (в 4-й строке снизу, в центре)
RononDex,
3
@RononDex: Как объяснено в комментариях к вопросу, порядок заполнения не такой строгий - моя реализация придерживает песчинки влево, немного отличаясь от вопроса, но все еще действительна
dieter
3

С 544

Вот что у меня пока есть для решения C.

#include <stdio.h>
int main(int z,char **a){int r,i,y=i=0,v,d,t,m,s=atoi(a[1]),n[13]={0,43,28,15,6,1,0,1,5,13,25,39,0};char H[13][20];while(y<13){int x,b=x=i=0;v=y-6;t=3+abs(v);m=2*abs(v);d=t<m?t:m;d=9-d;if(d==0)d=10;while (b<d){H[y][b]='#';H[y][18-b]='#';b++;}while(x<19-2*b){if(x<=s-n[y])H[y][x+b]=v>0?' ':'.';else H[y][x+b]=v>0?'.':' ';x++;}if(s>58)r=0;else if(s==58)r=1;else if(s==57)r=2;else if(s==56)r=3;else if(s>38)r=4;else if(s>24)r=3;else if(s>12)r=2;else if(s>4)r=1;while(i<r){H[7+i][9]='.';i++;}H[y][19]='\n';y++;}fputs(H,stdout);}

Скомпилировано с помощью следующей команды:

gcc -w -o hourglass hourglass.c  // I realize I should have cast H as a char *, but since it works this way, I just decided to suppress the error from the compiler instead to save space.

Надо признать, что этот язык имеет большой объем - включение оператора было небольшим препятствием, исходящим прямо из блоков, но я действительно искал повод для практики использования C.

Я надеюсь, что вам понравится мое решение, и дайте мне знать, если вы видите пути улучшения.

Мартин
источник
2
Есть много способов улучшить, сделать его хуже, но намного короче.
edc65
1
Подсказки: forвместо того , чтобы where, ?:вместо того if else, глобальный переменный ИНТ не нужно int, includeне нужно. (Мне нравится твоя математика)
edc65
1
317: r,i,y,x,b,d,n[]={0,43,28,15,6,1,0,1,5,13,25,39,0};char H[14][20];main(s,a)char**a;{for(s=atoi(a[1]);y<13;){b=x=i=0;d=abs(y-6);d+=3<d?3:d;d=9-d?9-d:10;r=s>55?59-s:s>38?4:s>24?3:s>12?2:s>4?1:r;for(;b<19;)H[y][b++]=35;for(;x<19-2*d;x++)H[y][x+d]=(x>s-n[y]?" .":". ")[y>6];for(;i<r;)H[7+i++][9]=46;H[y++][b]=10;}puts(H);}(будьте осторожны, к длинным комментариям добавляются странные невидимые символы)
edc65
3

Matlab, 252 байта

Идея заключается в построении матрицы, которая выглядит следующим образом:

0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0
0  17  16  15  14  13  12  11  10   9   8   7   6   5   4   3   2   1   0
0   0  32  31  30  29  28  27  26  25  24  23  22  21  20  19  18   0   0
0   0   0  45  44  43  42  41  40  39  38  37  36  35  34  33   0   0   0
0   0   0   0   0  54  53  52  51  50  49  48  47  46   0   0   0   0   0
0   0   0   0   0   0   0  59  58  57  56  55   0   0   0   0   0   0   0
0   0   0   0   0   0   0   0   0  60   0   0   0   0   0   0   0   0   0
0   0   0   0   0   0   0 116 117  61 118 119   0   0   0   0   0   0   0
0   0   0   0   0 108 109 110 111  62 112 113 114 115   0   0   0   0   0
0   0   0  96  97  98  99 100 101  63 102 103 104 105 106 107   0   0   0
0   0  82  83  84  85  86  87  88  64  89  90  91  92  93  94  95   0   0
0  66  67  68  69  70  71  72  73  65  74  75  76  77  78  79  80  81   0
0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0

Оттуда легко заполнить записи строками, зависящими от n(заполнение всех записей, которые больше nи меньше, чем n+60с точками)

function c=f(n);
b=zeros(13,19);
z=[0,17,32,45,54,59];
y=-2:3;
for k=2:6;
    d=k+sum(k>4:5);
    b(k,d:20-d)=z(k):-1:z(k-1)+1;
    b(14-k,d:19-d)=68+(z(k-1):z(k)-2)-k;
end;
b(8:12,11:19)=b(8:12,10:18);
b(7:12,10)=60:65;c=[ones(13,19)*32,''];
c(~b)='¶';c(n<b)=46;c(b>n+60)=32

Ибо n=38мы получаем этот вывод:

¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶
¶                 ¶
¶¶               ¶¶
¶¶¶.......      ¶¶¶
¶¶¶¶¶.........¶¶¶¶¶
¶¶¶¶¶¶¶.....¶¶¶¶¶¶¶
¶¶¶¶¶¶¶¶¶.¶¶¶¶¶¶¶¶¶
¶¶¶¶¶¶¶  .  ¶¶¶¶¶¶¶
¶¶¶¶¶    .    ¶¶¶¶¶
¶¶¶...   .      ¶¶¶
¶¶...............¶¶
¶.................¶
¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶¶
flawr
источник
2

Ява, 712

Ввод берется из командной строки. Обрабатывает как отрицательные значения для времени, так и больше, чем требуется.

enum H{;public static void main(String[]r){int x=0,y=0,z=0,l,t=Integer.parseInt(r[0]);String b="",d="█",e=" ",f=".",n="\n",j,k,a="███████████████████"+n;int[]w={17,15,13,9,5},v;int[][]h=new int[10][];for(;x<5;){l=w[x];v=(h[x++]=new int[l--]);l/=2;v[l]=++z;for(y=0;y++<l;){v[l-y]=++z;v[l+y]=++z;}}for(z=0;x>0;){l=w[--x];v=(h[9-x]=new int[l--]);v[l/2]=++z;}for(;x<5;){l=(w[x]-1)/2;v=h[9-x++];for(y=0;y++<l;){v[l-y]=++z;v[l+y]=++z;}}p(a);for(x=0;x<5;x++){l=w[x];j=b;for(y=0;y++*2<19-l;)j+=d;k=b;for(y=0;y<l;)k+=t<h[x][y++]?f:e;p(j+k+j+n);}j="█████████";p(j+f+j+n);for(;x>0;){l=w[--x];j=b;for(y=0;y++*2<19-l;)j+=d;k=b;for(y=0;y<l;)k+=t<h[9-x][y++]?e:f;p(j+k+j+n);}p(a);}static void p(String s){System.out.print(s);}}

выход:

time: 0
███████████████████
█.................█
██...............██
███.............███
█████.........█████
███████.....███████
█████████.█████████
███████     ███████
█████         █████
███             ███
██               ██
█                 █
███████████████████

time: 1
███████████████████
█........ ........█
██...............██
███.............███
█████.........█████
███████.....███████
█████████.█████████
███████  .  ███████
█████         █████
███             ███
██               ██
█                 █
███████████████████

time: 9
███████████████████
█....         ....█
██...............██
███.............███
█████.........█████
███████.....███████
█████████.█████████
███████  .  ███████
█████    .    █████
███      .      ███
██       .       ██
█      .....      █
███████████████████

time: 41
███████████████████
█                 █
██               ██
███..         ..███
█████.........█████
███████.....███████
█████████.█████████
███████  .  ███████
█████    .    █████
███   .......   ███
██...............██
█.................█
███████████████████

Он заполняет песок из центра, расширяясь наружу. Я, вероятно, могу играть в гольф больше, если мне лень с тем, как он заполняет нижнюю половину и опустошает верхнюю. Но сейчас мне это очень нравится.

Джек Боеприпасы
источник
2

Haskell 512 байт

h=[17,15,13,9,5,1];b=drop 1$reverse h;n#s=[1..n]>>[s];s='.';n =' ';c q=(q#n)++(60-q)#s;f q|q<=5=q#s|3>2=g#s where{g=foldl i 5 (scanl (+) 0 h);i x y=if q>x+y then x-1 else x};e q=j#s++(59-length(k q)-(j))#n where{j=q-length(f q)};l q=c q++k q++(reverse$e q);p _ []=[];p x y=reverse(z++take q x++z):p (drop (head y) x) (tail y)where{q=head y;z=replicate(div (19-q) 2) '|'};k q= (concat.map(\x -> z x ++ "." ++ z x).take (length.f$q)$b)where{z x=(div x 2)#n};m n=mapM_ putStrLn $ t ++ p (l n) (h++b) ++ t;t=[19#'|']

вход m 55

Выход 

|||||||||||||||||||
|                 |
||               ||
|||             |||
|||||         |||||
|||||||.... |||||||
|||||||||.|||||||||
|||||||  .  |||||||
|||||.........|||||
|||.............|||
||...............||
|.................|
|||||||||||||||||||

Вход- m 48 выход

    |||||||||||||||||||
    |                 |
    ||               ||
    |||             |||
    |||||......   |||||
    |||||||.....|||||||
    |||||||||.|||||||||
    |||||||  .  |||||||
    |||||..       |||||
    |||.............|||
    ||...............||
    |.................|
    |||||||||||||||||||
брендер
источник
1
Добро пожаловать в PPCG! Я вижу, вы уже играли в эту игру совсем немного, но все еще остается много лишних пробелов, например. окружающих ++. Также вы можете сохранить несколько байтов, предварительно задав lengthи reverse.
Лайкони
1

C #, 382 410

все еще возможно уменьшить его на несколько байтов ...

class Program{static void Main(){int u=60-22,d=u,i,j,k,l,m;var c=new char[260];var r=new int[]{0,17,15,13,9,5,1,5,9,13,15,17,0,54,45,32,17,0};for(i=0;i<13;){m=0;l=(19-r[i])/2-1;for(j=19;j>=0;){k=i*20+j--;var b=j>=l&&j<r[i]+l;if(i>6&b)c[k-r[i]+m++ +m]=r[i+6]<d&&d-->0||j==8&r[i+6]>d&&d-->0?'.':' ';else c[k]=i<7&b?u-->1?' ':'.':'█';}c[++i*20-1]='\n';}System.Console.WriteLine(c);}}

Скрипач - 38сек

Fredou
источник
Круто! Как это принять вход?
Исаак
@isaacg, упс, я исправлю это позже сегодня, я знал, что это слишком мало для решения ac # :-), а пока
поменяй
Почему вы используете, int u=60-22а не только int u=38??
Dev-Masih
1

Рубин: 196 190 186 185 184 символов

u=[0,17,15,13,9,5].map{|i|(?.*i).center 19,?#}*$/
(?1..$*[0]).map{u[?.]=' '}
l=u.reverse
5.times{|i|l[p=i*20+9]==?.&&l[' ']&&(l[p]=?|)&&l[' ']=?.}
puts u,?#*9+?.+?#*9,l.tr('. | ',' .')

CW, потому что не соответствует в точности размещенным образцам, так как это потребляет песок, начиная слева. В основном просто демонстрация String.[]=метода.

Образец прогона:

bash-4.3$ ruby hg.rb 38
###################
#                 #
##               ##
###      .......###
#####.........#####
#######.....#######
#########.#########
#######  .  #######
#####    .    #####
###      .   ...###
##...............##
#.................#
###################

Рубин: 215 символов

Это генерирует точный требуемый результат:

u=[0,17,15,13,9,5].map{|i|(?.*i).center 19,?#}*$/
(?1..$*[0]).map{u[?.]=' '}
l=u.reverse
5.times{|i|l[p=i*20+9]==?.&&l[' ']&&(l[p]=?|)&&l[' ']=?.}
puts ([u,?#*9+?.+?#*9,l.tr('. | ',' .')]*$/).split($/).map &:reverse

Образец прогона:

bash-4.3$ ruby hg.rb 38
###################
#                 #
##               ##
###.......      ###
#####.........#####
#######.....#######
#########.#########
#######  .  #######
#####    .    #####
###...   .      ###
##...............##
#.................#
###################
манатворк
источник