0000: 69 6d 70 6f 72 74 20 75 74 69 6c 3b 0a 69 6d 70 import util;.imp
0010: 6f 72 74 20 67 61 6d 65 3b 0a 0a 63 6c 61 73 73 ort game;..class
0020: 20 53 6f 6c 76 65 72 5f 30 0a 7b 0a 09 74 68 69 Solver_0.{..thi
0030: 73 28 63 6f 6e 73 74 28 47 61 6d 65 29 20 67 29 s(const(Game) g)
0040: 20 7b 7d 0a 09 63 68 61 72 20 73 69 6e 67 6c 65 {}..char single
0050: 5f 73 74 65 70 28 29 20 7b 20 72 65 74 75 72 6e _step() { return
0060: 20 27 57 27 3b 20 7d 0a 7d 0a 0a 63 6c 61 73 73 'W'; }.}..class
0070: 20 53 6f 6c 76 65 72 5f 31 0a 7b 0a 09 69 6e 74 Solver_1.{..int
0080: 20 77 61 69 74 5f 63 6f 75 6e 74 20 3d 20 30 3b wait_count = 0;
0090: 0a 09 69 6e 74 20 63 68 6f 6b 65 5f 63 6f 75 6e ..int choke_coun
00a0: 74 20 3d 20 30 3b 0a 0a 09 47 61 6d 65 20 67 3b t = 0;...Game g;
00b0: 0a 09 74 68 69 73 28 63 6f 6e 73 74 28 47 61 6d ..this(const(Gam
00c0: 65 29 20 67 29 0a 09 7b 0a 09 09 74 68 69 73 2e e) g)..{...this.
00d0: 67 20 3d 20 67 2e 63 6c 6f 6e 65 28 29 3b 0a 09 g = g.clone();..
00e0: 09 66 6f 72 62 69 64 64 65 6e 5f 63 65 6c 6c 20 .forbidden_cell
00f0: 3d 20 6e 65 77 20 62 6f 6f 6c 5b 5d 5b 5d 28 67 = new bool[][](g
0100: 2e 6d 61 70 2e 48 2b 32 2c 20 67 2e 6d 61 70 2e .map.H+2, g.map.
0110: 57 2b 32 29 3b 0a 09 7d 0a 0a 09 63 68 61 72 20 W+2);..}...char
0120: 73 69 6e 67 6c 65 5f 73 74 65 70 28 29 0a 09 7b single_step()..{
0130: 0a 09 09 54 75 70 6c 65 21 28 73 74 72 69 6e 67 ...Tuple!(string
0140: 2c 69 6e 74 29 20 64 65 20 3d 20 64 65 61 74 68 ,int) de = death
0150: 5f 6d 6f 76 65 28 67 29 3b 0a 09 09 63 68 61 72 _move(g);...char
0160: 20 63 20 3d 20 61 63 74 28 67 2c 20 64 65 5b 30 c = act(g, de[0
0170: 5d 2c 20 64 65 5b 31 5d 29 3b 0a 09 09 67 2e 63 ], de[1]);...g.c
0180: 6f 6d 6d 61 6e 64 28 63 29 3b 0a 09 09 72 65 74 ommand(c);...ret
0190: 75 72 6e 20 63 3b 0a 09 7d 0a 0a 09 54 75 70 6c urn c;..}...Tupl
01a0: 65 21 28 73 74 72 69 6e 67 2c 69 6e 74 29 20 64 e!(string,int) d
01b0: 65 61 74 68 5f 6d 6f 76 65 28 63 6f 6e 73 74 28 eath_move(const(
01c0: 47 61 6d 65 29 20 67 29 0a 09 7b 0a 09 09 73 74 Game) g)..{...st
01d0: 72 69 6e 67 20 64 65 61 74 68 3b 0a 09 09 69 6e ring death;...in
01e0: 74 20 63 68 6f 69 63 65 20 3d 20 30 3b 0a 09 09 t choice = 0;...
01f0: 66 6f 72 65 61 63 68 28 63 68 61 72 20 63 3b 20 foreach(char c;
0200: 22 55 44 4c 52 57 22 29 20 7b 0a 09 09 09 47 61 "UDLRW") {....Ga
0210: 6d 65 20 67 67 20 3d 20 67 2e 63 6c 6f 6e 65 28 me gg = g.clone(
0220: 29 3b 0a 09 09 09 67 67 2e 63 6f 6d 6d 61 6e 64 );....gg.command
0230: 28 63 29 3b 0a 09 09 09 69 66 28 20 21 67 67 2e (c);....if( !gg.
0240: 63 6c 65 61 72 65 64 20 26 26 20 67 67 2e 64 65 cleared && gg.de
0250: 61 64 20 29 0a 09 09 09 09 64 65 61 74 68 20 7e ad ).....death ~
0260: 3d 20 63 3b 0a 09 09 09 65 6c 73 65 20 69 66 28 = c;....else if(
0270: 20 67 67 2e 6d 61 70 2e 72 6f 62 6f 74 20 21 3d gg.map.robot !=
0280: 20 67 2e 6d 61 70 2e 72 6f 62 6f 74 20 29 0a 09 g.map.robot )..
0290: 09 09 09 63 68 6f 69 63 65 2b 2b 3b 0a 09 09 09 ...choice++;....
02a0: 65 6c 73 65 20 69 66 28 20 63 20 21 3d 20 27 57 else if( c != 'W
02b0: 27 20 29 20 2f 2f 20 6d 65 61 6e 69 6e 67 6c 65 ' ) // meaningle
02c0: 73 73 20 6d 6f 76 65 0a 09 09 09 09 64 65 61 74 ss move.....deat
02d0: 68 20 7e 3d 20 63 3b 0a 09 09 7d 0a 09 09 72 65 h ~= c;...}...re
02e0: 74 75 72 6e 20 74 75 70 6c 65 28 64 65 61 74 68 turn tuple(death
02f0: 2c 20 63 68 6f 69 63 65 29 3b 0a 09 7d 0a 0a 09 , choice);..}...
0300: 54 75 70 6c 65 21 28 50 6f 73 2c 20 69 6e 74 29 Tuple!(Pos, int)
0310: 5b 5d 20 6c 6f 67 3b 0a 09 62 6f 6f 6c 5b 5d 5b [] log;..bool[][
0320: 5d 20 66 6f 72 62 69 64 64 65 6e 5f 63 65 6c 6c ] forbidden_cell
0330: 3b 0a 0a 09 63 68 61 72 20 61 63 74 28 63 6f 6e ;...char act(con
0340: 73 74 28 47 61 6d 65 29 20 67 2c 20 73 74 72 69 st(Game) g, stri
0350: 6e 67 20 64 65 61 74 68 2c 20 69 6e 74 20 62 72 ng death, int br
0360: 65 61 74 68 29 0a 09 7b 0a 09 09 63 6f 6e 73 74 eath)..{...const
0370: 20 50 6f 73 20 20 20 72 6f 20 3d 20 67 2e 6d 61 Pos ro = g.ma
0380: 70 2e 72 6f 62 6f 74 3b 0a 09 09 63 6f 6e 73 74 p.robot;...const
0390: 20 50 6f 73 5b 5d 20 6c 61 20 3d 20 67 2e 6d 61 Pos[] la = g.ma
03a0: 70 2e 6c 61 6d 62 64 61 73 28 29 3b 0a 09 09 63 p.lambdas();...c
03b0: 6f 6e 73 74 20 50 6f 73 5b 5d 20 72 61 20 3d 20 onst Pos[] ra =
03c0: 67 2e 6d 61 70 2e 72 61 7a 6f 72 73 28 29 3b 0a g.map.razors();.
03d0: 09 09 63 6f 6e 73 74 20 50 6f 73 20 20 20 6c 69 ..const Pos li
03e0: 20 3d 20 67 2e 6d 61 70 2e 6c 69 66 74 3b 0a 09 = g.map.lift;..
03f0: 09 63 6f 6e 73 74 20 50 6f 73 5b 5d 20 68 69 20 .const Pos[] hi
0400: 3d 20 67 2e 6d 61 70 2e 6f 62 6a 65 63 74 73 28 = g.map.objects(
0410: 27 57 27 29 3b 0a 0a 09 09 54 75 70 6c 65 21 28 'W');....Tuple!(
0420: 63 68 61 72 2c 69 6e 74 29 5b 5d 20 63 61 6e 64 char,int)[] cand
0430: 3b 0a 09 09 63 68 61 72 20 63 20 3d 20 27 57 27 ;...char c = 'W'
0440: 3b 0a 09 09 69 66 28 20 6c 61 2e 65 6d 70 74 79 ;...if( la.empty
0450: 20 29 20 7b 0a 09 09 09 63 61 6e 64 20 3d 20 73 ) {....cand = s
0460: 65 61 72 63 68 28 67 2c 20 72 6f 2c 20 5b 6c 69 earch(g, ro, [li
0470: 5d 2c 20 64 65 61 74 68 29 3b 0a 09 09 7d 20 65 ], death);...} e
0480: 6c 73 65 20 7b 0a 09 09 09 63 61 6e 64 20 7e 3d lse {....cand ~=
0490: 20 73 65 61 72 63 68 28 67 2c 20 72 6f 2c 20 6c search(g, ro, l
04a0: 61 7e 72 61 2c 20 64 65 61 74 68 29 3b 0a 09 09 a~ra, death);...
04b0: 7d 0a 0a 09 09 2f 2f 20 27 68 69 67 65 73 6f 72 }....// 'higesor
04c0: 69 27 20 6d 6f 64 65 0a 09 09 69 66 28 20 21 68 i' mode...if( !h
04d0: 69 2e 65 6d 70 74 79 20 26 26 20 67 2e 6d 61 70 i.empty && g.map
04e0: 2e 72 61 7a 6f 72 3e 30 20 29 20 7b 0a 09 09 09 .razor>0 ) {....
04f0: 69 6e 74 20 68 69 73 20 3d 20 30 3b 0a 09 09 09 int his = 0;....
0500: 66 6f 72 28 69 6e 74 20 64 79 3d 2d 31 3b 20 64 for(int dy=-1; d
0510: 79 3c 3d 2b 31 3b 20 2b 2b 64 79 29 0a 09 09 09 y<=+1; ++dy)....
0520: 66 6f 72 28 69 6e 74 20 64 78 3d 2d 31 3b 20 64 for(int dx=-1; d
0530: 78 3c 3d 2b 31 3b 20 2b 2b 64 78 29 0a 09 09 09 x<=+1; ++dx)....
0540: 09 69 66 28 67 2e 6d 61 70 5b 72 6f 2e 79 2b 64 .if(g.map[ro.y+d
0550: 79 2c 72 6f 2e 78 2b 64 78 5d 20 3d 3d 20 27 57 y,ro.x+dx] == 'W
0560: 27 29 0a 09 09 09 09 09 68 69 73 2b 2b 3b 0a 0a ')......his++;..
0570: 09 09 09 69 66 28 68 69 73 3e 3d 32 20 7c 7c 20 ...if(his>=2 ||
0580: 68 69 73 3d 3d 68 69 2e 6c 65 6e 67 74 68 29 0a his==hi.length).
0590: 09 09 09 09 63 61 6e 64 20 3d 20 5b 74 75 70 6c ....cand = [tupl
05a0: 65 28 27 53 27 2c 69 6e 74 2e 6d 61 78 29 5d 3b e('S',int.max)];
05b0: 0a 09 09 09 69 66 28 63 61 6e 64 2e 65 6d 70 74 ....if(cand.empt
05c0: 79 29 20 7b 0a 09 09 09 09 63 6f 6e 73 74 28 50 y) {.....const(P
05d0: 6f 73 29 5b 5d 20 74 67 74 3b 0a 09 09 09 09 66 os)[] tgt;.....f
05e0: 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d 67 or(int y=1; y<=g
05f0: 2e 6d 61 70 2e 48 3b 20 2b 2b 79 29 0a 09 09 09 .map.H; ++y)....
0600: 09 66 6f 72 28 69 6e 74 20 78 3d 31 3b 20 78 3c .for(int x=1; x<
0610: 3d 67 2e 6d 61 70 2e 57 3b 20 2b 2b 78 29 0a 09 =g.map.W; ++x)..
0620: 09 09 09 09 69 66 28 67 2e 6d 61 70 5b 79 2c 78 ....if(g.map[y,x
0630: 5d 3d 3d 27 2e 27 7c 7c 67 2e 6d 61 70 5b 79 2c ]=='.'||g.map[y,
0640: 78 5d 3d 3d 27 20 27 29 20 7b 0a 09 09 09 09 09 x]==' ') {......
0650: 09 68 69 73 20 3d 20 30 3b 0a 09 09 09 09 09 09 .his = 0;.......
0660: 66 6f 72 28 69 6e 74 20 64 79 3d 2d 31 3b 20 64 for(int dy=-1; d
0670: 79 3c 3d 2b 31 3b 20 2b 2b 64 79 29 0a 09 09 09 y<=+1; ++dy)....
0680: 09 09 09 66 6f 72 28 69 6e 74 20 64 78 3d 2d 31 ...for(int dx=-1
0690: 3b 20 64 78 3c 3d 2b 31 3b 20 2b 2b 64 78 29 0a ; dx<=+1; ++dx).
06a0: 09 09 09 09 09 09 09 69 66 28 67 2e 6d 61 70 5b .......if(g.map[
06b0: 79 2b 64 79 2c 78 2b 64 78 5d 20 3d 3d 20 27 57 y+dy,x+dx] == 'W
06c0: 27 29 0a 09 09 09 09 09 09 09 09 68 69 73 2b 2b ').........his++
06d0: 3b 0a 09 09 09 09 09 09 69 66 28 68 69 73 3e 3d ;.......if(his>=
06e0: 32 29 0a 09 09 09 09 09 09 09 74 67 74 20 7e 3d 2)........tgt ~=
06f0: 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 3b 0a 09 new Pos(y,x);..
0700: 09 09 09 09 7d 0a 09 09 09 09 63 61 6e 64 20 7e ....}.....cand ~
0710: 3d 20 73 65 61 72 63 68 28 67 2c 20 72 6f 2c 20 = search(g, ro,
0720: 74 67 74 2c 20 64 65 61 74 68 2c 20 74 72 75 65 tgt, death, true
0730: 29 3b 0a 09 09 09 7d 0a 09 09 7d 0a 0a 09 09 2f );....}...}..../
0740: 2f 20 27 64 69 67 27 20 6d 6f 64 65 0a 09 09 69 / 'dig' mode...i
0750: 66 28 63 61 6e 64 2e 65 6d 70 74 79 29 20 7b 0a f(cand.empty) {.
0760: 09 09 09 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 ...const(Pos)[]
0770: 74 67 74 3b 0a 09 09 09 66 6f 72 28 69 6e 74 20 tgt;....for(int
0780: 79 3d 31 3b 20 79 3c 3d 67 2e 6d 61 70 2e 48 3b y=1; y<=g.map.H;
0790: 20 2b 2b 79 29 0a 09 09 09 66 6f 72 28 69 6e 74 ++y)....for(int
07a0: 20 78 3d 31 3b 20 78 3c 3d 67 2e 6d 61 70 2e 57 x=1; x<=g.map.W
07b0: 3b 20 2b 2b 78 29 0a 09 09 09 09 69 66 28 67 2e ; ++x).....if(g.
07c0: 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e 27 29 0a 09 map[y,x]=='.')..
07d0: 09 09 09 09 69 66 28 67 2e 6d 61 70 5b 79 2b 31 ....if(g.map[y+1
07e0: 2c 78 5d 3d 3d 27 2a 27 7c 7c 67 2e 6d 61 70 5b ,x]=='*'||g.map[
07f0: 79 2b 31 2c 78 2d 31 5d 3d 3d 27 2a 27 7c 7c 67 y+1,x-1]=='*'||g
0800: 2e 6d 61 70 5b 79 2b 31 2c 78 2b 31 5d 3d 3d 27 .map[y+1,x+1]=='
0810: 2a 27 0a 09 09 09 09 09 20 7c 7c 67 2e 6d 61 70 *'...... ||g.map
0820: 5b 79 2c 78 2b 31 5d 3d 3d 27 2a 27 7c 7c 67 2e [y,x+1]=='*'||g.
0830: 6d 61 70 5b 79 2c 78 2d 31 5d 3d 3d 27 2a 27 29 map[y,x-1]=='*')
0840: 0a 09 09 09 09 09 09 74 67 74 20 7e 3d 20 6e 65 .......tgt ~= ne
0850: 77 20 50 6f 73 28 79 2c 78 29 3b 0a 09 09 09 63 w Pos(y,x);....c
0860: 61 6e 64 20 7e 3d 20 73 65 61 72 63 68 28 67 2c and ~= search(g,
0870: 20 72 6f 2c 20 74 67 74 2c 20 64 65 61 74 68 2c ro, tgt, death,
0880: 20 74 72 75 65 29 3b 0a 09 09 7d 0a 0a 09 09 69 true);...}....i
0890: 66 28 63 61 6e 64 2e 65 6d 70 74 79 29 20 7b 0a f(cand.empty) {.
08a0: 09 09 09 63 68 6f 6b 65 5f 63 6f 75 6e 74 2b 2b ...choke_count++
08b0: 3b 0a 09 09 09 63 61 6e 64 20 7e 3d 20 74 75 70 ;....cand ~= tup
08c0: 6c 65 28 27 57 27 2c 69 6e 74 2e 6d 61 78 29 3b le('W',int.max);
08d0: 0a 09 09 7d 0a 09 09 73 6f 72 74 21 28 28 54 75 ...}...sort!((Tu
08e0: 70 6c 65 21 28 63 68 61 72 2c 69 6e 74 29 20 63 ple!(char,int) c
08f0: 31 2c 20 54 75 70 6c 65 21 28 63 68 61 72 2c 69 1, Tuple!(char,i
0900: 6e 74 29 20 63 32 29 7b 0a 09 09 09 69 66 28 63 nt) c2){....if(c
0910: 31 5b 31 5d 20 21 3d 20 63 32 5b 31 5d 29 0a 09 1[1] != c2[1])..
0920: 09 09 09 72 65 74 75 72 6e 20 63 31 5b 31 5d 20 ...return c1[1]
0930: 3c 20 63 32 5b 31 5d 3b 0a 09 09 09 72 65 74 75 < c2[1];....retu
0940: 72 6e 20 63 31 5b 30 5d 20 3c 20 63 32 5b 30 5d rn c1[0] < c2[0]
0950: 3b 0a 09 09 7d 29 28 63 61 6e 64 29 3b 0a 09 09 ;...})(cand);...
0960: 63 20 3d 20 63 61 6e 64 5b 30 5d 5b 30 5d 3b 0a c = cand[0][0];.
0970: 0a 09 09 69 66 28 64 65 61 74 68 2e 63 6f 75 6e ...if(death.coun
0980: 74 28 63 29 20 7c 7c 20 77 61 69 74 5f 63 6f 75 t(c) || wait_cou
0990: 6e 74 3e 3d 32 29 20 7b 0a 09 09 09 66 6f 72 65 nt>=2) {....fore
09a0: 61 63 68 28 63 68 61 72 20 6c 69 76 65 3b 20 22 ach(char live; "
09b0: 55 44 4c 52 57 22 29 0a 09 09 09 09 69 66 28 64 UDLRW").....if(d
09c0: 65 61 74 68 2e 63 6f 75 6e 74 28 6c 69 76 65 29 eath.count(live)
09d0: 3d 3d 30 29 20 7b 0a 09 09 09 09 09 63 3d 6c 69 ==0) {......c=li
09e0: 76 65 3b 0a 09 09 09 09 09 62 72 65 61 6b 3b 0a ve;......break;.
09f0: 09 09 09 09 7d 0a 09 09 7d 0a 0a 09 09 69 66 28 ....}...}....if(
0a00: 63 20 3d 3d 20 27 57 27 29 0a 09 09 09 77 61 69 c == 'W')....wai
0a10: 74 5f 63 6f 75 6e 74 2b 2b 3b 0a 09 09 65 6c 73 t_count++;...els
0a20: 65 0a 09 09 09 77 61 69 74 5f 63 6f 75 6e 74 20 e....wait_count
0a30: 3d 20 30 3b 0a 09 09 69 66 28 63 68 6f 6b 65 5f = 0;...if(choke_
0a40: 63 6f 75 6e 74 20 3e 3d 20 67 2e 6d 61 70 2e 48 count >= g.map.H
0a50: 29 0a 09 09 09 63 20 3d 20 27 41 27 3b 0a 0a 09 )....c = 'A';...
0a60: 09 62 6f 6f 6c 5b 63 68 61 72 5d 20 63 68 6f 69 .bool[char] choi
0a70: 63 65 3b 0a 09 09 66 6f 72 65 61 63 68 28 74 3b ce;...foreach(t;
0a80: 20 63 61 6e 64 29 0a 09 09 09 63 68 6f 69 63 65 cand)....choice
0a90: 5b 74 5b 30 5d 5d 20 3d 20 74 72 75 65 3b 0a 09 [t[0]] = true;..
0aa0: 09 6c 6f 67 20 7e 3d 20 74 75 70 6c 65 28 72 6f .log ~= tuple(ro
0ab0: 2e 63 6c 6f 6e 65 28 29 2c 20 63 61 73 74 28 69 .clone(), cast(i
0ac0: 6e 74 29 63 68 6f 69 63 65 2e 6c 65 6e 67 74 68 nt)choice.length
0ad0: 29 3b 0a 09 09 69 66 28 6c 6f 67 2e 6c 65 6e 67 );...if(log.leng
0ae0: 74 68 20 3e 20 35 29 0a 09 09 09 6c 6f 67 20 3d th > 5)....log =
0af0: 20 6c 6f 67 5b 24 2d 35 2e 2e 24 5d 3b 0a 09 09 log[$-5..$];...
0b00: 69 6e 74 20 63 6e 74 20 3d 20 30 3b 0a 09 09 66 int cnt = 0;...f
0b10: 6f 72 65 61 63 68 28 6c 3b 20 6c 6f 67 29 0a 09 oreach(l; log)..
0b20: 09 09 69 66 28 6c 5b 30 5d 20 3d 3d 20 6c 6f 67 ..if(l[0] == log
0b30: 5b 24 2d 31 5d 5b 30 5d 29 0a 09 09 09 09 2b 2b [$-1][0]).....++
0b40: 63 6e 74 3b 0a 09 09 69 66 28 20 63 6e 74 20 3e cnt;...if( cnt >
0b50: 3d 20 33 20 26 26 20 62 72 65 61 74 68 3d 3d 31 = 3 && breath==1
0b60: 20 29 20 7b 0a 09 09 09 66 6f 72 62 69 64 64 65 ) {....forbidde
0b70: 6e 5f 63 65 6c 6c 5b 72 6f 2e 79 5d 5b 72 6f 2e n_cell[ro.y][ro.
0b80: 78 5d 20 3d 20 74 72 75 65 3b 0a 09 09 7d 0a 0a x] = true;...}..
0b90: 09 09 72 65 74 75 72 6e 20 63 3b 0a 09 7d 0a 0a ..return c;..}..
0ba0: 09 54 75 70 6c 65 21 28 63 68 61 72 2c 69 6e 74 .Tuple!(char,int
0bb0: 29 5b 5d 20 73 65 61 72 63 68 28 69 6e 20 47 61 )[] search(in Ga
0bc0: 6d 65 20 67 2c 20 69 6e 20 50 6f 73 20 73 2c 20 me g, in Pos s,
0bd0: 69 6e 20 50 6f 73 5b 5d 20 67 73 2c 20 73 74 72 in Pos[] gs, str
0be0: 69 6e 67 20 64 65 61 74 68 2c 20 62 6f 6f 6c 20 ing death, bool
0bf0: 64 61 6e 67 65 72 5f 6f 6b 3d 66 61 6c 73 65 29 danger_ok=false)
0c00: 0a 09 7b 0a 09 09 62 6f 6f 6c 20 64 61 6e 67 65 ..{...bool dange
0c10: 72 28 69 6e 74 20 79 2c 20 69 6e 74 20 78 29 0a r(int y, int x).
0c20: 09 09 7b 0a 09 09 09 69 66 28 67 2e 6d 61 70 5b ..{....if(g.map[
0c30: 79 2c 78 5d 20 3d 3d 20 27 20 27 20 7c 7c 20 67 y,x] == ' ' || g
0c40: 2e 6d 61 70 5b 79 2c 78 5d 20 3d 3d 20 27 52 27 .map[y,x] == 'R'
0c50: 29 0a 09 09 09 09 72 65 74 75 72 6e 20 66 61 6c ).....return fal
0c60: 73 65 3b 0a 09 09 09 69 66 28 67 2e 6d 61 70 5b se;....if(g.map[
0c70: 79 2b 31 2c 78 5d 20 3d 3d 20 27 2a 27 29 0a 09 y+1,x] == '*')..
0c80: 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0a ...return true;.
0c90: 09 09 09 69 66 28 67 2e 6d 61 70 5b 79 2b 31 2c ...if(g.map[y+1,
0ca0: 78 2d 31 5d 3d 3d 27 2a 27 20 26 26 20 28 67 2e x-1]=='*' && (g.
0cb0: 6d 61 70 5b 79 2c 78 2d 31 5d 3d 3d 27 5c 5c 27 map[y,x-1]=='\\'
0cc0: 7c 7c 67 2e 6d 61 70 5b 79 2c 78 2d 31 5d 3d 3d ||g.map[y,x-1]==
0cd0: 27 2a 27 29 20 26 26 20 28 67 2e 6d 61 70 5b 79 '*') && (g.map[y
0ce0: 2b 31 2c 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 +1,x]==' '||g.ma
0cf0: 70 5b 79 2b 31 2c 78 5d 3d 3d 27 52 27 29 29 0a p[y+1,x]=='R')).
0d00: 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b ....return true;
0d10: 0a 09 09 09 69 66 28 67 2e 6d 61 70 5b 79 2b 31 ....if(g.map[y+1
0d20: 2c 78 2b 31 5d 3d 3d 27 2a 27 20 26 26 20 28 67 ,x+1]=='*' && (g
0d30: 2e 6d 61 70 5b 79 2c 78 2b 31 5d 3d 3d 27 2a 27 .map[y,x+1]=='*'
0d40: 29 20 26 26 20 28 67 2e 6d 61 70 5b 79 2b 31 2c ) && (g.map[y+1,
0d50: 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 70 5b 79 x]==' '||g.map[y
0d60: 2b 31 2c 78 5d 3d 3d 27 52 27 29 29 0a 09 09 09 +1,x]=='R'))....
0d70: 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0a 09 09 .return true;...
0d80: 09 69 66 28 67 2e 6d 61 70 5b 79 2c 78 2d 31 5d .if(g.map[y,x-1]
0d90: 3d 3d 27 2a 27 20 26 26 20 28 67 2e 6d 61 70 5b =='*' && (g.map[
0da0: 79 2d 31 2c 78 2d 31 5d 3d 3d 27 5c 5c 27 7c 7c y-1,x-1]=='\\'||
0db0: 67 2e 6d 61 70 5b 79 2d 31 2c 78 2d 31 5d 3d 3d g.map[y-1,x-1]==
0dc0: 27 2a 27 29 20 26 26 20 28 67 2e 6d 61 70 5b 79 '*') && (g.map[y
0dd0: 2d 31 2c 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 -1,x]==' '||g.ma
0de0: 70 5b 79 2d 31 2c 78 5d 3d 3d 27 52 27 29 29 0a p[y-1,x]=='R')).
0df0: 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b ....return true;
0e00: 0a 09 09 09 69 66 28 67 2e 6d 61 70 5b 79 2c 78 ....if(g.map[y,x
0e10: 2b 31 5d 3d 3d 27 2a 27 20 26 26 20 28 67 2e 6d +1]=='*' && (g.m
0e20: 61 70 5b 79 2d 31 2c 78 2b 31 5d 3d 3d 27 2a 27 ap[y-1,x+1]=='*'
0e30: 29 20 26 26 20 28 67 2e 6d 61 70 5b 79 2d 31 2c ) && (g.map[y-1,
0e40: 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 70 5b 79 x]==' '||g.map[y
0e50: 2d 31 2c 78 5d 3d 3d 27 52 27 29 29 0a 09 09 09 -1,x]=='R'))....
0e60: 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0a 09 09 .return true;...
0e70: 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0a 09 .return false;..
0e80: 09 7d 0a 0a 09 09 2f 2f 20 61 76 6f 69 64 20 64 .}....// avoid d
0e90: 69 72 65 63 74 6c 79 20 62 65 6c 6f 77 20 27 2a irectly below '*
0ea0: 27 0a 09 09 54 75 70 6c 65 21 28 63 68 61 72 2c '...Tuple!(char,
0eb0: 69 6e 74 29 5b 5d 20 74 72 79 41 28 29 20 7b 0a int)[] tryA() {.
0ec0: 09 09 09 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 ...const(Pos)[]
0ed0: 71 3b 0a 09 09 09 66 6f 72 65 61 63 68 28 70 3b q;....foreach(p;
0ee0: 20 67 73 29 0a 09 09 09 09 69 66 28 21 64 61 6e gs).....if(!dan
0ef0: 67 65 72 28 70 2e 79 2c 70 2e 78 29 29 0a 09 09 ger(p.y,p.x))...
0f00: 09 09 09 71 20 7e 3d 20 70 3b 0a 09 09 09 62 6f ...q ~= p;....bo
0f10: 6f 6c 5b 5d 5b 5d 20 76 20 3d 20 6e 65 77 20 62 ol[][] v = new b
0f20: 6f 6f 6c 5b 5d 5b 5d 28 67 2e 6d 61 70 2e 48 2b ool[][](g.map.H+
0f30: 32 2c 20 67 2e 6d 61 70 2e 57 2b 32 29 3b 0a 09 2, g.map.W+2);..
0f40: 09 09 66 6f 72 65 61 63 68 28 70 3b 20 71 29 20 ..foreach(p; q)
0f50: 76 5b 70 2e 79 5d 5b 70 2e 78 5d 3d 74 72 75 65 v[p.y][p.x]=true
0f60: 3b 0a 09 09 09 66 6f 72 28 69 6e 74 20 73 74 65 ;....for(int ste
0f70: 70 3d 31 3b 20 71 2e 6c 65 6e 67 74 68 3b 20 2b p=1; q.length; +
0f80: 2b 73 74 65 70 29 20 7b 0a 09 09 09 09 50 6f 73 +step) {.....Pos
0f90: 5b 5d 20 71 32 3b 0a 09 09 09 09 66 6f 72 65 61 [] q2;.....forea
0fa0: 63 68 28 70 3b 20 71 29 20 7b 0a 09 09 09 09 09 ch(p; q) {......
0fb0: 69 6e 74 5b 5d 20 79 79 79 3d 5b 70 2e 79 2d 31 int[] yyy=[p.y-1
0fc0: 2c 70 2e 79 2b 31 2c 70 2e 79 2c 70 2e 79 5d 3b ,p.y+1,p.y,p.y];
0fd0: 0a 09 09 09 09 09 69 6e 74 5b 5d 20 78 78 78 3d ......int[] xxx=
0fe0: 5b 70 2e 78 2c 70 2e 78 2c 70 2e 78 2d 31 2c 70 [p.x,p.x,p.x-1,p
0ff0: 2e 78 2b 31 5d 3b 0a 09 09 09 09 09 66 6f 72 28 .x+1];......for(
1000: 69 6e 74 20 69 3d 30 3b 20 69 3c 79 79 79 2e 6c int i=0; i<yyy.l
1010: 65 6e 67 74 68 3b 20 2b 2b 69 29 20 7b 0a 09 09 ength; ++i) {...
1020: 09 09 09 09 69 6e 74 20 79 20 3d 20 79 79 79 5b ....int y = yyy[
1030: 69 5d 3b 0a 09 09 09 09 09 09 69 6e 74 20 78 20 i];.......int x
1040: 3d 20 78 78 78 5b 69 5d 3b 0a 09 09 09 09 09 09 = xxx[i];.......
1050: 69 66 28 27 31 27 3c 3d 67 2e 6d 61 70 5b 79 2c if('1'<=g.map[y,
1060: 78 5d 26 26 67 2e 6d 61 70 5b 79 2c 78 5d 3c 3d x]&&g.map[y,x]<=
1070: 27 39 27 29 20 7b 0a 09 09 09 09 09 09 09 66 6f '9') {........fo
1080: 72 65 61 63 68 28 70 70 70 3b 20 67 2e 6d 61 70 reach(ppp; g.map
1090: 2e 74 72 5f 73 6f 75 72 63 65 5b 67 2e 6d 61 70 .tr_source[g.map
10a0: 5b 79 2c 78 5d 5d 29 20 7b 0a 09 09 09 09 09 09 [y,x]]) {.......
10b0: 09 09 79 79 79 20 7e 3d 20 70 70 70 2e 79 3b 0a ..yyy ~= ppp.y;.
10c0: 09 09 09 09 09 09 09 09 78 78 78 20 7e 3d 20 70 ........xxx ~= p
10d0: 70 70 2e 78 3b 0a 09 09 09 09 09 09 09 7d 0a 09 pp.x;........}..
10e0: 09 09 09 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0a ......continue;.
10f0: 09 09 09 09 09 09 7d 0a 09 09 09 09 09 09 69 66 ......}.......if
1100: 28 76 5b 79 5d 5b 78 5d 29 20 63 6f 6e 74 69 6e (v[y][x]) contin
1110: 75 65 3b 0a 09 09 09 09 09 09 69 66 28 79 3d 3d ue;.......if(y==
1120: 73 2e 79 20 26 26 20 78 3d 3d 73 2e 78 20 26 26 s.y && x==s.x &&
1130: 20 69 3c 34 29 20 7b 0a 09 09 09 09 09 09 09 63 i<4) {........c
1140: 68 61 72 20 63 20 3d 20 22 55 44 52 4c 22 5b 69 har c = "UDRL"[i
1150: 5d 3b 0a 09 09 09 09 09 09 09 69 66 28 20 64 65 ];........if( de
1160: 61 74 68 2e 63 6f 75 6e 74 28 63 29 20 3d 3d 20 ath.count(c) ==
1170: 30 20 29 0a 09 09 09 09 09 09 09 09 72 65 74 75 0 ).........retu
1180: 72 6e 20 5b 74 75 70 6c 65 28 63 2c 73 74 65 70 rn [tuple(c,step
1190: 29 5d 3b 0a 09 09 09 09 09 09 7d 20 65 6c 73 65 )];.......} else
11a0: 20 69 66 28 66 6f 72 62 69 64 64 65 6e 5f 63 65 if(forbidden_ce
11b0: 6c 6c 5b 79 5d 5b 78 5d 29 7b 0a 09 09 09 09 09 ll[y][x]){......
11c0: 09 7d 20 65 6c 73 65 20 69 66 28 67 2e 6d 61 70 .} else if(g.map
11d0: 5b 79 2c 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 [y,x]==' '||g.ma
11e0: 70 5b 79 2c 78 5d 3d 3d 27 5c 5c 27 7c 7c 67 2e p[y,x]=='\\'||g.
11f0: 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e 27 7c 7c 67 map[y,x]=='.'||g
1200: 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 21 27 7c 7c .map[y,x]=='!'||
1210: 69 3e 3d 34 29 20 7b 0a 09 09 09 09 09 09 09 69 i>=4) {........i
1220: 66 28 64 61 6e 67 65 72 28 79 2c 78 29 29 0a 09 f(danger(y,x))..
1230: 09 09 09 09 09 09 09 63 6f 6e 74 69 6e 75 65 3b .......continue;
1240: 0a 09 09 09 09 09 09 09 71 32 20 7e 3d 20 6e 65 ........q2 ~= ne
1250: 77 20 50 6f 73 28 79 2c 78 29 3b 0a 09 09 09 09 w Pos(y,x);.....
1260: 09 09 09 76 5b 79 5d 5b 78 5d 3d 74 72 75 65 3b ...v[y][x]=true;
1270: 0a 09 09 09 09 09 09 7d 0a 09 09 09 09 09 7d 0a .......}......}.
1280: 09 09 09 09 7d 0a 09 09 09 09 71 20 3d 20 71 32 ....}.....q = q2
1290: 3b 0a 09 09 09 7d 0a 09 09 09 72 65 74 75 72 6e ;....}....return
12a0: 20 5b 5d 3b 0a 09 09 7d 0a 0a 09 09 2f 2f 20 61 [];...}....// a
12b0: 6e 79 20 65 6d 70 74 79 20 73 70 61 63 65 20 69 ny empty space i
12c0: 73 20 6d 79 20 67 72 6f 75 6e 64 0a 09 09 54 75 s my ground...Tu
12d0: 70 6c 65 21 28 63 68 61 72 2c 69 6e 74 29 5b 5d ple!(char,int)[]
12e0: 20 74 72 79 42 28 29 20 7b 0a 09 09 09 63 6f 6e tryB() {....con
12f0: 73 74 28 50 6f 73 29 5b 5d 20 71 3b 0a 09 09 09 st(Pos)[] q;....
1300: 66 6f 72 65 61 63 68 28 70 3b 20 67 73 29 20 71 foreach(p; gs) q
1310: 20 7e 3d 20 70 3b 0a 09 09 09 62 6f 6f 6c 5b 5d ~= p;....bool[]
1320: 5b 5d 20 76 20 3d 20 6e 65 77 20 62 6f 6f 6c 5b [] v = new bool[
1330: 5d 5b 5d 28 67 2e 6d 61 70 2e 48 2b 32 2c 20 67 ][](g.map.H+2, g
1340: 2e 6d 61 70 2e 57 2b 32 29 3b 0a 09 09 09 66 6f .map.W+2);....fo
1350: 72 65 61 63 68 28 70 3b 20 71 29 20 76 5b 70 2e reach(p; q) v[p.
1360: 79 5d 5b 70 2e 78 5d 3d 74 72 75 65 3b 0a 09 09 y][p.x]=true;...
1370: 09 66 6f 72 28 69 6e 74 20 73 74 65 70 3d 31 30 .for(int step=10
1380: 3b 20 71 2e 6c 65 6e 67 74 68 3b 20 2b 2b 73 74 ; q.length; ++st
1390: 65 70 29 20 7b 0a 09 09 09 09 50 6f 73 5b 5d 20 ep) {.....Pos[]
13a0: 71 32 3b 0a 09 09 09 09 66 6f 72 65 61 63 68 28 q2;.....foreach(
13b0: 70 3b 20 71 29 20 7b 0a 09 09 09 09 09 69 6e 74 p; q) {......int
13c0: 5b 5d 20 79 79 79 3d 5b 70 2e 79 2d 31 2c 70 2e [] yyy=[p.y-1,p.
13d0: 79 2b 31 2c 70 2e 79 2c 70 2e 79 5d 3b 0a 09 09 y+1,p.y,p.y];...
13e0: 09 09 09 69 6e 74 5b 5d 20 78 78 78 3d 5b 70 2e ...int[] xxx=[p.
13f0: 78 2c 70 2e 78 2c 70 2e 78 2d 31 2c 70 2e 78 2b x,p.x,p.x-1,p.x+
1400: 31 5d 3b 0a 09 09 09 09 09 66 6f 72 28 69 6e 74 1];......for(int
1410: 20 69 3d 30 3b 20 69 3c 79 79 79 2e 6c 65 6e 67 i=0; i<yyy.leng
1420: 74 68 3b 20 2b 2b 69 29 20 7b 0a 09 09 09 09 09 th; ++i) {......
1430: 09 69 6e 74 20 79 20 3d 20 79 79 79 5b 69 5d 3b .int y = yyy[i];
1440: 0a 09 09 09 09 09 09 69 6e 74 20 78 20 3d 20 78 .......int x = x
1450: 78 78 5b 69 5d 3b 0a 09 09 09 09 09 09 69 66 28 xx[i];.......if(
1460: 27 31 27 3c 3d 67 2e 6d 61 70 5b 79 2c 78 5d 26 '1'<=g.map[y,x]&
1470: 26 67 2e 6d 61 70 5b 79 2c 78 5d 3c 3d 27 39 27 &g.map[y,x]<='9'
1480: 29 20 7b 0a 09 09 09 09 09 09 09 66 6f 72 65 61 ) {........forea
1490: 63 68 28 70 70 70 3b 20 67 2e 6d 61 70 2e 74 72 ch(ppp; g.map.tr
14a0: 5f 73 6f 75 72 63 65 5b 67 2e 6d 61 70 5b 79 2c _source[g.map[y,
14b0: 78 5d 5d 29 20 7b 0a 09 09 09 09 09 09 09 09 79 x]]) {.........y
14c0: 79 79 20 7e 3d 20 70 70 70 2e 79 3b 0a 09 09 09 yy ~= ppp.y;....
14d0: 09 09 09 09 09 78 78 78 20 7e 3d 20 70 70 70 2e .....xxx ~= ppp.
14e0: 78 3b 0a 09 09 09 09 09 09 09 7d 0a 09 09 09 09 x;........}.....
14f0: 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 ...continue;....
1500: 09 09 09 7d 0a 09 09 09 09 09 09 69 66 28 76 5b ...}.......if(v[
1510: 79 5d 5b 78 5d 29 20 63 6f 6e 74 69 6e 75 65 3b y][x]) continue;
1520: 0a 09 09 09 09 09 09 69 66 28 79 3d 3d 73 2e 79 .......if(y==s.y
1530: 20 26 26 20 78 3d 3d 73 2e 78 20 26 26 20 69 3c && x==s.x && i<
1540: 34 29 20 7b 0a 09 09 09 09 09 09 09 63 68 61 72 4) {........char
1550: 20 63 20 3d 20 22 55 44 52 4c 22 5b 69 5d 3b 0a c = "UDRL"[i];.
1560: 09 09 09 09 09 09 09 69 66 28 20 64 65 61 74 68 .......if( death
1570: 2e 63 6f 75 6e 74 28 63 29 20 3d 3d 20 30 20 29 .count(c) == 0 )
1580: 0a 09 09 09 09 09 09 09 09 72 65 74 75 72 6e 20 .........return
1590: 5b 74 75 70 6c 65 28 63 2c 73 74 65 70 29 5d 3b [tuple(c,step)];
15a0: 0a 09 09 09 09 09 09 7d 20 65 6c 73 65 20 69 66 .......} else if
15b0: 28 66 6f 72 62 69 64 64 65 6e 5f 63 65 6c 6c 5b (forbidden_cell[
15c0: 79 5d 5b 78 5d 29 7b 0a 09 09 09 09 09 09 7d 20 y][x]){.......}
15d0: 65 6c 73 65 20 69 66 28 67 2e 6d 61 70 5b 79 2c else if(g.map[y,
15e0: 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 70 5b 79 x]==' '||g.map[y
15f0: 2c 78 5d 3d 3d 27 5c 5c 27 7c 7c 67 2e 6d 61 70 ,x]=='\\'||g.map
1600: 5b 79 2c 78 5d 3d 3d 27 2e 27 7c 7c 67 2e 6d 61 [y,x]=='.'||g.ma
1610: 70 5b 79 2c 78 5d 3d 3d 27 21 27 7c 7c 69 3e 3d p[y,x]=='!'||i>=
1620: 34 29 20 7b 0a 09 09 09 09 09 09 09 71 32 20 7e 4) {........q2 ~
1630: 3d 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 3b 0a = new Pos(y,x);.
1640: 09 09 09 09 09 09 09 76 5b 79 5d 5b 78 5d 3d 74 .......v[y][x]=t
1650: 72 75 65 3b 0a 09 09 09 09 09 09 7d 0a 09 09 09 rue;.......}....
1660: 09 09 7d 0a 09 09 09 09 7d 0a 09 09 09 09 71 20 ..}.....}.....q
1670: 3d 20 71 32 3b 0a 09 09 09 7d 0a 09 09 09 72 65 = q2;....}....re
1680: 74 75 72 6e 20 5b 5d 3b 0a 09 09 7d 0a 0a 09 09 turn [];...}....
1690: 2f 2f 20 70 75 73 68 20 72 6f 63 6b 73 21 0a 09 // push rocks!..
16a0: 09 54 75 70 6c 65 21 28 63 68 61 72 2c 69 6e 74 .Tuple!(char,int
16b0: 29 5b 5d 20 74 72 79 43 28 29 20 7b 0a 09 09 09 )[] tryC() {....
16c0: 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 71 3b 0a const(Pos)[] q;.
16d0: 09 09 09 66 6f 72 65 61 63 68 28 70 3b 20 67 73 ...foreach(p; gs
16e0: 29 20 71 20 7e 3d 20 70 3b 0a 09 09 09 62 6f 6f ) q ~= p;....boo
16f0: 6c 5b 5d 5b 5d 20 76 20 3d 20 6e 65 77 20 62 6f l[][] v = new bo
1700: 6f 6c 5b 5d 5b 5d 28 67 2e 6d 61 70 2e 48 2b 32 ol[][](g.map.H+2
1710: 2c 20 67 2e 6d 61 70 2e 57 2b 32 29 3b 0a 09 09 , g.map.W+2);...
1720: 09 66 6f 72 65 61 63 68 28 70 3b 20 71 29 20 76 .foreach(p; q) v
1730: 5b 70 2e 79 5d 5b 70 2e 78 5d 3d 74 72 75 65 3b [p.y][p.x]=true;
1740: 0a 09 09 09 66 6f 72 28 69 6e 74 20 73 74 65 70 ....for(int step
1750: 3d 32 30 3b 20 71 2e 6c 65 6e 67 74 68 3b 20 2b =20; q.length; +
1760: 2b 73 74 65 70 29 20 7b 0a 09 09 09 09 50 6f 73 +step) {.....Pos
1770: 5b 5d 20 71 32 3b 0a 09 09 09 09 66 6f 72 65 61 [] q2;.....forea
1780: 63 68 28 70 3b 20 71 29 20 7b 0a 09 09 09 09 09 ch(p; q) {......
1790: 69 6e 74 5b 5d 20 79 79 79 3d 5b 70 2e 79 2d 31 int[] yyy=[p.y-1
17a0: 2c 70 2e 79 2b 31 2c 70 2e 79 2c 70 2e 79 5d 3b ,p.y+1,p.y,p.y];
17b0: 0a 09 09 09 09 09 69 6e 74 5b 5d 20 78 78 78 3d ......int[] xxx=
17c0: 5b 70 2e 78 2c 70 2e 78 2c 70 2e 78 2d 31 2c 70 [p.x,p.x,p.x-1,p
17d0: 2e 78 2b 31 5d 3b 0a 09 09 09 09 09 66 6f 72 28 .x+1];......for(
17e0: 69 6e 74 20 69 3d 30 3b 20 69 3c 79 79 79 2e 6c int i=0; i<yyy.l
17f0: 65 6e 67 74 68 3b 20 2b 2b 69 29 20 7b 0a 09 09 ength; ++i) {...
1800: 09 09 09 09 69 6e 74 20 79 20 3d 20 79 79 79 5b ....int y = yyy[
1810: 69 5d 3b 0a 09 09 09 09 09 09 69 6e 74 20 78 20 i];.......int x
1820: 3d 20 78 78 78 5b 69 5d 3b 0a 09 09 09 09 09 09 = xxx[i];.......
1830: 69 66 28 67 2e 6d 61 70 5b 70 5d 20 3d 3d 20 27 if(g.map[p] == '
1840: 2a 27 29 20 7b 0a 09 09 09 09 09 09 09 69 66 28 *') {........if(
1850: 69 3e 3d 34 29 63 6f 6e 74 69 6e 75 65 3b 0a 09 i>=4)continue;..
1860: 09 09 09 09 09 09 69 66 28 79 21 3d 70 2e 79 29 ......if(y!=p.y)
1870: 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 09 09 09 continue;.......
1880: 09 69 66 28 67 2e 6d 61 70 5b 79 2c 70 2e 78 2b .if(g.map[y,p.x+
1890: 28 70 2e 78 2d 78 29 5d 21 3d 27 20 27 26 26 67 (p.x-x)]!=' '&&g
18a0: 2e 6d 61 70 5b 79 2c 70 2e 78 2b 28 70 2e 78 2d .map[y,p.x+(p.x-
18b0: 78 29 5d 21 3d 27 52 27 29 63 6f 6e 74 69 6e 75 x)]!='R')continu
18c0: 65 3b 0a 09 09 09 09 09 09 7d 0a 09 09 09 09 09 e;.......}......
18d0: 09 69 66 28 27 31 27 3c 3d 67 2e 6d 61 70 5b 79 .if('1'<=g.map[y
18e0: 2c 78 5d 26 26 67 2e 6d 61 70 5b 79 2c 78 5d 3c ,x]&&g.map[y,x]<
18f0: 3d 27 39 27 29 20 7b 0a 09 09 09 09 09 09 09 66 ='9') {........f
1900: 6f 72 65 61 63 68 28 70 70 70 3b 20 67 2e 6d 61 oreach(ppp; g.ma
1910: 70 2e 74 72 5f 73 6f 75 72 63 65 5b 67 2e 6d 61 p.tr_source[g.ma
1920: 70 5b 79 2c 78 5d 5d 29 20 7b 0a 09 09 09 09 09 p[y,x]]) {......
1930: 09 09 09 79 79 79 20 7e 3d 20 70 70 70 2e 79 3b ...yyy ~= ppp.y;
1940: 0a 09 09 09 09 09 09 09 09 78 78 78 20 7e 3d 20 .........xxx ~=
1950: 70 70 70 2e 78 3b 0a 09 09 09 09 09 09 09 7d 0a ppp.x;........}.
1960: 09 09 09 09 09 09 09 63 6f 6e 74 69 6e 75 65 3b .......continue;
1970: 0a 09 09 09 09 09 09 7d 0a 09 09 09 09 09 09 69 .......}.......i
1980: 66 28 76 5b 79 5d 5b 78 5d 29 20 63 6f 6e 74 69 f(v[y][x]) conti
1990: 6e 75 65 3b 0a 09 09 09 09 09 09 69 66 28 79 3d nue;.......if(y=
19a0: 3d 73 2e 79 20 26 26 20 78 3d 3d 73 2e 78 20 26 =s.y && x==s.x &
19b0: 26 20 69 3c 34 29 20 7b 0a 09 09 09 09 09 09 09 & i<4) {........
19c0: 63 68 61 72 20 63 20 3d 20 22 55 44 52 4c 22 5b char c = "UDRL"[
19d0: 69 5d 3b 0a 09 09 09 09 09 09 09 69 66 28 20 64 i];........if( d
19e0: 65 61 74 68 2e 63 6f 75 6e 74 28 63 29 20 3d 3d eath.count(c) ==
19f0: 20 30 20 29 0a 09 09 09 09 09 09 09 09 72 65 74 0 ).........ret
1a00: 75 72 6e 20 5b 74 75 70 6c 65 28 63 2c 73 74 65 urn [tuple(c,ste
1a10: 70 29 5d 3b 0a 09 09 09 09 09 09 7d 20 65 6c 73 p)];.......} els
1a20: 65 20 69 66 28 66 6f 72 62 69 64 64 65 6e 5f 63 e if(forbidden_c
1a30: 65 6c 6c 5b 79 5d 5b 78 5d 29 7b 0a 09 09 09 09 ell[y][x]){.....
1a40: 09 09 7d 20 65 6c 73 65 20 69 66 28 67 2e 6d 61 ..} else if(g.ma
1a50: 70 5b 79 2c 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d p[y,x]==' '||g.m
1a60: 61 70 5b 79 2c 78 5d 3d 3d 27 5c 5c 27 7c 7c 67 ap[y,x]=='\\'||g
1a70: 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e 27 7c 7c .map[y,x]=='.'||
1a80: 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2a 27 7c g.map[y,x]=='*'|
1a90: 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 21 27 |g.map[y,x]=='!'
1aa0: 7c 7c 69 3e 3d 34 29 20 7b 0a 09 09 09 09 09 09 ||i>=4) {.......
1ab0: 09 71 32 20 7e 3d 20 6e 65 77 20 50 6f 73 28 79 .q2 ~= new Pos(y
1ac0: 2c 78 29 3b 0a 09 09 09 09 09 09 09 76 5b 79 5d ,x);........v[y]
1ad0: 5b 78 5d 3d 74 72 75 65 3b 0a 09 09 09 09 09 09 [x]=true;.......
1ae0: 7d 0a 09 09 09 09 09 7d 0a 09 09 09 09 7d 0a 09 }......}.....}..
1af0: 09 09 09 71 20 3d 20 71 32 3b 0a 09 09 09 7d 0a ...q = q2;....}.
1b00: 09 09 09 72 65 74 75 72 6e 20 5b 5d 3b 0a 09 09 ...return [];...
1b10: 7d 0a 09 09 72 65 74 75 72 6e 20 28 64 61 6e 67 }...return (dang
1b20: 65 72 5f 6f 6b 20 3f 20 5b 5d 20 3a 20 74 72 79 er_ok ? [] : try
1b30: 41 28 29 29 20 7e 20 74 72 79 42 28 29 20 7e 20 A()) ~ tryB() ~
1b40: 74 72 79 43 28 29 3b 0a 09 7d 0a 7d 0a 0a 61 6c tryC();..}.}..al
1b50: 69 61 73 20 53 6f 6c 76 65 72 5f 31 20 4d 61 69 ias Solver_1 Mai
1b60: 6e 53 6f 6c 76 65 72 3b 0a nSolver;.