Symulator grawitacji

33

Komunikat

Otrzymujesz kadr z serii kulek spadających na siatkę 2D. Ta siatka jest otoczona niezmiennymi i nietłukącymi się ścianami, więc cała zawarta w nich akcja. Twoim zadaniem jest ustalenie, jaki będzie stan scenariusza po tym, jak grawitacja zrobi wszystko, co w jego mocy.

Elementy wewnątrz siatki

  • - Podłoga nie zmienia kierunku spadających piłek.
  • \ Prawy suwak zmienia ścieżkę piłki o jedną (1) pozycję w prawo.
  • / Lewy suwak zmienia ścieżkę piłki o jedną (1) pozycję w lewo.
  • o Piłka.

Zasady

  • Piłki spadają.
  • Podłogi i zjeżdżalnie nie spadają .
  • Jeśli piłka uderzy w zjeżdżalnię, która sprawi, że przejdzie ona przez ścianę ( \#lub #/) lub przejdzie przez podłogę, zjeżdżalnia będzie działać jak podłoga.
  • Kiedy piłka uderza w inną piłkę, staje się jedną piłką, ale zwiększa swoją moc do sumy obu piłek.
  • Nowe kule (połączone) będą nadal zachowywać się jak zwykle.
  • Kiedy piłka nie może się już poruszać, jest zastępowana przez swoją siłę.
  • Moc piłki będzie zawsze wynosić najwyżej 9.

Wkład

Siatka zostanie podana w zmiennej łańcuchowej o dowolnej nazwie najkrótszej w wybranym języku. Domyślnie użyjemy ajako danych wejściowych. Próbka danych wejściowych dokładnie takich, jakie otrzymano:

##########\n# \      #\n#o       #\n#  - -\o #\n#/-    \ #\n#  \oo-/\#\n#-/ \   /#\n#   \ \  #\n#       /#\n##########

Aby wygenerować losowe siatki, użyj https://repl.it/B1j3/2 . Zamiast tego użyj mojej wygenerowanej strony (bez reklam, bez bzdur, tylko dane wejściowe i wyjściowe)

Uwaga podziały linii są \n. Wydruk danych wejściowych na ekranie (niewymagany w przypadku wyzwania) pokazałby takie rzeczy. Chociaż umieściłem cztery układanki obok w bezpiecznej przestrzeni.

##########  ##########  ##########  ##########
# \      #  # o    -/#  #       o#  #-o /    #
#o       #  #    \   #  # o     -#  #-- \ /\ #
#  - -\o #  #-  \    #  #    - \o#  # - -- o-#
#/-    \ #  #        #  #o /\    #  #/ \     #
#  \oo-/\#  #o  -o-  #  # /    -o#  #/ /o oo/#
#-/ \   /#  #   -/-  #  # -  o  -#  #o/      #
#   \ \  #  #    \\  #  #   \o  /#  #o-o    o#
#       /#  # \o\  /\#  #     \o #  # -\o o /#
##########  ##########  ##########  ##########

Wydajność

Ta sama siatka wydrukowana na ekranie z ostatecznym wynikiem siły kuli. Prawidłowa odpowiedź to jedna (1) z następujących łamigłówek, każda odpowiada wejściu w tej samej pozycji, oczywiście jeśli wejście jest inne, należy wyregulować wyjście. Nie ograniczaj się do tych czterech!

##########  ##########  ##########  ##########
# \      #  #      -/#  #       1#  #-1 /    #
#        #  #    \   #  #       -#  #-- \ /\ #
#1 - -\  #  #-  \    #  #    - \ #  # - --  -#
#/-    \1#  #        #  #  /\    #  #/ \     #
#  \  -/\#  #   -1-  #  # /    -2#  #/ /    /#
#-/ \   /#  #   -/-  #  # -     -#  # /      #
#   \ \  #  #    \\  #  #   \   /#  # -      #
#    2  /#  #1\2\  /\#  #2   2\1 #  #2-\3 23/#
##########  ##########  ##########  ##########

Wynik

Języki będą ze sobą konkurować, więc nie krępuj się używać języków obcych. Aby zweryfikować rozwiązanie, muszę być w stanie go gdzieś przetestować, aby zobaczyć, czy działa!

Wynik to liczba bajtów. W przypadku remisu wygrywa pierwsza odpowiedź na wynik remisowy.

Ostrzeżenia

  • Jeśli nie jestem pewien, jak piłka powinna zareagować, zapytaj mnie, a ja wyjaśnię, byłem tak jasny, jak tylko mogłem, ale jestem pewien, że są przypadki, które są mylące.
  • Slajdy są przejeżdżane tylko wtedy, gdy możesz z nich wyjść , pomyśl o tym jak o prawdziwym slajdzie. Na górze jest facet, który nie przepuści cię przez piłkę, chyba że wyjdzie przez drugą stronę.

Wyjaśniające przykłady ruchu piłki

######                       ######
#-o- #    BALL WOULD GO RD   #- - #
# \  #                       # \o #
######                       ######

######                       ######
#-o- #     BALL WOULD STAY   #-o- #
# \\ #                       # \\ #
######                       ######

######                       ######
#  -o#     BALL WOULD STAY   #  -o#
#   \#                       #   \#
######                       ######

######                       ######
#  o #     BALL WOULD STAY   #  o #
#  \/#                       #  \/#
######                       ######

######                       ######
#-o- #    BALL WOULD GO LD   #- - #
# /\ #                       #o/\ #
######                       ######

AKTUALIZACJE

Jak mogę sprawdzić, czy moja odpowiedź jest prawidłowa?

Utworzyłem prostą stronę na jednej z moich stron, która da ci losową łamigłówkę i jej odpowiedź. Weź dane wejściowe i sprawdź je względem danych wyjściowych. Moje rozwiązanie, nie martwiąc się zbytnio o grę w golfa, to Python (generator, a także strona Python)389b 355b

Tabela liderów

Pokaż fragment kodu

code-golf ascii-art grid simulation Juan Cortés
źródło
1
Przypomina mi się Marbelous .
Arcturus,
10
Punkty bonusowe, jeśli ktoś odpowie w Marbelous.
Mego
Borderline dupe A Mere Bagatelle and Not Your Routine Bean Machine
Peter Taylor
brzmi jak potencjalnie ascii-
artowa
@ JuanCortés dlaczego nie użyjesz fantazyjnego kodu tabeli liderów, abyś sam nie musiał aktualizować rankingu?
usandfriends

Odpowiedzi:

6

JavaScript (ES6), 157 196

Edytuj znak po znaku zamiast po wierszu, znacznie lepszy wynik

g=>(s=~g.search`
`,g=[...g]).map((c,i)=>c<' '?0:g[[0,1,-1].map(d=>!d|'\\ /'[d+1]==g[d+=i]&&+g[d+=s]?g[v+=+g[d],d+v-v]=' ':0,v=c>'a'?1:+c),i]=v?v:c)&&g.join``

Uwaga: nie obsługuje wartości kulki> 9. Ale może, kosztem 18 bajtów. Zobacz kod podstawowy poniżej.

Fragment kodu TEST (lepsza pełna strona)

F=g=>(s=~g.search`
`,g=[...g]).map((c,i)=>c<' '?0:g[[0,1,-1].map(d=>!d|'\\ /'[d+1]==g[d+=i]&&+g[d+=s]?g[v+=+g[d],d+v-v]=' ':0,v=c=='o'?1:+c),i]=v?v:c)&&g.join``

// Basic code, starting point before golfing
B=g=>{
  s = ~g.search('\n');
  (g=[...g]).map((c,i)=>{
    v = c == 'o' ? 1 : +c
    if (c>=' ' // skip newlines
        && !isNaN(v)) // digit or space
    {
      if (w=+g[i+s]) v += w, g[i+s]=' '
      if (g[i-1]=='\\' && (w=+g[i+s-1])) v += w, g[i+s-1]=' '
      if (g[i+1]=='/' && (w=+g[i+s+1])) v += w, g[i+s+1]=' '
      if (v) g[i] = v
    }
  })      
  // return g.join``
  // To handle values > 9 ...
  return g.map(v=>+v?v%10:v).join``
}  

function test() {
  O.textContent = F(I.value)
}

test()
textarea,pre { width: 15em; height: 15em; display: block; margin: 0; }
iframe { height: 25em; width: 15em}
td { vertical-align: top }
<table>
  <tr>
    <th>Test cases</th>
    <th>Input</th>
    <td></td>
    <th>Output</th>
  </tr><tr>
    <td>
    Copy/paste test cases from here <br>(courtesy of OP)
    <button onclick="T.src='http://bohem.io/wadus/index.php'">reload</button><br>
    <iframe id=T src="http://bohem.io/wadus/index.php"></iframe>
    </td>
    <td><textarea id=I>##########
#  o  o o#
# o\o o  #
#oo o/   #
#       o#
#     /o #
#\o   o  #
# o /-   #
#   o  - #
##########</textarea></td>
    <td><button onclick='test()'>Test</button></td>
    <td><pre id=O></pre></td>
  </tr>
</table>
Rozwiń fragment kodu

edc65
źródło
Miły! Mam wiele do nauczenia się w golfie
usandfriends
nie powinieneś mapować wartości> 9 na v>9?9:v?
Tytus
@Titus Mógłbym, ale w rzeczywistości mógłbym zrobić, co chcę, ponieważ nie oczekuje się wartości> 9, zobacz komentarz OP odpowiadający na moje pytanie.
edc65
5

JavaScript (ES6), 453 426 409 306 290 286 bajtów

Pierwsze i najbardziej oczywiste rozwiązanie, jakie przyszło mi do głowy, to takie, które rozglądają się po slajdach, a następnie łączą się lub zastępują.

a=>{a=a.split`
`.map(b=>[...b.replace(/o/g,'1')]);for(r=1;r<a.length-1;r++){d=a[r];for(c=1;c<d.length-1;c++){e=a[r+1];f=e[c]=='\\'?c+1:e[c]=='/'?c-1:!isNaN(+e[c])?c:null;(''+d[c]).match(/[0-9]/g)&&f!=null&&!isNaN(+e[f])?(e[f]=+e[f]+ +d[c],d[c]=' '):0}}return a.map(b=>b.join``).join`
`}

Nie golfowany:

func = state => {
    state = state.split `
`.map(line => [...line.replace(/o/g, '1')]);

    for (r = 1; r < state.length - 1; r++) {
        thisState = state[r];
        for (c = 1; c < thisState.length - 1; c++) {
            nextState = state[r + 1];
            nc = nextState[c] == '\\' ? c + 1 : nextState[c] == '/' ? c - 1 : !isNaN(+nextState[c]) ? c : null;

            ('' + thisState[c]).match(/[0-9]/g) && nc != null && !isNaN(+nextState[nc]) ? (
                nextState[nc] = +nextState[nc] + +thisState[c],
                thisState[c] = ' '
            ) : 0;
        }
    }

    return state.map(line => line.join ``).join `
`;
}

Testuj jak:

func(`##########
# -- o - #
# \\\\\\ -  #
#-       #
# o  o   #
#o \\\\ /-\\#
#      \\ #
#/-  //  #
#   /- o #
##########`)

Dzięki: @ edc65

usandfriends
źródło
Wyślę mojego pytona, gdy będę pewien, że nie mogę go już zagrać w golfa, ale do tej pory to kod python generuje odpowiedź. W jakikolwiek sposób mogę gdzieś przetestować Twój kod do gry w golfa, aby móc wyskoczyć z ciebie na tablicy wyników? (jsfiddle, jsbin, ideone, cokolwiek)
Juan Cortés
spadłeś do 355, twój ruch!
Juan Cortés
@ JuanCortés Gotowe!
usandfriends
b.replace(/o/g,'1').split`` można skrócić do[...b.replace(/o/g,1)]
edc65
@ edc65 Myślę, że to naprawiłem. Zasadniczo zawsze utrzymuje moc poniżej 10 przez mod'ing 10.
zaprzyjaźnia się
4

Java, Too Many 1102 987 bajtów

Ponieważ Java.

\ o / Jest poniżej 1000!

class G{class T{char s;int p=0;T(char c){s=c;}}T A=new T(' ');T[][]o;boolean i(){for(int i=1;i<o.length;i++)for(int j=1;j<o[i].length;j++)if(o[i][j].p>0){if(m(i,j,i+1,j)||o[i+1][j].s=='/'&&m(i,j,i+1,j-1)||o[i+1][j].s=='\\'&&m(i,j,i+1,j+1))return 1>0;int w=o[i][j].p;o[i][j]=new T(Integer.toString(w).charAt(0)){{p=w;}};}return 1<0;}boolean m(int a,int b,int c,int d){if(o[c][d]==A||o[c][d].p>0){o[a][b].p+=o[c][d].p;o[c][d]=o[a][b];o[a][b]=A;return 1>0;}return 1<0;}String s(){String s="";for(T[]r:o){for(T t:r)s+=t.s;s+="\n";}return s;}void f(String s){String[]r=s.split("\\\\n");o=new T[r.length][r[0].length()];for(int i=0;i<o.length;i++)for(int j=0;j<o[i].length;j++)switch(r[i].charAt(j)){case'-':o[i][j]=new T('-');break;case'\\':o[i][j]=new T('\\');break;case'/':o[i][j]=new T('/');break;case'o':o[i][j]=new T('o'){{p=1;}};break;case'#':o[i][j]=new T('#');break;default:o[i][j]=A;}}public static void main(String[]a){G g=new G();g.f(a[0]);while(g.i());System.out.println(g.s());}}

Cel strona była możliwość wydrukowania każdej iteracji rady: po prostu usunąć środkowy ;in while(g.i()) ; System.out.print(g.s());(Chociaż to powoduje wyłączenia ostatniego wydruku, który ma 0-> konwersji energii). Niestety, w tej wersji grawitacja działa dziwnie. Za każdym podaniem biorę pierwszą nie zablokowaną piłkę i ruszam nią. Krótkie spięcie iterate()to mniej bajtów niż przejście przez całą płytkę, a następnie powrót w przypadku zmiany.

Jest to pełna klasa główna, skompiluj i uruchom w wierszu poleceń z argumentem:

java -jar G.jar "##########\n# o-/    #\n#-  / -/ #\n# oo   o #\n# /   \o #\n# o   o \#\n#    o   #\n#   -\o  #\n#\  \\ o/#\n##########"

Wersja „czytelna”:

class GravitySimulator {
    class Token {
        char symbol;
        int power = 0;

        Token(char c) {
            symbol = c;
        }
    }

    Token A = new Token(' ');

    Token[][] board;

    boolean iterate() {
        for (int i=1; i<board.length; i++)
            for (int j=1; j<board[i].length; j++) 
                if (board[i][j].power>0) {
                    if (move(i,j,i+1,j) || board[i+1][j].symbol=='/' && move(i,j,i+1,j-1) || board[i+1][j].symbol=='\\' && move(i,j,i+1,j+1)) return true;
                    int pow = board[i][j].power;
                    board[i][j] = new Token(Integer.toString(pow).charAt(0)){{power=pow;}};
                }
        return false;
    }

    boolean move(int x1, int y1, int x2, int y2) {
        if (board[x2][y2] == A || board[x2][y2].power>0) {
            board[x1][y1].power += board[x2][y2].power;
            board[x2][y2] = board[x1][y1];
            board[x1][y1] = A;
            return true;
        } return false;
    }

    String string() {
        String s = "";
        for (Token[] row : board) {
            for (Token token : row) s+=token.symbol;
            s+="\n";
        }
        return s;
    }

    void fromString(String s) {
        String[] rows = s.split("\\\\n");
        board = new Token[rows.length][rows[0].length()];
        for (int i=0; i<board.length; i++) 
            for (int j=0; j<board[i].length; j++) 
                switch(rows[i].charAt(j)) {
                    case '-': board[i][j]=new Token('-');break;
                    case '\\':board[i][j]=new Token('\\');break;
                    case '/': board[i][j]=new Token('/');break;
                    case 'o': board[i][j]=new Token('o'){{power=1;}};break;
                    case '#': board[i][j]=new Token('#');break;
                    default:  board[i][j]=A;
                }
    }

    public static void main(String[] args) {
        GravitySimulator g = new GravitySimulator();
        g.fromString(args[0]);
        while(g.iterate());
        System.out.println(g.string());
    }
}
CAD97
źródło
Taki java dużo gadatliwy. +1
Rohan Jhunjhunwala
1

Python3, 355b

g=g.replace("o","1").split("\n")
r=1
while r:
 r=0
 for y in range(len(g)):
  for x in range(len(g[y])):
   if g[y][x].isdigit():
    h=g[y+1]
    m={"/":-1,"\\":1}
    j=x+m[h[x]]if h[x]in m else x
    if("0"+h[j].strip()).isdigit():
     r=1
     g[y+1]=h[:j]+str(int(g[y][x])+int("0"+h[j]))+h[j+1:]
     g[y]=g[y][:x]+' '+g[y][x+1:]
print("\n".join(g))

Przetestuj tutaj

Juan Cortés
źródło
0

PHP, 228 204 197 194 bajtów

for($a=strtr($a,o,1);$c=$a[$i];$i++)$c>0&&(($d=$a[$t=$i+strpos($a,"
")+1])>" "?$d!="/"?$d!="\\"?$d>0:$a[++$t]<"!"||$a[$t]>0:$a[--$t]<"!"||$a[$t]>0:1)&&$a[$t]=min($a[$t]+$c,9).!$a[$i]=" ";echo$a;

wyświetla ostrzeżenia w PHP 7.1. Wstaw (int)przed, $a[$t]+$caby naprawić.

Uruchom php -nr '$a="<string>";<code>'lub wypróbuj online .

awaria

for($a=strtr($a,o,1);   # replace "o" with "1"
    $c=$a[$i];$i++)     # loop through string
    $c>0                    # if character is numeric
    &&(($d=$a[                  # and ...
        $t=$i+                  # 3: target position = current position + 1 line
            strpos($a,"\n")+1   # 2: width = (0-indexed) position of first newline +1
    ])>" "                  # if target char is not space
        ?$d!="/"                # and not left slide
        ?$d!="\\"               # and not right slide
        ?$d>0                   # but numeric: go
        :$a[++$t]<"!"||$a[$t]>0     # right slide: if target+1 is space or ball, then go
        :$a[--$t]<"!"||$a[$t]>0     # left slide: if target-1 is space or ball, then go
    :1                              # space: go
    )&&                     # if go:
        $a[$t]=min($a[$t]+$c,9) # move ball/merge balls
        .!$a[$i]=" "            # clear source position
    ;
echo$a;                 # print string
Tytus
źródło