Rubí, 217
->a{r=''
z=a.index ?@
a.tr!('<^>v',b='awds').scan(/\w/){c=0
e,n=[a[z,c+=1][?\n]?p: c,d=c*a[/.*
/].size,a[z-c,c][?\n]?p: -c,-d].zip(b.chars).reject{|i,k|!i||a[v=i+z]!=k||0>v}.max_by{|q|q&[a[z]]}until n
z+=e
r=n*c+r}
r}
Esto comienza en el @
y camina hacia atrás, buscando vecinos que apunten a la posición actual ( z
). Para elegir el camino correcto en las intersecciones de 4 vías, favorece a los vecinos que apuntan en la misma dirección ( max_by{...}
). Si no se encuentran vecinos inmediatos, se supone que debe haber habido un cruce y alcanza un nivel a la vez hasta que encuentre uno ( until n
y c+=1
). Este proceso se repite para la cantidad de segmentos del cuerpo (sin incluir la cabeza) ( .scan(/\w/){...}
).
El caso de prueba que agregué al acertijo me hizo tropezar, así que pasé de 182 caracteres a 218. Esos personajes adicionales se aseguraban de que mis movimientos horizontales no entraran en las líneas siguiente / anterior. Me pregunto si puedo lidiar con eso de una mejor manera.
Sin golf:
f=->a{
result=''
position=a.index ?@ # start at the @
a.tr!('<^>v',b='awds') # translate arrows to letters
a.scan(/\w/){ # for each letter found...
search_distance=0
until distance
search_distance+=1
neighbors = [
a[position,search_distance][?\n]?p: search_distance, # look right by search_distance unless there's a newline
width=search_distance*a[/.*\n/].size, # look down (+width)
a[position-search_distance,search_distance][?\n]?p: -search_distance, # look left unless there's a newline
-width # look up (-width)
]
distance,letter = neighbors.zip(b.chars).reject{ |distance, letter_to_find|
!distance || # eliminate nulls
a[new_position=distance+position]!=letter_to_find || # only look for the letter that "points" at me
0>new_position # and make sure we're not going into negative indices
}.max_by{ |q|
# if there are two valid neighbors, we're at a 4-way intersection
# this will make sure we prefer the neighbor who points in the same
# direction we're pointing in. E.g., when position is in the middle of
# the below, the non-rejected array includes both the top and left.
# v
# >>>
# v
# We want to prefer left.
q & [a[position]]
# ['>',x] & ['>'] == ['>']
# ['v',x] & ['>'] == []
# ['>'] > [], so we select '>'.
}
end
position+=distance
result=(letter*search_distance)+result # prepend result
}
result # if anyone has a better way of returning result, I'm all ears
}