Zwiń ascii-art

12

Wyzwanie

Biorąc pod uwagę prostokątną siatkę drukowanych znaków ascii jako ciąg znaków lub standardowe wejście, napisz funkcję lub program, który zwinie znaki spacji w stos na dole.

Zasady:

  • Dane wyjściowe mają takie same wymiary i znaki jak dane wejściowe.
  • Ma charakteru miejsca na (row a,column b)nie mogą mieć znak spacji ' 'na (a-1, b), (a-1,b-1)lub (a-1,b+1), w którym wiersze są numerowane od dołu skrajnej. Powoduje to, że wszystkie stosy pionowe powinny zwinąć się na boki.
  • Postać niebędąca spacją może podróżować w większości (initial height - final height)miejsc w lewo lub w prawo (patrz ryc. 1).
  • Możesz założyć, że obraz ma wystarczająco dużo miejsca, aby zwinąć się bez znaków wypadających z ekranu.

Ryc. 1: możliwe końcowe lokalizacje dla postaci @#$pokazanych x,y,zodpowiednio jako.

..............
...@..........
..xxx.........
.xxxxx...#....
xxxxxxx.yyy.$.

Kolejność zwijania się postaci można dowolnie wybierać. Końcowe spacje nie są w porządku, ale końcowe znaki nowej linii są.

To jest , więc wygrywa najkrótsza odpowiedź w bajtach!

Przykład

                 (__)
                 (oo)
           /------\/
          / |    ||
         *  /\---/\
            ~~   ~~
..."Have you mooed today?"...

Jedno możliwe wyjście:

 
 
 
                --(_
           /----|/|(o_)
          /|/~\---~\\/o)
..."Have*you~mooed~today?"...
Angs
źródło
Żeby wyjaśnić, sposób, w jaki wypadają znaki, może być za każdym razem zakodowany na stałe, a nie generowany losowo?
ETHprodukcje
18
Co ta krowa kiedykolwiek ci zrobiła? :(
FlipTack,
@ETHproductions to prawda. Mój przykład robi to od dołu do góry, od lewej do prawej, ale losowa kolejność lub coś innego jest w porządku, o ile zasady są przestrzegane.
Angs,
@ Flp.Tkc To tylko model.
Angs,
1
@DestructibleWatermelon, jeśli postać wypadnie z ekranu, to jej wina, a nie twoja.
Angs,

Odpowiedzi:

4

JavaScript (ES6), 100 90 88 bajtów

f=s=>s==(l=s.search`
`,s=s.replace(eval(`/(\\S)([^]{${l-1},${l+1}}) /`),` $2$1`))?s:f(s)
s=`                 (__)        
                 (oo)        
           /------\\/         
          / |    ||          
         *  /\\---/\\          
            ~~   ~~          
..."Have you mooed today?"...`
console.log(s)
console.log(f(s))

Wymaga, aby ciąg miał co najmniej dwie linie i wszystkie linie były dopełniane do równej długości. Dane wyjściowe dla przykładowego obrazu:

              ( --           
            /|---/|-(o__     
          */~~\---~\|\/o))   
..."Have you/mooed~today?"...

Zauważ, że gdy próbuje przesunąć elementy w prawo, jeśli to możliwe, *nie mieści się między Havei you.

Edycja: Oszczędność 10% dzięki produktom @ETH. Zaoszczędź kolejne 2 bajty dzięki @DanielIndie.

Retina 0.8.2 , 50 bajtów

+`(?<=(.)*)(\S)(.*¶(?<-1>)?(?>(?<-1>.)*).?) 
 $3$2

Wypróbuj online! Nieco inne podejście do mojej odpowiedzi JavaScript, ta grupa równoważąca dopasowuje spację poniżej znaku spacji; (?<-1>)?pozwala przestrzeń za jedną kolumnę w lewo, podczas gdy .?pozwala przestrzeń za jedną kolumnę w prawo.

Siatkówka , 40 bajtów

~0L$`.(.*)¶
+s`(\S)(.{$.1,$.&}) ¶ $$2$$1

Wypróbuj online! Port mojej odpowiedzi JavaScript. Stopień 0L$atomowy pobiera dane wejściowe i zastępuje dwie długości w drugim wierszu, co powoduje polecenie, które faktycznie wykonuje zamianę, która jest następnie oceniana na pierwotnym wejściu przez stopień ~złożony.

Neil
źródło
To świetny algorytm! Możesz zastąpić \ndosłownie nową linią, aby sprowadzić ją do dwóch cyfr ;-)
ETHproductions
Myślę też, że możesz tak l=s.search`\n` zaoszczędzić kilka bajtów.
ETHproductions
tio.run/##ZY/… 86 bajtów
DanielIndie
@DanielIndie f=Jest wymagany do rekurencji, ale wciąż oszczędza mi 2 bajty, dzięki!
Neil
masz rację, przepraszam: P
DanielIndie
3

Python 2, 298 bajtów

a=input()
L=len(a);s=' '
a=[list(s*L+l.ljust(L+max(map(len,a))))for l in a]
t=1
while t:
 t=0
 for y in range(L-1):
  for x in range(len(a[y])):
   c=a[y][x];C=a[y+1][x-1:x+2]
   if s!=c and s in C:t=1;a[y][x]=s;a[y+1][[[x+1,x][C[1]==s],x-1][C[0]==s]]=c
for l in map(''.join,a):print l[L:].rstrip()

Pobiera dane wejściowe jako listę ciągów znaków (po jednym w wierszu)

Przykład: dane wejściowe:

['                 (__)',
'                 (oo)',
'           /------\/',
'          / |    ||',
'         *  /\---/\ ',
'            ~~   ~~',
'..."Have you mooed today?"...']

Wynik:

              (
            -----/|-(o__
         //|~~\---~\|\/o))
..."Have*you/mooed~today?"...
TFeld
źródło
3

C, 252 bajtów

e=1,l,c,i,j,p,r,w,a[999];f(){while((i=getchar())>0)a[w++]=i,i<16?l++:0,l?0:c++;while(e)for(i=e=0;i<c;i++)for(j=l;j>=0;j--)e=(r=a[p=j*(c+1)+i]-32?a[r=p+c+1]-32?a[r=p+c]-32?a[r=p+c+2]-32?0:r:r:r:0)?l=a[p],a[p]=a[r],a[r]=l:e;for(i=0;i<w;)putchar(a[i++]);}

Nie testowany kod testu:

#include <stdio.h>

e=1,l,c,i,j,p,r,w,a[999];
f()
{
    // counting lines and columns
    while ((i = getchar())>0)a[w++] = i, i<16 ? l++ : 0, l ? 0 : c++;
    // main shaking loop
    while (e) // repeat while collapsing
        for (i = e = 0; i < c; i++) // columns loop
            for (j = l; j >= 0; j--) // lines loop
                e = ( // remember that collapsing was
                     r = // find place to collapse
                         a[p = j*(c + 1) + i] - 32 ? // if not space
                             a[r = p + c + 1] - 32 ? // if char under the current is not a space
                                 a[r = p + c] - 32 ? // see one position left
                                    a[r = p + c + 2] - 32 ? 0 // then one position right
                                                          : r
                                    : r
                                 : r
                             : 0
                         ) ? // and if place was found
                           l=a[p],a[p]=a[r],a[r]=l // replace values in positions p and r
                           : e;
    //print resulting picture
    for(i=0;i<w;)putchar(a[i++]);
}

int main(void)
{
    int cnt;
    FILE * testf = fopen("caw.txt","w");
    char testd[][31] = {
        "                 (__)        \n",
        "                 (oo)        \n", 
        "           /------\\/         \n", 
        "          / |    ||          \n", 
        "         *  /\\---/\\          \n", 
        "            ~~   ~~          \n", 
        "...\"Have you mooed today ? \"...",
        "" };
    // prepare data for test
    printf("Initial data:\n");
    for(cnt = 0; cnt < 7; cnt++)
    {
        printf("%s", testd[cnt]);
        fprintf(testf, testd[cnt]);
    }
    fclose(testf);
    // redirect standard input
    freopen("caw.txt", "r", stdin);
    printf("\n\nResult:\n");
    // start test
    f();
}

Wynik testu:

wprowadź opis zdjęcia tutaj

VolAnd
źródło
2

Algodoo (niekonkurujący)

Dane wejściowe - zastosowano zdegenerowany przykład.

Ustawiać

Runnning - domyślna grawitacja i odbijanie.

Bieganie

Wyjście - dokładność można regulować za pomocą ustawień tarcia i gęstości na obiektach.

Wynik

Algodoo jest programowalną logiką .

wyldstallyns
źródło
Dlaczego to nie konkuruje? Niekonkurencyjny jest zwykle zarezerwowany dla odpowiedzi w językach nowszych niż wyzwanie.
Ad Hoc Garf Hunter,
Chociaż Algodoo potrafi robić prawdziwą logikę, ta symulacja jest równoznaczna z upuszczeniem niszczącego wydruku na wejściu na podłogę i zrobieniem mu zdjęcia. Nie jestem pewien od razu, jak uchwycić te dane wyjściowe w sposób zautomatyzowany.
wyldstallyns,
I błędem było powiedzieć „program zero bajtów! Wygrywam!”
wyldstallyns,
Podejrzewam, że tak naprawdę nie jest to odpowiedź zero-bajtowa. Mówisz o dostosowywaniu ustawień, które wydają się być odpowiednikiem pisania kodu. Dobrym pomysłem może być otwarcie meta pytania na temat oceny Algodoo. Nie sądzę też, żeby coś było nie tak z programem zero-bajtowym.
Ad Hoc Garf Hunter,
Otworzę tę meta.
wyldstallyns,
1

JavaScript, 286 bajtów

b=>eval('f=b=>b==null||" "==b;b=b.split`\n`.map(b=>[...b]);a:for(;;){for(c=0;c<b.length-1;c++)for(g=b[c],d=0;d<g.length;d++){h=g[d];if(!f(h)){e=0;f(b[c+1][d])?e=2:f(b[c+1][d-1])?e=1:f(b[c+1][d+1])&&(e=3);if(e){b[c+1][d+e-2]=h;b[c][d]=" ";continue a}}}break}b.map(b=>b.join``).join`\n`')

Przykłady

// Here I assume that you've assigned the above function to `fall`
console.log(fall(`
                 (__)
                 (oo)
           /------\/
          / |    ||
         *  /\---/\\
            ~~   ~~
..."Have you mooed today?"...`))

Wynik:

                -       
            /--(-\--(__  
          /|~~---/~||/oo))
..."Have*you/mooed~today?"...

Inny przykład:

console.log(fall(`
 (\__/)  .~    ~. ))
 /O O  ./      .'
{O__,   \    {
  / .  . )    \\
  |-| '-' \    }
 .(   _(   )_.'
'---.~_ _ _&`))

Wynik:

    _ , /            
  OO/__'_.. .         
 {.(|-|.(O'))/.~{      
/('---.~___-_&)_.'}\~.'))

Funkcja bez golfa

function fall(input) {
  let move = true
  let lines = input.split("\n").map(line => line.split(""))
  let isSpace = c => c == null || c == " "
  loop: for (;;) {
    for (let y = 0; y < lines.length - 1; y++) {
      let line = lines[y]
      for (let x = 0; x < line.length; x++) {
        let ch = line[x]
        if (!isSpace(ch)) {
          let dx = 0
          if (isSpace(lines[y+1][x])) { dx = 2 }
          else if (isSpace(lines[y+1][x-1])) { dx = 1 }
          else if (isSpace(lines[y+1][x+1])) { dx = 3 }
          if (dx) {
            lines[y + 1][x + dx - 2] = ch
            lines[y][x] = " "
            continue loop
          }
        }
      }
    }
    break
  }
  return lines.map(line => line.join("")).join("\n")
}
Florent
źródło
Krótka droga do badania nie jest puste c>" ", gdzie csymbolizuje postać jest testowane.
Neil