introduzione

Ho alcune macchine ASCII che hanno velocità e direzione. La loro velocità è rappresentata dal loro numero. Se un'auto è <>allora si è fermata. Per esempio:

<>
1>
2>
3>

Dopo un secondo, capisco

<>
 1>
  2>
   3>

Dopo le due, capisco

<>
  1>
    2>
      3>

Se due auto sono troppo vicine, si schiantano.

1> <1
1> <2

Dopo un secondo, questo diventa

 ###
 ##

Se due macchine si intersecano, diventano hashtag dove sarebbero.

Se un'auto è abbastanza veloce da "saltare" sull'altra, non si verifica un incidente.

3><1   2><1   4><>

diventa

 <13>   ###     <>4>

Se un'auto viene lasciata fuori dallo schermo, scompare (a meno che non ci sia un incidente). Non c'è modo per un'auto di andare fuori dallo schermo.

 <11>
<1  1>
1    1>
      1>

Sfida

Sulla base della fisica dell'auto fornita, è necessario creare un programma in grado di passare un secondo nel futuro. L'ingresso sarà costituito da auto con spazi e una velocità massima di 5 (regex corrispondente (<[1-5]|[1-5]>|<>| )+). La simulazione avverrà su una riga, tuttavia quella linea non ha dimensioni fisse.

Casi test

<> 1> 2> 3> 4> 5>
<>  1>  2>  3>  4>  5>

1><1   1> <1   1>  <1
 ##     ###     1><1

2><2   2> <2   2>  <2   2>   <2   2>    <2
<22>    ###      ##       ###       2><2

<22>  <1 3>   <2
    ###     ##

<><>     1><>     2><>     3><>     4><>     5><>
<><>      ###       ##       ###      <>4>     <> 5>

<><1 <2 <3 <4 <5
###<2<3<4<5

punteggio

Questo è code-golf , quindi vince il codice con il minor numero di byte!

JavaScript (ES6), 140 byte

s=>[...s.replace(/\S./g,([a,b],i)=>r[r[i+=+b?-b:~~a]=r[i]?C:a,++i]=r[i]?C:b,r=[],C='#')&&r].map((c,i)=>c?r[i-1]==C|r[i+1]==C?C:c:' ').join``

Provalo online!

Commentate

s =>                      // given the input string s
  [ ...s.replace(         // search in s ...
    /\S./g,               //   ... all substrings consisting of 2 non-whitespace characters
    ([a, b], i) =>        //   let a be the 1st character, b the 2nd one and i the position
      r[                  //   update r[]:
        r[i +=            //     apply the car velocity to i:
          +b ? -b         //       if b is a digit, then move b cells backwards
                  : ~~a   //       else: use a to move forwards (or don't move at all)
        ] = r[i] ? C : a, //     if r[i] is set, overwrite it with '#'; otherwise, insert a
        ++i               //     increment i for the 2nd character
      ] = r[i] ? C : b,   //     if r[i] is set, overwrite it with '#'; otherwise, insert b
      r = [],             //   initialize r[] to an empty array
      C = '#'             //   define C as the 'crash' character
  ) && r ]                // end of replace(); return a fully iterable copy of r[]
  .map((c, i) =>          // for each entry c at position i in this array:
    c ?                   //   if c is defined:
      r[i - 1] == C |     //     if either the previous
      r[i + 1] == C ?     //     or the next cell is '#' (in the original array):
        C                 //       replace the current cell with '#'
      :                   //     else:
        c                 //       let c unchanged
    :                     //   else:
      ' '                 //     insert a space
  ).join``                // end of map(); join the result

JavaScript (Node.js) , 259 byte

Da 254 a 259 perché ho aggiunto un caso di test che non era presente nelle prove che ha complicato il mio Regex Finder

s=>{
c=[]
n=[S=""]
s.replace(/<?\d>?|<>/g,([d,D],i)=>d>0?g(i+ +d,d)+g(i-~d,D):g(i-~~D,d)+g(i-~~D+1,D))
for(i of n)S+=i||" "
return S.replace(/1?[2-9]*1?/g,(d,i)=>d>"1".repeat(l=d.length)?"#".repeat(l):c.slice(i,i+l).join``)}
g=(x,p)=>x<0||(n[x]=-~n[x],c[x]=p)

Provalo online!

Retina , 178 byte

^\d([^>])
 $1
T`5-1`d`<.
 *(<(\d)|((\d)>|<>))
$2* $#3*5* $4* $.`* $&¶
T`d`5-1`<.
m`^.{0,5}

G`.
N^$`
$.&
{+m`\A( *)  (.*)¶\1(..?)$
$1$3$2
m`^\A( *)( *)..(.*)¶\1(..?)$
$1##$.2*#$3

Provalo online! Il link include casi di test. Spiegazione:

^\d([^>])
 $1

Gestisci il caso di un'auto che si sposta da sinistra.

T`5-1`d`<.

Completare temporaneamente le cifre delle auto che si spostano a sinistra.

 *(<(\d)|((\d)>|<>))
$2* $#3*5* $4* $.`* $&¶

Metti ciascuna macchina sulla sua linea ( $.`* $&¶) e aggiungi un rientro a seconda della velocità della macchina; le auto in movimento a sinistra ottengono la velocità complementare, mentre le auto in movimento ottengono 5 in più della velocità.

T`d`5-1`<.

Svuota le cifre della macchina in movimento a sinistra.

m`^.{0,5}

Sposta tutte le macchine 5 a sinistra. Questo risolve il rientro di tutte le auto.

G`.

Elimina tutte le auto che si sono spostate a sinistra.

N^$`
$.&

Ordinare le auto rimanenti in ordine orizzontale inverso.

{

Ripetere le fasi rimanenti fino a quando tutte le auto non sono state elaborate.

+m`\A( *)  (.*)¶\1(..?)$
$1$3$2

Finché la prossima auto non si schianta, aggiungila al risultato.

m`^\A( *)( *)..(.*)¶\1(..?)$
$1##$.2*#$3

Aggiungi un'auto in crash al risultato.