Liczenie punktów końcowych art ASCII

14

Powinieneś napisać program lub funkcję, która odbiera ciąg reprezentujący grafikę ASCII jako dane wejściowe i wyjściowe lub zwraca liczbę punktów końcowych na wejściu.

Dane wejściowe będą składały się ze znaków space - | +(odpowiednio z 0, 2, 2 i 4 punktami końcowymi) i łamania linii. Na przykład:

-|++-
  +

Dwie sąsiednie postacie są połączone i dlatego tracą 1 punkt końcowy w następujących przypadkach:

--  -+  +- |  |  +  +  ++
           |  +  |  +

Pierwszy przykład ma

2+2+2+2+1+
    3        = 12

punkty końcowe.

Wejście

  • Wejście będzie ciąg składający się z przestrzeni znaków, -, |, +i linią.
  • Długość wejściowa może wynosić 0, a każde wejście pasujące do powyższego opisu jest prawidłowe (w wyrażeniu regularnym jest [ -+|\n]*).
  • Końcowy znak nowej linii jest opcjonalny.

Wynik

  • Pojedyncza nieujemna liczba całkowita, liczba punktów końcowych.

Przykłady

Wyjścia są za ostatnim wierszem ich danych wejściowych.

+
4 

-|++-
  +
12 

+--+
|  |
+--+
8 

  |  |
  +--+-- |||
12 

--++
 |||--
10 

<empty input>
0 


|
|     
2 

--
++--
 ++
   --+
  +++ || 

 ----
30 

To jest golf golfowy, więc wygrywa najkrótszy wpis.

randomra
źródło

Odpowiedzi:

11

Ślimaki , 29

A
\+|\-)lr!\-|(\+|\|)n!\|}!\+

Dodałem komentarze do wiersza ,,, aby utworzyć skomentowaną wersję.

A                    ,, Count all accepting paths
        \+ | \- )    ,, Literal '+' or '-'        
        lr           ,, Set direction to left or right
        !\-          ,, Assert next char is not '-'
    |                ,, Or...
        ( \+ | \| )  ,, Literal '+' or '|'
        n            ,, Turn 90 degrees right or left (from initial direction right)
        !\|          ,, Assert next char is not '|'
}                    ,, Group everything previous
!\+                  ,, Assert next char is not '+'
feersum
źródło
5

JavaScript (ES6), 168

Za pomocą ciągów szablonów wszystkie znaki nowej linii są znaczące i zliczane.

Przetestuj poniższy fragment kodu w przeglądarce Firefox. (Chrome nadal nie obsługuje ...)

f=s=>`
${s}
`.split`
`.map((r,y,s,v=c=>c>' '&c!='-',h=c=>c>' '&c<'|')=>[...r].map((c,x)=>t+=(v(c)?2-v(s[y-1][x])-v(s[y+1][x]):0)+(h(c)?2-h(r[x-1])-h(r[x+1]):0)),t=0)&&t

// Less golfed
u=s=>{
  s = ('\n' + s + '\n').split('\n'); // split in rows, adding a blank line at top and one at bottom
  t = 0; // init counter
  v = c => c>' ' & c!='-'; // function to check if a character has vertical end points
  h = c => c>' ' & c<'|'; // function to check if a character has horizontal end points
  s.forEach( (r,y) =>
    [...r].forEach( (c,x) => {
     if (v(c)) // if current character has vertical endpoints, check chars in previous and following row
        t += 2 - v(s[y-1][x]) - v(s[y+1][x]); 
     if (h(c))  // if current character has horizontal endpoints, check previous and following chars in row
        t += 2 - h(r[x-1]) - h(r[x+1]);
    })
  )  
  return t
}

//TEST
out=x=>O.innerHTML+=x+'\n'

;[
 [`+`,4]
,[`-|++-
  +`,12]
,[`+--+
|  |
+--+`,8]
,[`  |  |
  +--+-- |||`,12]
,[`--++
 |||--`,10]
,[``,0]
,[`
|
|`,2]
,[`
--
++--
 ++
   --+
  +++ || 

 ----`,30]
].forEach(t=>{ r=f(t[0]),k=t[1],out('Test '+(r==k?'OK':'Fail')+'\n'+t[0]+'\nResult:'+r+'\nCheck:'+k+'\n') })
<pre id=O></pre>

edc65
źródło
Muszę podzielić s na rzędy, a następnie dodać pusty wiersz u góry i pusty wiersz u dołu. Twój kod w ogóle się nie dzieli. Możesz to zrobić ["",...s.split("\n"),""]dłużej @ETHproductions
edc65
Ach, racja, przepraszam za to.
ETHprodukcje
3

Python 2, 123

l=[]
i=p=t=0
for c in input():
 l+=0,;h=c in'-+';t+=h>p;p=h;v=c in'|+';t+=v>l[i];l[i]=v;i+=1
 if' '>c:l=l[:i];i=0
print t*2

Metoda jednoprzebiegowa. Pobiera na wejściu ciąg znaków z łamaniem linii.

W przypadku poziomych chodzi o policzenie liczby segmentów poziomych, z których każdy ma dwa punkty końcowe. Segment zaczyna się za każdym razem, gdy znak jest jednym z +-(boolean h), ale poprzedni nie jest (boolean p).

W przypadku pionów chcielibyśmy zrobić to samo na transponowanym wejściu, patrząc na przebiegi +|. Niestety transponowanie Pythona jest naprawdę niezgrabne. Wymaga map(None,*s.split('\n'))to wypełnienia pustych pól, z Nonektórymi również sobie radzą.

Zamiast tego wykonujemy liczenie pionowe podczas iteracji w poziomie. Przechowujemy listę, lktóre indeksy kolumn są nadal „uruchomione”, tzn. Gdzie poprzedni znak w tej kolumnie łączy się. Następnie robimy to samo, co z poziomą, licząc nowo rozpoczynające się pionowe segmenty. Kiedy uderzamy w nowy wiersz, odcinamy listę po prawej stronie, gdzie jesteśmy, ponieważ wszystkie segmenty po prawej stronie zostały uszkodzone, i resetujemy bieżący indeks do 0.

xnor
źródło
3

CJam, 66 62 61 bajtów

q_N/_z,S*f.e|zN*"-|++"2$fe=1b"|-"{'++:R:a@+2ew{aR2m*&},,-}/2*

Wypróbuj online w interpretatorze CJam .

Pomysł

Możemy obliczyć punkty końcowe w następujący sposób:

  1. Policz liczbę -s, |si +na wejściu.
  2. Pomnóż ostatni przez 2 i dodaj wyniki.
  3. Policzyć --s, -+s, +-S i ++S w rzędach.
  4. Policz liczbę ||s. |+s, +|si ++w kolumnach.
  5. Odejmij wyniki od 3 i 4 od wyniku od 2.
  6. Pomnóż wynik z 5 przez 2.

Kod

q        e# Read all input from STDIN.
_N/      e# Push a copy and split it at linefeeds.
_z,      e# Count the number of rows of the transposed array.
         e# This pushes the length of the longest row.
S*       e# Push a string of that many spaces.
f.e|     e# Perform vectorized logical OR with the rows.
         e# This pads all rows to the same length.
zN*      e# Transpose and join, separating by linefeeds.
"-|++"   e# Push that string.
2$       e# Copy the original input.
fe=      e# Count the occurrences of '-', '|', '+' and '+' in the input.
1b       e# Add the results.
"|-"{    e# For '|' and '-':
  '++    e#   Concatenate the char with '+'.
  :R     e#   Save the resulting string in R.
  :a     e#   Convert it into an array of singleton strings.
  @      e#   Rotate one of the two bottom-most strings on top of the stack.
         e#   This gets the transposed input for '|' and the original input for '-'.
  +      e#   Concatenate both arrays.
         e#   This pads the input with nonsense to a length of at least 2.
  2ew    e#   Push a overlapping slices of length 2.
  {      e#   Filter the slices; for each:
    a    e#     Wrap it in an array.
    R2m* e#     Push the second Cartesian power of R.
         e#     For '|', this pushes ["||" "|+" "+|" "++"].
    &    e#     Intersect.
  },     e#   If the intersection was non-empty, keep the slice.
  ,      e#   Count the kept slices.
  -      e#   Subtract the amount from the integer on the stack.
}/       e#
2*       e# Multiply the result by 2.
Dennis
źródło