Текстовий вирішувач лабіринту


14

Враховуючи лабіринт на stdin та точку входу, напишіть програму, яка друкує шлях до виходу на stdout. Будь-який шлях прийнятний до тих пір, поки ваша програма не генерує тривіальний шлях (проходить через кожну точку лабіринту) для кожного лабіринту.

На вході стіни позначаються a, #а точка входу - a @. Ви можете використовувати будь-які символи, щоб намалювати лабіринт і шлях у висновку, якщо вони всі виразні.

Ви можете припустити, що:

  • Точки входу та виходу знаходяться на краях входу
  • Кожен рядок вводу має однакову довжину
  • Лабіринт розв’язний і не має циклів
  • Є лише одна точка виходу

Найкоротше рішення (Unicode) кількість перемог.

Приклади

(зауважте, що входи прокладені пробілами)

####   
#  #   
@ #####
#     #
#      
#######

####
#  #
@*#####
#*    #
#******
#######

### ###################
###         #         #
##  #########      #  #
 #             #####  #
 ###############   #@##

###*###################
###*********#*********#
## *#########*     # *#
 # *********** #####**#
 ###############   #@##

Чи можу я також додати символ для кінцевої точки? Це значно полегшило б мою програму знати, коли закінчитися.
Пітер Олсон

@ Петер кукурудзи: Звичайно. Не потрібно використовувати один і той же символ, щоб намалювати весь шлях, він просто повинен відрізнятися від решти результатів.
Lowjacker

Відповіді:


5

Рубін 1,9, 244 символи

l=*$<
i=l*""
e=[]
d=[1,-1,x=l[0].size,-x]
r=[f=9e9]*s=x*b=l.size;r[i=~/@/]=0
r.map{i.gsub(/ /){r[p=$`.size]=d.map{|u|p>-u&&r[u+p]||f}.min+1;e<<p if p%x%~-~-x*(p/-~x%~-b)<1}}
r[g=e.find{|i|r[i]<f}].times{i[g]=?*;g+=d.find{|l|r[g]>r[g+l]}}
puts i

Вихід для двох прикладів:

####   
#  #   
@*#####
#*    #
#******
#######

###*###################
###*        #     *** #
## *######### *****#* #
 # ************#####* #
 ###############   #@##

Зміни:

  • (247 -> 245) Накреслив е і перейменував його на g
  • (245 -> 249) Виправте помилку, коли вихід прямо над входом
  • (249 -> 246) Вкладиш + спрощення
  • (246 -> 244) Коротший шлях до перегляду кожного поля

8

ANSI C ( 384 373 368 символів)

Ось моя спроба С. Складено і запускається на Mac OS X.

m[9999],*r=m,*s=m,c,R=0,*a,L;
P(){while(*s++)putchar(*(s-1));}
C(int*l){if((l-s+2)%R==0||(l-s)%R==0||l-s<R||l>r-R)*l=42,P(),exit(0);}
e(int*l){if(*l==32)C(l),*l=42,e(l-1),*l=32,*l=42,e(l-R),*l=32,*l=42,e(l+1),*l=32,*l=42,e(l+R),*l=32;}
main(){while(~(c=getchar()))*r++=c,R=!R&&c==10?r-s:R,L=c==64?r-s-1:L;L%R==0&&e(s+L+1);(L+2)%R==0&&e(s+L-1);L<R&&e(s+L+R);e(s+L-R);}

Вибірка зразка для пари тестів:

####   
#  #   
@*#####
#*****#
#    *#
#####*#

###*###################
###*        #******** #
##**#########**    #* #
 #*************#####* #
 ###############   #@##

Обмеження: працює лише для лабіринтів до 1000 символів, але це можна легко збільшити. Я просто вибрав довільне число, а не морочився на malloc / remalloc.

Крім того, це самий попереджений код, який я коли-небудь писав. 19 попереджень, хоча це виглядає ще більше, якщо підкреслити код XCode. : D

EDITS: Відредаговано та перевірено на випадання int з main, використовувати ~ замість! = EOF та putchar замість printf. Дякуємо за коментарі!


Ви можете використовувати 9999 - це стільки ж символів
Lowjacker

Хороша робота! Пропустіть " int " раніше mainі збережіть 4 символи. Також використовуйте putchar(*(s-1))замість того, printf("%c",*(s-1))щоб зберегти ще 4.
Кейсі

Ви також можете замінити 0xAна 10і !=на ^.
Lowjacker

Ще краще: ви можете скористатися ~оператором, щоб перевірити наявність EOF:while(~(c=getchar())
Lowjacker

Я також можу скинути захист! L&& на налаштуваннях L, розташування в лабіринті "@".
Джонатан Ватмоф

4

Пітон, 339 символів

import sys
M=list(sys.stdin.read())
L=len(M)
R=range(L)
N=M.index('\n')+1
D=2*L*[9e9]
D[M.index('@')+N]=0
J=(1,-1,N,-N)
for x in R:
 for i in[N+i for i in R if' '==M[i]]:D[i]=min(1+D[i+j]for j in J)
e=[i+N for i in R[:N]+R[::N]+R[N-2::N]+R[-N:]if 0<D[i+N]<9e9][0]
while D[e]:M[e-N]='*';e=[e+j for j in J if D[e+j]<D[e]][0]
print''.join(M)

Породжує найкоротший шлях через лабіринт.

Виведіть, наприклад, лабіринти:

####   
#  #   
@*#####
#*    #
#******
#######

###*###################
###*        #     *** #
## *######### *****#* #
 # ************#####* #
 ###############   #@##

Чому всі додавання та віднімання на N?
Lowjacker

Це заважає індексуванню D [i + j] у рядку 10 переходити до негативного. І D [e + j] у рядку 12.
Кіт Рендалл

1

Пітон - 510 421 символів

m=[]
i=raw_input
l=i()
x=y=-1
while l:
 if y<0:x+=1;y=l.find('@')
 m.append(list(l));l=i()
s=(x,y)
t={}
q=[s]
v={s:1}
while 1:
 try:(i,j),q=q[0],q[1:];c=m[i][j]
 except:continue
 if c==' 'and(i*j==0)|(i+1==len(m))|(j+1==len(m[0])):break
 for d,D in(-1,0),(0,-1),(1,0),(0,1):
  p=(i+d,j+D)
  if not p in v and'#'!=c:v[p]=0;q.append(p);t[p]=(i,j)
while(i,j)!=s:m[i][j]='*';i,j=t[(i,j)]
print'\n'.join(''.join(l)for l in m)

Я отримую в *правому нижньому куті, на першому тестовому випадку (python 2.6.1). Будь-які думки?
Lowjacker

@Lowjacker Дякую, схоже, що під час гольфу я додав помилку, яка зробила так, що вона спрацювала, але тільки для тестових випадків, і навіть тоді ледве: P
Хуан,

Добре, це працює і зараз. Але ви забули вийняти print b,rі той print (i,j), який, я вважаю, був для налагодження :)
Lowjacker

0

Python 3 , 275 байт

import sys
def q(g,s=[]):w=len(g[0])+1;k='@'.join(g)+w*'@';*p,x=s or[k.find('#')];return'@'>k[x]and{x}-{*p}and[p,min((q(g,s+[x+a])or k for a in(-1,1,-w,w)),key=len)]['*'>k[x]]
g=''.join(sys.stdin.read());s=q(g.split('\n'))
for i in range(len(g)):print(end=[g[i],'+'][i in s])

Спробуйте в Інтернеті!

Порт моєї відповіді, щоб знайти найкоротший маршрут на дорозі ASCII .

Використовується '#'для запуску, '*'для кінця, '@'для стіни та ' 'для порожнього простору. У цьому функція qє хелперною функцією, яка повертає одновимірний масив з найкоротшим шляхом у лабіринті. Функцію fможна скоротити на 4 байти, не призначивши змінну s. Це неймовірно неефективно і, швидше за все, вичерпає час, оскільки воно викликає функцію пошуку шляху для кожного персонажа в лабіринті.

Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.