Dungeon Crawler

40

Wejście

  • Binarna macierz reprezentująca ściany lochu.M
  • Pozycja gracza w lochu.(x,y)
  • Kierunek , w którym gracz aktualnie patrzy (0 = północ, 1 = wschód, 2 = południe, 3 = zachód)d

Wydajność

Pseudo-trójwymiarowa reprezentacja ścian znajdujących się w polu widzenia gracza, jako grafika ASCII zawierająca znaków.30×10

Poniżej znajduje się kilka możliwych ram wyjściowych wraz z odpowiednią mapą i kompasem, które pomagają w zrozumieniu go (ale narysowanie mapy i kompasu nie jest częścią wyzwania).

animacja

Specyfikacja

Pole widzenia

Zawodnik ma ścian w jego polu widzenia oznakowanym od do . Poniżej znajdują się pozycje ścian względem gracza (na żółto) we wszystkich możliwych kierunkach.13AM

pole widzenia

Rysowanie ścian

Ściany powinny być rysowane od do w dokładnie takiej kolejności, biorąc pod uwagę, że każda narysowana wcześniej część może zostać zastąpiona ściankami bliższymi. Możesz oczywiście zaimplementować go inaczej, o ile końcowy wynik jest taki sam.AM

Cały wyjściowy jest narysowany z 7 różnych postaci: " ", "'", ".", "|", "-", "_"i ":".

Ponieważ uszczegółowienie kształtów ścian w korpusie tego wyzwania spowodowałoby, że byłoby ono zbyt długie, zamiast tego podano je w poniższym linku TIO:

Wypróbuj online!

Znaki, które nie są częścią danej ściany, są oznaczone "?"na tych schematach literą „a”. Należy je traktować jako „przezroczyste” znaki, które w ogóle nie są rysowane. Z drugiej strony wszystkie przestrzenie w ścianie są „stałe” i muszą zastąpić wszelkie inne znaki, które mogły zostać wcześniej narysowane.

Zasady

O wejściu

  • Można wziąć , , i w jakimkolwiek rozsądnym formacie.Mxyd
  • Możesz użyć współrzędnych 0 lub 1 indeksowanych.
  • Możesz użyć 4 różnych wybranych wartości dla wskazówek.
  • Gwarantowana macierz ma co najmniej .3×3
  • Możesz założyć, że na krawędziach zawsze będą otaczające ściany.
  • Gracz na pewno znajdzie się na pustym polu.
  • Dane wejściowe są gwarantowane.

O wyjściu

  • Ściany muszą być narysowane dokładnie tak, jak opisano.
  • Format wyjściowy jest jednak również elastyczny: pojedynczy ciąg, tablica ciągów, macierz znaków itp.
  • Wiodące i końcowe białe znaki są dopuszczalne, o ile są spójne.

To jest .

Przypadki testowe

Wszystkie przypadki testowe korzystają z następującej macierzy:

[ [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 ],
  [ 1, 0, 1, 1, 1, 0, 0, 0, 0, 1 ],
  [ 1, 0, 1, 0, 1, 0, 0, 1, 0, 1 ],
  [ 1, 0, 0, 0, 0, 0, 1, 1, 0, 1 ],
  [ 1, 0, 0, 1, 0, 0, 0, 1, 0, 1 ],
  [ 1, 0, 0, 1, 1, 0, 1, 1, 0, 1 ],
  [ 1, 1, 1, 1, 0, 0, 0, 0, 0, 1 ],
  [ 1, 0, 0, 0, 0, 0, 0, 0, 0, 1 ],
  [ 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 ] ]

Poniższe dane wprowadzają współrzędne 0-indeksowane, przy czym wskazuje lewy górny róg.(0,0)

x=3, y=3, d=0
x=6, y=4, d=3
x=4, y=4, d=1
x=1, y=5, d=2
x=7, y=7, d=3
x=6, y=6, d=1
x=8, y=1, d=2
x=7, y=6, d=1

Oczekiwane wyniki:

------------------------------    ------------------------------
 x=3, y=3, d=0:                    x=6, y=4, d=3:
------------------------------    ------------------------------
__                          __    '.                          .'
  |'.                    .'|        |                        |  
  |   '.--------------.'   |        |----.                   |  
  |    |              |    |        |    | '.--------.       |  
  |    |              |    |        |    |  |        |       |  
  |    |              |    |        |    |  |        |       |  
  |    |              |    |        |    | .'--------'       |  
  |   .'--------------'.   |        |----'                   |  
__|.'                    '.|__      |                        |  
                                  .'                          '.
------------------------------    ------------------------------
 x=4, y=4, d=1:                    x=1, y=5, d=2:
------------------------------    ------------------------------
                            .'    __ ________________________ .'
                           |        |                        |  
-------.              .----|        |                        |  
       | '.--------.' |    |        |                        |  
       |  |        |  |    |        |                        |  
       |  |        |  |    |        |                        |  
       | .'--------'. |    |        |                        |  
-------'              '----|        |                        |  
                           |      __|________________________|  
                            '.                                '.
------------------------------    ------------------------------
 x=7, y=7, d=3:                    x=6, y=6, d=1:
------------------------------    ------------------------------
'.                                '.                            
  |'.                               |'.                         
  |   '.                            |   '.                      
  |    | '.                 .-      |    |--.--------.--------.-
  |    |  |:               :|       |    |  |        |        | 
  |    |  |:               :|       |    |  |        |        | 
  |    | .'                 '-      |    |--'--------'--------'-
  |   .'                            |   .'                      
  |.'                               |.'                         
.'                                .'                            
------------------------------    ------------------------------
 x=8, y=1, d=2:                    x=7, y=6, d=1:
------------------------------    ------------------------------
'.                          __    '.                            
  |'.                    .'|        |                           
  |   '.              .'   |        |----.--------------.-------
  |    | '.        .' |    |        |    |              |       
  |    |  |:      :|  |    |        |    |              |       
  |    |  |:      :|  |    |        |    |              |       
  |    | .'        '. |    |        |    |              |       
  |   .'              '.   |        |----'--------------'-------
  |.'                    '.|__      |                           
.'                                .'                            

Powiązane wyzwanie:

Wyzwanie z 2013 r. Jest ściśle powiązane. Ale ma inne kryterium wygranej (wyzwanie kodowe), znacznie luźniejszą specyfikację danych wyjściowych i wymaga interaktywnych operacji we / wy.

Arnauld
źródło
To natychmiast przypomniało mi 3D Monster Maze, chociaż oczywiście wykorzystuje grafikę blokową.
Neil,
9
Twoje wyzwania są tak zabawne i dobrze napisane!
Oliver,
Oczekiwanie na rozwiązanie w Minecraft ...
Czy ktoś jeszcze pamięta wygaszacz ekranu systemu Windows? Była taka fajna „gra”, gdy miałem 5 lub 6 lat ...
Magic Octopus Urn

Odpowiedzi:

10

Czysty (z Snappy ), 800 785 670 644 bajtów

460 402 bajtów kodu + 360 242-bajtowy literał ciągu
( znak ucieczki tu i na TIO, ponieważ nie jest prawidłowy UTF-8)

Tutaj możesz zweryfikować długość literału .

import StdEnv,Data.List,Data.Maybe,Codec.Compression.Snappy,Text
@a b|b<'~'=b=a
$m x y d=map(@' ')(foldl(\a b=[@u v\\u<-a&v<-b])['~~'..][join['
']k\\Just(Just 1)<-[mapMaybe(\e=e!?(x+[u,v,~u,~v]!!d))(m!?(y+[~v,u,v,~u]!!d))\\u<-[-2,2,-1,1,0,-1,1,0,-1,1,0,-1,1]&v<-[3,3,3,3,3,2,2,2,1,1,1,0,0]]&k<-nub[q\\w<-split"#"(snappy_uncompress"\211\6\44\41\41\41\55\56\40\41\40\174\72\5\4\60\55\47\40\41\41\41\43\41\41\41\176\56\55\r\1\24\56\40\41\176\174\40\r\1\4\174\72\72\r\0\0\47\r\46\35\72\25\1\31\103\0\41\25\24\35\113\176\25\0\31\133\11\224\r\152\20\56\40\40\40\41\21\217\10\40\47\56\31\14\4\40\174\126\14\0\4\56\47\21\74\0\47\1\74\1\340\r\220\25\242\11\1\25\250\25\360\11\1\25\253\376\30\0\21\30\25\333\11\1\24\47\41\41\43\137\137\11\154\20\41\40\40\174\47\r\344\1\157\5\341\1\11\5\336\172\11\0\34\56\47\41\137\137\174\56\47\1\347\20\43\176\176\40\137\132\1\0\4\40\41\75\211\76\1\0\1\356\5\150\116\1\0\376\35\0\376\35\0\126\35\0\132\347\0\20\137\174\41\43\47\101\337\51\74\41\133\122\4\0\10\56\47\40"),q<-let l=[[c\\c<-:rpad s 30'~']\\s<-split"!"w]in[l,map reverse l]]])

Wypróbuj online!

Szybka kompresja działa w tym przypadku całkiem dobrze, mimo że jest skoncentrowana na prędkości, ponieważ w kompresowanym ciągu jest tak wiele przebiegów jednoznakowych.

Nieskompresowany ciąg znaków ( #zastąpiony przez \ndla przejrzystości) to:

!!!-. ! |:! |:!-' !!!
!!!~.--------. !~|        |:!~|        |:!~'--------' !!!
!!!~~~~~~~~~~.--------.!~~~~~~~~~~|        |!~~~~~~~~~~|        |!~~~~~~~~~~'--------'!!!
!!-------.   !       | '.!       |  |!       |  |!       | .'!-------'   !!
!!~~~~~~~.--------------.!~~~~~~~|              |!~~~~~~~|              |!~~~~~~~|              |!~~~~~~~|              |!~~~~~~~'--------------'!!
__      !  |'.   !  |   '.!  |    |!  |    |!  |    |!  |    |!  |   .'!__|.'   !
~~ ________________________ !~~|                        |!~~|                        |!~~|                        |!~~|                        |!~~|                        |!~~|                        |!~~|                        |!~~|________________________|!
'. !  |!  |!  |!  |!  |!  |!  |!  |!.' 

To koduje lewe wersje różnych komponentów ekranu z !zamiast nowych linii, a ~zamiast nich ?, które są następnie ~uzupełniane do 30 znaków z prawej strony przed dodaniem siebie i ich odwrócenia linii do listy odnośników.

Reszta kodu obsługuje po prostu wyszukiwanie współrzędnych, a przypadki poza zakresem są ignorowane.

Obrzydliwe
źródło
5

Python 2 , 864 854 848 826 810 bajtów

L=[zip(*[iter(w)]*30)for w in zip(*[iter("eJzdllESgyAMRL+5Rf7yRQ7AZbhIDl9BwTqzSVtHrbKffR0Mm13HEM5SFHIoadpNI3snDyaS6NCknhU+JfZOvq8kLoIBU1oEI+RTbiePGzBa3QM0rf78TGl17+CZr5ZrUXBN+ECfY1GvGKEqtDsSI4s6xTn5jgqyqNcTTnUjTQO2FAEqTC0ngCrtpywenX5le6or1SsGi9ZLBKt0HuXtVEeUNGdzG6EsRNmo2EzLxuBbqFH8njmfwnqGcl+VY+s5+5ezSYXVel4dxaRK/6F15SatK1frvm//y4aoT4Ckj6XWfY2cbvz2fLSCPiiVvR+3ZuerzDwPSqeSvgAP9woa".decode('base64').decode('zip'))]*300)]
E=enumerate
def f(m,x,y,d):
 D=eval(`[[' ']*30]*10`);w,h=len(m[0]),len(m);a=[m,zip(*m)[::-1]][d%2];x,y=[x,y,w+~x,h+~y,y,w+~x,h+~y,x][d::4];X=sum([[0]*(x<2)+list(l)[x-2+(x<2):x+3]for l in[l*2for l in[a,[l[::-1]for l in a[::-1]]][d/2]*2][y:y+4]],[])
 for d,w in zip(L,'sropqmklhfgca'):
  for j,l in E(d):
   for i,q in E(l):
    if q*X[ord(w)%32]>=' ':D[j][i]=q
 for l in D:print''.join(l)

Wypróbuj online!

TFeld
źródło
4

Węgiel drzewny , 500 332 bajtów

F⁴≔⮌E§θ⁰⁺00⭆θ§μλθ≔E✂θ⊖ζ⁺⁶ζ¹✂ι⊖η⁺⁶η¹θFε≔⮌E§θ⁰⭆θ§μλθB³⁰χ F²«‖FΦ⪪⟦“ |0⟧P+N?⟧‹G”³¦⁰”{➙d⊟EX⍘k↧D({Vt⍘gRd◨ⅉ^δ#T;”³¦¹“ ¶↖+9G₂pF^c1e⌈¬;”³χω⁰χ”{➙∧⊟∧◨ηü∧↖z↨⁸\G'λI∧¡∕⪫θJoΣ³⊖I⊟ζ⊙”²¦⁰”{➙∧⊟∧◨ηü∨§·◧﹪d‹⟲ OzºκFⅉRï⎇”²¦⁷ω⁰χ”{➙∧⊟≔⊘⬤|↔3Zθ✂≔÷t⍘ε✂↨≔⧴×ld≕≡⌕m⟧6ψ=Z”⁰¦⁰”}∧80KυgCAêJm⟦↘/§‖Ck⮌C₂¡μ↗W”⁰¦²ω⁰χ”{⊟∨·◧¤∨¶⧴⬤2GL▷⁸ê5Gψ”⁰¦⁰⟧³I§⭆θ⭆³§μ⎇ι⊕ξ⁻⁵ξλ«J⁻⊟κײ⁹¬ι⊟κ⊟κ

Wypróbuj online! Link jest do pełnej wersji kodu. Obawiam się, że to trochę nudne podejście; dużo druku skompresowanych literałów łańcuchowych. Wyjaśnienie:

F⁴≔⮌E§θ⁰⁺00⭆θ§μλθ

Wypełnij tablicę dwoma dodatkowymi 0literami z każdej strony.

≔E✂θ⊖ζ⁺⁶ζ¹✂ι⊖η⁺⁶η¹θ

Wytnij 7x7podsekcję tablicy wyśrodkowaną na podanych współrzędnych.

Fε≔⮌E§θ⁰⭆θ§μλθ

Obróć tablicę odpowiednio do danego kierunku.

B³⁰χ 

(zwróć uwagę na spację końcową) Narysuj puste 30×10pole, aby wynik zawsze był spójny.

F²«‖

Narysuj każdą połowę osobno, odzwierciedlając pomiędzy.

FΦ⪪⟦...⟧³I§⭆θ⭆³§μ⎇ι⁻⁵ξ⊕ξλ«

Weź tablicę deskryptorów ściany, podzieloną na części (ciąg, współrzędna y, współrzędna x), przefiltruj te części, które mają ścianę w odpowiednim miejscu w odpowiedniej połowie tablicy, i zapętl się nad ścianami. Pozycja jest obliczana przez wyodrębnienie 12 ścian z tablicy i indeksowanie ich za pomocą indeksu porcji, ponieważ jest to bardziej golfowe niż zlokalizowanie ściany bezpośrednio za pomocą indeksu porcji.

J⁻⊟κײ⁹¬ι⊟κ⊟κ

Przejdź do współrzędnych ściany i wydrukuj ją. Zauważ, że odbijanie neguje współrzędne X od [0, 30)do, (-30, 0]dzięki czemu po jednym przejściu płótno jest skutecznie przesuwane o 29 znaków w lewo.

Neil
źródło
1
@Arnauld Rzeczywiście, nie korzystam w ogóle z symetrii, powinienem być w stanie odciąć jedną trzecią, rysując każdą połowę osobno.
Neil,
1
+1 za 168-bajtowy skok golfowy. Myślę, że to największy pojedynczy golf, jaki tu widziałem.
ElPedro
2

Rubinowy , 412 391 385 383 bajtów

->a,x,y,d{b=Array.new(97){[" "]*10}
e=[-1,0,1,0]
14.times{|i|m=-i%3-1
w=[31,25,15,9][n=i>2?4-i/3:(m*=2;3)]
(a*3)[y+n*e[d]+m*c=e[d-3]][x+n*c-m*e[d]]&&[p=w*(m*2-1)/2,r=[12,7,4,3][n]*m*m.abs+m/3].min.upto([q=w*(m*2+1)/2,r].max){|j|t=" .'"*9
b[j+15]=(p<j&&j<q ?%w{-%2s- -%4s- _%7s_}[-n]%"":t[k=(j^j>>9)%(36/-~n)]+"   :|  |    |"[k%13]*(k/3*2)+t[-k]).center(10).chars}}
b[0,30].transpose}

Wypróbuj online!

Pobiera dane wejściowe jako tablicę wartości prawdy / fałszu (uwaga 0w Rubim niljest prawdą , ale fałszem.)

Zwraca tablicę znaków.

Wyjaśnienie

Bloki są rysowane od przodu do tyłu ze nzmniejszaniem odległości i pozycją z boku na bok, mprzechodząc przez -1,1,0lewy, prawy, środkowy. Środkowy blok E w najdalszym rzędzie jest faktycznie rysowany dwukrotnie, ponieważ musimy sprawdzić oba bloki A / B i bloki C / D. n,mi dsłużą do modyfikowania wartości xi ydo przeszukiwania tablicy a. Jeśli xjest poza zakresem, nilzwracana jest komórka poza zakresem i nie jest generowany błąd, ale jeśli yjest poza zakresem, nilzostanie zwrócone dla wiersza, a Ruby zgłasza błąd typu, gdy próbuje wyszukać komórkę. Aby tego uniknąć, tablica jest potrojona w pionie przed wyszukiwaniem. Jeśli zostanie znaleziona prawdziwa wartość, zostanie narysowany blok.

Dane wyjściowe są wbudowane w tablicę b10-elementowych tablic reprezentujących kolumny danych wyjściowych i są transponowane do 10 wierszy na końcu funkcji. Rysowana jest pełna przednia powierzchnia wszystkich bloków (niezależnie od tego, czy pojawia się ona w rzutni, czy nie), dlatego w tablicy potrzebne jest dodatkowe miejsce, aby uniknąć błędów poza zakresem. Zakres jwartości w rzutni wynosi od -15do +14, jest to przesunięte o 15 podczas zapisywania w tablicy, aby dać zakres 0do 29. Dla każdego bloku wyznaczoną trzy wartości obliczono: pi qdla lewej i prawej narożach przedniej ścianki, odpowiednio, a rz tyłu ściany bocznej. jjest iterowane od minimum do maksimum z tych trzech wartości rysujących z kolei kolumny.

Istnieją 3 rodzaje linii: poziomy -lub _pionowy |lub :ukośny z powtarzającym się " .'"wzorem. Gdzie p < j < qkolumny zawierające spacje ograniczone -lub _narysowane w celu utworzenia przedniej powierzchni. Gdzie jjest poza tym zakresem, kolumny zawierające spację |lub :są rysowane symbolami od, t=" .'"tworząc krawędzie i / lub powierzchnię boczną. Jest to zarządzane przez zmienną, k=jgdzie jjest dodatnia lub k=-j-1gdzie jjest ujemna. Liczba znaków między górną i dolną górą wynosi k/3*2. Aby poprawnie obsługiwać zewnętrzne krawędzie najdalszych bloków gdzie n=3, kmuszą zostać podjęte modulo 9, ale to nie musi być wykonywana dla mniejszych wartościachn. kjest zatem brane modulo 36/-~n, gdzie -~nocenia na n+1.

Nieskluczony kod

->a,x,y,d{
  b=Array.new(97){[" "]*10}                                        #Set up array for output, allow space for plotting outside viewport
  e=[-1,0,1,0]                                                     #Direction offsets from player position
  14.times{|i|                                                     #Iterate through all blocks including block E twice 
    m=-i%3-1                                                       #Cycle -1,1,0 = left, right, centre
    n=i>2?4-i/3:(m*=2;3)                                           #Distance n=4-i/3. But if i/3==0 n=3 and double m for blocks A,B 
    w=[31,25,15,9][n]                                              #Width of front face of block
    r=[12,7,4,3][n]*m*m.abs+m/3                                    #Value of j for back edge of block. m/3 offsets by -1 when m negative 
    (a*3)[y+n*e[d]+m*c=e[d-3]][x+n*c-m*e[d]]&&(                    #If a block is present at the location then
      [p=w*(m*2-1)/2,r].min.upto([q=w*(m*2+1)/2,r].max){|j|        #Calculate left and right edges of front of block p,q and iterate
        t=" .'"*9                                                  #t=character constant for diagonal lines 
        k=(j^j>>9)%(36/-~n)                                        #k=j for positive j=distance from centre. For negative j, k=-1-j by XOR with j>>9=-1. If n=3 take modulo 9 for correct output of outer side of block. 
        b[j+15]=(p<j&&j<q ?%w{-%2s- -%4s- _%7s_}[-n]%"":           #If j between p&q, draw horizontal lines separated by 2,4 or 7 spaces depending on value of n
        t[k]+"   :|  |    |"[k%13]*(k/3*2)+t[-k]).center(10).chars #else draw space or vertical line capped by diagonal markers
      }
    )
  }
b[0,30].transpose}                                                 #Truncate values outside viewport, transpose, and return value.
Level River St
źródło
Niezła odpowiedź! Podoba mi się sposób, w jaki wszystkie linie są generowane programowo, w tym ukośne.
Arnauld