0000: 2f 2f 0a 2f 2f 20 68 74 74 70 3a 2f 2f 65 6e 2e //.// http://en.
0010: 77 69 6b 69 70 65 64 69 61 2e 6f 72 67 2f 77 69 wikipedia.org/wi
0020: 6b 69 2f 46 25 43 35 25 41 42 72 69 6e 6b 61 7a ki/F%C5%ABrinkaz
0030: 61 6e 0a 2f 2f 0a 69 6d 70 6f 72 74 20 75 74 69 an.//.import uti
0040: 6c 3b 0a 69 6d 70 6f 72 74 20 67 61 6d 65 3b 0a l;.import game;.
0050: 0a 69 6e 74 65 72 66 61 63 65 20 53 6f 6c 76 65 .interface Solve
0060: 72 0a 7b 0a 09 2f 2f 20 74 68 69 73 28 69 6e 20 r.{..// this(in
0070: 47 61 6d 65 20 67 29 3b 0a 09 63 68 61 72 20 73 Game g);..char s
0080: 69 6e 67 6c 65 5f 73 74 65 70 28 29 3b 0a 09 76 ingle_step();..v
0090: 6f 69 64 20 66 6f 72 63 65 28 63 68 61 72 20 63 oid force(char c
00a0: 29 3b 0a 7d 0a 0a 54 75 70 6c 65 21 28 73 74 72 );.}..Tuple!(str
00b0: 69 6e 67 2c 69 6e 74 29 20 64 65 61 74 68 5f 6d ing,int) death_m
00c0: 6f 76 65 28 69 6e 20 47 61 6d 65 20 67 29 0a 7b ove(in Game g).{
00d0: 0a 09 2f 2f 20 54 4f 44 4f 3a 20 53 0a 0a 09 73 ..// TODO: S...s
00e0: 74 72 69 6e 67 20 64 65 61 74 68 3b 0a 09 69 6e tring death;..in
00f0: 74 20 62 72 65 61 74 68 3b 0a 09 69 6e 74 20 79 t breath;..int y
0100: 20 3d 20 67 2e 6d 61 70 2e 72 6f 62 6f 74 2e 79 = g.map.robot.y
0110: 3b 0a 09 69 6e 74 20 78 20 3d 20 67 2e 6d 61 70 ;..int x = g.map
0120: 2e 72 6f 62 6f 74 2e 78 3b 0a 09 69 6e 74 5b 35 .robot.x;..int[5
0130: 5d 20 64 79 5f 3d 5b 2b 31 2c 2d 31 2c 30 2c 30 ] dy_=[+1,-1,0,0
0140: 2c 30 5d 3b 0a 09 69 6e 74 5b 35 5d 20 64 78 5f ,0];..int[5] dx_
0150: 3d 5b 30 2c 30 2c 2d 31 2c 2b 31 2c 30 5d 3b 0a =[0,0,-1,+1,0];.
0160: 09 63 68 61 72 5b 5d 20 64 73 3d 5b 27 55 27 2c .char[] ds=['U',
0170: 27 44 27 2c 27 4c 27 2c 27 52 27 2c 27 57 27 5d 'D','L','R','W']
0180: 3b 0a 09 66 6f 72 28 69 6e 74 20 69 3d 30 3b 20 ;..for(int i=0;
0190: 69 3c 35 3b 20 2b 2b 69 29 0a 09 7b 0a 09 09 62 i<5; ++i)..{...b
01a0: 6f 6f 6c 20 61 66 74 65 72 5f 6d 6f 76 65 5f 64 ool after_move_d
01b0: 65 61 74 68 28 69 6e 74 20 79 2c 20 69 6e 74 20 eath(int y, int
01c0: 78 2c 20 63 68 61 72 20 74 72 5f 74 67 74 29 0a x, char tr_tgt).
01d0: 09 09 7b 0a 09 09 09 62 6f 6f 6c 20 69 73 5f 73 ..{....bool is_s
01e0: 70 61 63 79 5f 74 28 63 68 61 72 20 63 29 20 7b pacy_t(char c) {
01f0: 0a 09 09 09 09 69 66 28 69 73 5f 74 72 75 65 5f .....if(is_true_
0200: 73 70 61 63 65 28 63 29 20 7c 7c 20 63 3d 3d 27 space(c) || c=='
0210: 52 27 20 7c 7c 20 63 3d 3d 74 72 5f 74 67 74 29 R' || c==tr_tgt)
0220: 0a 09 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 ......return tru
0230: 65 3b 0a 09 09 09 09 72 65 74 75 72 6e 20 28 27 e;.....return ('
0240: 41 27 3c 3d 63 20 26 26 20 63 3c 3d 27 49 27 20 A'<=c && c<='I'
0250: 26 26 20 67 2e 74 72 2e 74 61 72 67 65 74 5f 6f && g.tr.target_o
0260: 66 28 63 29 3d 3d 74 72 5f 74 67 74 29 3b 0a 09 f(c)==tr_tgt);..
0270: 09 09 7d 0a 0a 09 09 09 2f 2f 20 63 68 65 63 6b ..}.....// check
0280: 20 77 61 74 65 72 0a 09 09 09 69 66 28 20 67 2e water....if( g.
0290: 6d 61 70 5b 79 2c 78 5d 21 3d 27 4f 27 20 26 26 map[y,x]!='O' &&
02a0: 20 67 2e 68 70 3d 3d 30 20 26 26 20 79 3c 3d 67 g.hp==0 && y<=g
02b0: 2e 77 61 74 65 72 5f 6c 65 76 65 6c 20 29 0a 09 .water_level )..
02c0: 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0a ...return true;.
02d0: 0a 09 09 09 2f 2f 20 63 68 65 63 6b 20 66 61 6c ....// check fal
02e0: 6c 69 6e 67 20 72 6f 63 6b 2e 0a 09 09 09 69 6e ling rock.....in
02f0: 74 20 79 79 3d 79 2b 31 2c 20 78 78 3d 78 3b 0a t yy=y+1, xx=x;.
0300: 09 09 09 69 66 28 20 69 73 5f 73 70 61 63 79 5f ...if( is_spacy_
0310: 74 28 67 2e 6d 61 70 5b 79 79 2c 20 78 78 5d 29 t(g.map[yy, xx])
0320: 20 29 0a 09 09 09 7b 0a 09 09 09 09 69 66 28 20 )....{.....if(
0330: 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 is_rocky(g.map[y
0340: 79 2b 31 2c 78 78 5d 29 20 29 0a 09 09 09 09 09 y+1,xx]) )......
0350: 72 65 74 75 72 6e 20 74 72 75 65 3b 0a 09 09 09 return true;....
0360: 09 69 66 28 20 69 73 5f 73 70 61 63 79 5f 74 28 .if( is_spacy_t(
0370: 67 2e 6d 61 70 5b 79 79 2b 31 2c 78 78 5d 29 20 g.map[yy+1,xx])
0380: 26 26 20 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 && is_rocky(g.ma
0390: 70 5b 79 79 2b 31 2c 78 78 2b 31 5d 29 20 26 26 p[yy+1,xx+1]) &&
03a0: 20 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b is_rocky(g.map[
03b0: 79 79 2c 78 78 2b 31 5d 29 20 29 20 7b 0a 09 09 yy,xx+1]) ) {...
03c0: 09 09 09 69 66 28 20 69 73 5f 73 70 61 63 79 5f ...if( is_spacy_
03d0: 74 28 67 2e 6d 61 70 5b 79 79 2b 31 2c 78 78 2b t(g.map[yy+1,xx+
03e0: 32 5d 29 20 26 26 20 69 73 5f 73 70 61 63 79 5f 2]) && is_spacy_
03f0: 74 28 67 2e 6d 61 70 5b 79 79 2c 78 78 2b 32 5d t(g.map[yy,xx+2]
0400: 29 20 29 0a 09 09 09 09 09 09 72 65 74 75 72 6e ) ).......return
0410: 20 66 61 6c 73 65 3b 0a 09 09 09 09 09 72 65 74 false;......ret
0420: 75 72 6e 20 74 72 75 65 3b 0a 09 09 09 09 7d 0a urn true;.....}.
0430: 09 09 09 09 69 66 28 20 69 73 5f 73 70 61 63 79 ....if( is_spacy
0440: 5f 74 28 67 2e 6d 61 70 5b 79 79 2b 31 2c 78 78 _t(g.map[yy+1,xx
0450: 5d 29 20 26 26 20 69 73 5f 72 6f 63 6b 79 28 67 ]) && is_rocky(g
0460: 2e 6d 61 70 5b 79 79 2b 31 2c 78 78 2d 31 5d 29 .map[yy+1,xx-1])
0470: 20 26 26 20 69 73 5f 72 6f 63 6b 6c 61 6d 62 64 && is_rocklambd
0480: 61 28 67 2e 6d 61 70 5b 79 79 2c 78 78 2d 31 5d a(g.map[yy,xx-1]
0490: 29 20 29 20 7b 0a 09 09 09 09 09 69 66 28 67 2e ) ) {......if(g.
04a0: 68 69 67 65 5f 75 6e 74 69 6c 5f 72 69 73 65 20 hige_until_rise
04b0: 3d 3d 20 31 20 26 26 20 67 2e 6d 61 70 5b 79 79 == 1 && g.map[yy
04c0: 2b 31 2c 78 78 2b 31 5d 3d 3d 27 57 27 29 0a 09 +1,xx+1]=='W')..
04d0: 09 09 09 09 09 72 65 74 75 72 6e 20 66 61 6c 73 .....return fals
04e0: 65 3b 0a 09 09 09 09 09 72 65 74 75 72 6e 20 74 e;......return t
04f0: 72 75 65 3b 0a 09 09 09 09 7d 0a 09 09 09 7d 0a rue;.....}....}.
0500: 09 09 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b ...return false;
0510: 0a 09 09 7d 0a 0a 09 09 69 6e 74 20 64 79 3d 64 ...}....int dy=d
0520: 79 5f 5b 69 5d 2c 20 64 78 3d 64 78 5f 5b 69 5d y_[i], dx=dx_[i]
0530: 3b 0a 09 09 69 66 28 20 69 73 5f 73 70 61 63 79 ;...if( is_spacy
0540: 28 67 2e 6d 61 70 5b 79 2b 64 79 2c 78 2b 64 78 (g.map[y+dy,x+dx
0550: 5d 29 20 7c 7c 20 64 79 3d 3d 30 20 26 26 20 69 ]) || dy==0 && i
0560: 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2c s_rocky(g.map[y,
0570: 78 2b 64 78 5d 29 20 26 26 20 69 73 5f 74 72 75 x+dx]) && is_tru
0580: 65 5f 73 70 61 63 65 28 67 2e 6d 61 70 5b 79 2c e_space(g.map[y,
0590: 78 2b 32 2a 64 78 5d 29 20 29 0a 09 09 7b 0a 09 x+2*dx]) )...{..
05a0: 09 09 69 66 28 20 61 66 74 65 72 5f 6d 6f 76 65 ..if( after_move
05b0: 5f 64 65 61 74 68 28 79 2b 64 79 2c 20 78 2b 64 _death(y+dy, x+d
05c0: 78 2c 20 63 68 61 72 2e 69 6e 69 74 29 20 29 0a x, char.init) ).
05d0: 09 09 09 09 64 65 61 74 68 20 7e 3d 20 64 73 5b ....death ~= ds[
05e0: 69 5d 3b 0a 09 09 09 65 6c 73 65 20 69 66 28 64 i];....else if(d
05f0: 73 5b 69 5d 20 21 3d 20 27 57 27 29 0a 09 09 09 s[i] != 'W')....
0600: 09 62 72 65 61 74 68 20 2b 2b 3b 0a 09 09 7d 0a .breath ++;...}.
0610: 09 09 65 6c 73 65 20 69 66 28 20 69 73 5f 74 72 ..else if( is_tr
0620: 61 6d 70 6f 6c 69 6e 65 5f 73 6f 75 72 63 65 28 ampoline_source(
0630: 67 2e 6d 61 70 5b 79 2b 64 79 2c 78 2b 64 78 5d g.map[y+dy,x+dx]
0640: 29 20 29 0a 09 09 7b 0a 09 09 09 50 6f 73 20 70 ) )...{....Pos p
0650: 20 3d 20 67 2e 74 72 2e 74 61 72 67 65 74 5f 70 = g.tr.target_p
0660: 6f 73 28 67 2e 6d 61 70 5b 79 2b 64 79 2c 78 2b os(g.map[y+dy,x+
0670: 64 78 5d 29 3b 0a 09 09 09 69 66 28 20 61 66 74 dx]);....if( aft
0680: 65 72 5f 6d 6f 76 65 5f 64 65 61 74 68 28 70 2e er_move_death(p.
0690: 79 2c 20 70 2e 78 2c 20 67 2e 74 72 2e 74 61 72 y, p.x, g.tr.tar
06a0: 67 65 74 5f 6f 66 28 67 2e 6d 61 70 5b 79 2b 64 get_of(g.map[y+d
06b0: 79 2c 78 2b 64 78 5d 29 29 20 29 0a 09 09 09 09 y,x+dx])) ).....
06c0: 64 65 61 74 68 20 7e 3d 20 64 73 5b 69 5d 3b 0a death ~= ds[i];.
06d0: 09 09 09 65 6c 73 65 0a 09 09 09 09 62 72 65 61 ...else.....brea
06e0: 74 68 20 2b 2b 3b 0a 09 09 7d 0a 09 09 65 6c 73 th ++;...}...els
06f0: 65 0a 09 09 7b 0a 09 09 09 64 65 61 74 68 20 7e e...{....death ~
0700: 3d 20 64 73 5b 69 5d 3b 0a 09 09 7d 0a 09 7d 0a = ds[i];...}..}.
0710: 0a 09 72 65 74 75 72 6e 20 74 75 70 6c 65 28 64 ..return tuple(d
0720: 65 61 74 68 2c 20 62 72 65 61 74 68 29 3b 0a 7d eath, breath);.}
0730: 0a 0a 63 6c 61 73 73 20 51 75 65 75 65 28 54 29 ..class Queue(T)
0740: 0a 7b 0a 09 61 6c 69 61 73 20 54 75 70 6c 65 21 .{..alias Tuple!
0750: 28 54 2c 69 6e 74 29 20 74 3b 0a 0a 09 74 5b 5d (T,int) t;...t[]
0760: 20 63 75 72 2c 20 6e 65 78 74 3b 0a 0a 09 76 6f cur, next;...vo
0770: 69 64 20 70 75 73 68 28 54 20 76 2c 20 69 6e 74 id push(T v, int
0780: 20 70 29 20 7b 20 69 66 28 63 75 72 2e 65 6d 70 p) { if(cur.emp
0790: 74 79 29 20 63 75 72 20 7e 3d 20 74 75 70 6c 65 ty) cur ~= tuple
07a0: 28 76 2c 70 29 3b 20 65 6c 73 65 20 6e 65 78 74 (v,p); else next
07b0: 20 7e 3d 20 74 75 70 6c 65 28 76 2c 70 29 3b 20 ~= tuple(v,p);
07c0: 7d 0a 09 62 6f 6f 6c 20 65 6d 70 74 79 28 29 20 }..bool empty()
07d0: 7b 20 72 65 74 75 72 6e 20 63 75 72 2e 65 6d 70 { return cur.emp
07e0: 74 79 3b 20 7d 0a 09 74 20 70 6f 70 28 29 20 7b ty; }..t pop() {
07f0: 0a 09 09 74 20 76 20 3d 20 63 75 72 5b 30 5d 3b ...t v = cur[0];
0800: 20 63 75 72 20 3d 20 63 75 72 5b 31 2e 2e 24 5d cur = cur[1..$]
0810: 3b 0a 09 09 69 66 28 63 75 72 2e 65 6d 70 74 79 ;...if(cur.empty
0820: 29 20 7b 20 63 75 72 20 3d 20 6e 65 78 74 3b 20 ) { cur = next;
0830: 6e 65 78 74 20 3d 20 6e 75 6c 6c 3b 20 7d 0a 09 next = null; }..
0840: 09 72 65 74 75 72 6e 20 76 3b 0a 09 7d 0a 7d 0a .return v;..}.}.
0850: 0a 2f 2f 2f 0a 2f 2f 2f 20 53 6f 6c 76 65 72 20 .///./// Solver
0860: 22 4d 6f 75 6e 74 61 69 6e 22 3a 20 20 62 65 20 "Mountain": be
0870: 69 6d 6d 6f 76 61 62 6c 65 20 6c 69 6b 65 20 61 immovable like a
0880: 20 6d 6f 75 6e 74 61 69 6e 2e 0a 2f 2f 2f 0a 63 mountain..///.c
0890: 6c 61 73 73 20 e4 b8 8d e5 8b 95 e5 a6 82 e5 b1 lass ...........
08a0: b1 20 3a 20 53 6f 6c 76 65 72 0a 7b 0a 09 74 68 . : Solver.{..th
08b0: 69 73 28 69 6e 20 47 61 6d 65 20 67 29 20 7b 7d is(in Game g) {}
08c0: 0a 09 63 68 61 72 20 73 69 6e 67 6c 65 5f 73 74 ..char single_st
08d0: 65 70 28 29 20 7b 20 72 65 74 75 72 6e 20 27 57 ep() { return 'W
08e0: 27 3b 20 7d 0a 09 76 6f 69 64 20 66 6f 72 63 65 '; }..void force
08f0: 28 63 68 61 72 20 63 29 20 7b 7d 0a 7d 0a 0a 2f (char c) {}.}../
0900: 2f 2f 0a 2f 2f 2f 20 53 6f 6c 76 65 72 20 22 46 //./// Solver "F
0910: 6f 72 65 73 74 22 3a 20 73 68 6f 77 73 20 63 6f orest": shows co
0920: 6e 74 65 6d 70 6c 61 74 69 6f 6e 2e 0a 2f 2f 2f ntemplation..///
0930: 0a 63 6c 61 73 73 20 e5 be 90 e5 a6 82 e6 9e 97 .class .........
0940: 20 3a 20 53 6f 6c 76 65 72 0a 7b 0a 09 69 6e 74 : Solver.{..int
0950: 20 77 61 69 74 5f 63 6f 75 6e 74 20 3d 20 30 3b wait_count = 0;
0960: 0a 09 69 6e 74 20 63 68 6f 6b 65 5f 63 6f 75 6e ..int choke_coun
0970: 74 20 3d 20 30 3b 0a 0a 09 47 61 6d 65 20 67 3b t = 0;...Game g;
0980: 0a 09 74 68 69 73 28 69 6e 20 47 61 6d 65 20 67 ..this(in Game g
0990: 29 0a 09 7b 0a 09 09 74 68 69 73 2e 67 20 3d 20 )..{...this.g =
09a0: 67 2e 63 6c 6f 6e 65 28 29 3b 0a 09 09 66 6f 72 g.clone();...for
09b0: 62 69 64 64 65 6e 5f 63 65 6c 6c 20 3d 20 6e 65 bidden_cell = ne
09c0: 77 20 62 6f 6f 6c 5b 5d 5b 5d 28 67 2e 6d 61 70 w bool[][](g.map
09d0: 2e 48 2b 32 2c 20 67 2e 6d 61 70 2e 57 2b 32 29 .H+2, g.map.W+2)
09e0: 3b 0a 09 7d 0a 0a 09 63 68 61 72 20 73 69 6e 67 ;..}...char sing
09f0: 6c 65 5f 73 74 65 70 28 29 0a 09 7b 0a 09 09 54 le_step()..{...T
0a00: 75 70 6c 65 21 28 73 74 72 69 6e 67 2c 69 6e 74 uple!(string,int
0a10: 29 20 64 65 20 3d 20 64 65 61 74 68 5f 6d 6f 76 ) de = death_mov
0a20: 65 28 67 29 3b 0a 09 09 63 68 61 72 20 63 20 3d e(g);...char c =
0a30: 20 61 63 74 28 67 2c 20 64 65 5b 30 5d 2c 20 64 act(g, de[0], d
0a40: 65 5b 31 5d 29 3b 0a 09 09 66 6f 72 63 65 28 63 e[1]);...force(c
0a50: 29 3b 0a 09 09 72 65 74 75 72 6e 20 63 3b 0a 09 );...return c;..
0a60: 7d 0a 0a 09 76 6f 69 64 20 66 6f 72 63 65 28 63 }...void force(c
0a70: 68 61 72 20 63 29 0a 09 7b 0a 09 09 69 66 28 63 har c)..{...if(c
0a80: 20 21 3d 20 27 41 27 29 0a 09 09 09 67 2e 63 6f != 'A')....g.co
0a90: 6d 6d 61 6e 64 28 63 29 3b 0a 09 7d 0a 0a 09 54 mmand(c);..}...T
0aa0: 75 70 6c 65 21 28 50 6f 73 2c 20 69 6e 74 29 5b uple!(Pos, int)[
0ab0: 5d 20 6c 6f 67 3b 0a 09 62 6f 6f 6c 5b 5d 5b 5d ] log;..bool[][]
0ac0: 20 66 6f 72 62 69 64 64 65 6e 5f 63 65 6c 6c 3b forbidden_cell;
0ad0: 0a 0a 09 63 68 61 72 20 61 63 74 28 63 6f 6e 73 ...char act(cons
0ae0: 74 28 47 61 6d 65 29 20 67 2c 20 73 74 72 69 6e t(Game) g, strin
0af0: 67 20 64 65 61 74 68 2c 20 69 6e 74 20 62 72 65 g death, int bre
0b00: 61 74 68 29 0a 09 7b 0a 09 09 66 6f 72 65 61 63 ath)..{...foreac
0b10: 68 28 63 68 61 72 20 63 3b 20 22 55 44 4c 52 22 h(char c; "UDLR"
0b20: 29 0a 09 09 09 69 66 28 20 64 65 61 74 68 2e 63 )....if( death.c
0b30: 6f 75 6e 74 28 63 29 3d 3d 30 20 26 26 20 69 73 ount(c)==0 && is
0b40: 5f 6f 6e 65 5f 77 61 79 5f 6c 6f 61 64 28 67 2c _one_way_load(g,
0b50: 63 29 20 29 0a 09 09 09 09 72 65 74 75 72 6e 20 c) ).....return
0b60: 63 3b 0a 0a 09 09 63 6f 6e 73 74 20 50 6f 73 20 c;....const Pos
0b70: 20 20 20 72 6f 20 3d 20 67 2e 6d 61 70 2e 72 6f ro = g.map.ro
0b80: 62 6f 74 3b 0a 09 09 63 6f 6e 73 74 20 50 6f 73 bot;...const Pos
0b90: 20 20 20 20 6c 69 20 3d 20 67 2e 6d 61 70 2e 6c li = g.map.l
0ba0: 69 66 74 3b 0a 09 09 50 6f 73 5b 5d 20 6c 61 20 ift;...Pos[] la
0bb0: 3d 20 67 2e 6d 61 70 2e 6c 61 6d 62 64 61 73 28 = g.map.lambdas(
0bc0: 29 3b 0a 09 09 73 6f 72 74 21 28 28 50 6f 73 20 );...sort!((Pos
0bd0: 61 2c 50 6f 73 20 62 29 7b 0a 09 09 09 69 6e 74 a,Pos b){....int
0be0: 20 61 64 3d 61 62 73 28 61 2e 79 2d 6c 69 2e 79 ad=abs(a.y-li.y
0bf0: 29 2b 61 62 73 28 61 2e 78 2d 6c 69 2e 78 29 3b )+abs(a.x-li.x);
0c00: 0a 09 09 09 69 6e 74 20 62 64 3d 61 62 73 28 62 ....int bd=abs(b
0c10: 2e 79 2d 6c 69 2e 79 29 2b 61 62 73 28 62 2e 78 .y-li.y)+abs(b.x
0c20: 2d 6c 69 2e 78 29 3b 0a 09 09 09 72 65 74 75 72 -li.x);....retur
0c30: 6e 20 61 64 3e 62 64 3b 3b 0a 09 09 7d 29 28 6c n ad>bd;;...})(l
0c40: 61 29 3b 0a 09 09 50 6f 73 5b 5d 20 72 61 20 3d a);...Pos[] ra =
0c50: 20 67 2e 6d 61 70 2e 72 61 7a 6f 72 73 28 29 3b g.map.razors();
0c60: 0a 09 09 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 ...const(Pos)[]
0c70: 68 69 20 3d 20 67 2e 6d 61 70 2e 6f 62 6a 65 63 hi = g.map.objec
0c80: 74 73 28 27 57 27 29 3b 0a 0a 09 09 54 75 70 6c ts('W');....Tupl
0c90: 65 21 28 63 68 61 72 2c 69 6e 74 29 5b 5d 20 63 e!(char,int)[] c
0ca0: 61 6e 64 3b 0a 09 09 63 68 61 72 20 63 20 3d 20 and;...char c =
0cb0: 27 57 27 3b 0a 09 09 69 66 28 20 67 2e 6d 61 70 'W';...if( g.map
0cc0: 2e 63 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 64 .collected_lambd
0cd0: 61 20 3d 3d 20 67 2e 6d 61 70 2e 74 6f 74 61 6c a == g.map.total
0ce0: 5f 6c 61 6d 62 64 61 20 29 20 7b 0a 09 09 09 63 _lambda ) {....c
0cf0: 61 6e 64 20 3d 20 73 65 61 72 63 68 28 67 2c 20 and = search(g,
0d00: 72 6f 2c 20 5b 6c 69 5d 2c 20 64 65 61 74 68 29 ro, [li], death)
0d10: 3b 0a 09 09 7d 20 65 6c 73 65 20 69 66 28 20 21 ;...} else if( !
0d20: 6c 61 2e 65 6d 70 74 79 20 29 7b 0a 09 09 09 63 la.empty ){....c
0d30: 61 6e 64 20 7e 3d 20 73 65 61 72 63 68 28 67 2c and ~= search(g,
0d40: 20 72 6f 2c 20 6c 61 7e 72 61 2c 20 64 65 61 74 ro, la~ra, deat
0d50: 68 29 3b 0a 09 09 7d 0a 0a 09 09 2f 2f 20 27 68 h);...}....// 'h
0d60: 69 67 65 73 6f 72 69 27 20 6d 6f 64 65 0a 09 09 igesori' mode...
0d70: 69 66 28 20 21 68 69 2e 65 6d 70 74 79 20 26 26 if( !hi.empty &&
0d80: 20 67 2e 6d 61 70 2e 6e 75 6d 5f 72 61 7a 6f 72 g.map.num_razor
0d90: 3e 30 20 29 20 7b 0a 09 09 09 69 6e 74 20 68 69 >0 ) {....int hi
0da0: 73 20 3d 20 30 3b 0a 09 09 09 66 6f 72 28 69 6e s = 0;....for(in
0db0: 74 20 64 79 3d 2d 31 3b 20 64 79 3c 3d 2b 31 3b t dy=-1; dy<=+1;
0dc0: 20 2b 2b 64 79 29 0a 09 09 09 66 6f 72 28 69 6e ++dy)....for(in
0dd0: 74 20 64 78 3d 2d 31 3b 20 64 78 3c 3d 2b 31 3b t dx=-1; dx<=+1;
0de0: 20 2b 2b 64 78 29 0a 09 09 09 09 69 66 28 67 2e ++dx).....if(g.
0df0: 6d 61 70 5b 72 6f 2e 79 2b 64 79 2c 72 6f 2e 78 map[ro.y+dy,ro.x
0e00: 2b 64 78 5d 20 3d 3d 20 27 57 27 29 0a 09 09 09 +dx] == 'W')....
0e10: 09 09 68 69 73 2b 2b 3b 0a 0a 09 09 09 69 66 28 ..his++;.....if(
0e20: 68 69 73 3e 3d 32 20 7c 7c 20 68 69 73 3d 3d 68 his>=2 || his==h
0e30: 69 2e 6c 65 6e 67 74 68 29 0a 09 09 09 09 63 61 i.length).....ca
0e40: 6e 64 20 3d 20 5b 74 75 70 6c 65 28 27 53 27 2c nd = [tuple('S',
0e50: 69 6e 74 2e 6d 61 78 29 5d 3b 0a 09 09 09 69 66 int.max)];....if
0e60: 28 63 61 6e 64 2e 65 6d 70 74 79 29 20 7b 0a 09 (cand.empty) {..
0e70: 09 09 09 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 ...const(Pos)[]
0e80: 74 67 74 3b 0a 09 09 09 09 66 6f 72 28 69 6e 74 tgt;.....for(int
0e90: 20 79 3d 31 3b 20 79 3c 3d 67 2e 6d 61 70 2e 48 y=1; y<=g.map.H
0ea0: 3b 20 2b 2b 79 29 0a 09 09 09 09 66 6f 72 28 69 ; ++y).....for(i
0eb0: 6e 74 20 78 3d 31 3b 20 78 3c 3d 67 2e 6d 61 70 nt x=1; x<=g.map
0ec0: 2e 57 3b 20 2b 2b 78 29 0a 09 09 09 09 09 69 66 .W; ++x)......if
0ed0: 28 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e 27 (g.map[y,x]=='.'
0ee0: 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 20 ||g.map[y,x]=='
0ef0: 27 29 20 7b 0a 09 09 09 09 09 09 68 69 73 20 3d ') {.......his =
0f00: 20 30 3b 0a 09 09 09 09 09 09 66 6f 72 28 69 6e 0;.......for(in
0f10: 74 20 64 79 3d 2d 31 3b 20 64 79 3c 3d 2b 31 3b t dy=-1; dy<=+1;
0f20: 20 2b 2b 64 79 29 0a 09 09 09 09 09 09 66 6f 72 ++dy).......for
0f30: 28 69 6e 74 20 64 78 3d 2d 31 3b 20 64 78 3c 3d (int dx=-1; dx<=
0f40: 2b 31 3b 20 2b 2b 64 78 29 0a 09 09 09 09 09 09 +1; ++dx).......
0f50: 09 69 66 28 67 2e 6d 61 70 5b 79 2b 64 79 2c 78 .if(g.map[y+dy,x
0f60: 2b 64 78 5d 20 3d 3d 20 27 57 27 29 0a 09 09 09 +dx] == 'W')....
0f70: 09 09 09 09 09 68 69 73 2b 2b 3b 0a 09 09 09 09 .....his++;.....
0f80: 09 09 69 66 28 68 69 73 3e 3d 32 29 0a 09 09 09 ..if(his>=2)....
0f90: 09 09 09 09 74 67 74 20 7e 3d 20 6e 65 77 20 50 ....tgt ~= new P
0fa0: 6f 73 28 79 2c 78 29 3b 0a 09 09 09 09 09 7d 0a os(y,x);......}.
0fb0: 09 09 09 09 63 61 6e 64 20 7e 3d 20 73 65 61 72 ....cand ~= sear
0fc0: 63 68 28 67 2c 20 72 6f 2c 20 74 67 74 2c 20 64 ch(g, ro, tgt, d
0fd0: 65 61 74 68 2c 20 74 72 75 65 29 3b 0a 09 09 09 eath, true);....
0fe0: 7d 0a 09 09 7d 0a 0a 09 09 2f 2f 20 27 68 6f 72 }...}....// 'hor
0ff0: 6f 2d 70 75 73 68 27 20 6d 6f 64 65 0a 09 09 69 o-push' mode...i
1000: 66 28 63 61 6e 64 2e 65 6d 70 74 79 29 20 7b 0a f(cand.empty) {.
1010: 09 09 09 50 6f 73 5b 5d 20 68 6f 72 6f 20 3d 20 ...Pos[] horo =
1020: 67 2e 6d 61 70 2e 6f 62 6a 65 63 74 73 28 27 40 g.map.objects('@
1030: 27 29 3b 0a 09 09 09 50 6f 73 5b 5d 20 74 67 74 ');....Pos[] tgt
1040: 3b 0a 09 09 09 66 6f 72 65 61 63 68 28 70 3b 20 ;....foreach(p;
1050: 68 6f 72 6f 29 0a 09 09 09 09 69 66 28 28 67 2e horo).....if((g.
1060: 6d 61 70 5b 70 2e 79 2c 70 2e 78 2d 31 5d 3d 3d map[p.y,p.x-1]==
1070: 27 20 27 7c 7c 67 2e 6d 61 70 5b 70 2e 79 2c 70 ' '||g.map[p.y,p
1080: 2e 78 2d 31 5d 3d 3d 27 52 27 29 26 26 0a 09 09 .x-1]=='R')&&...
1090: 09 09 20 20 20 28 67 2e 6d 61 70 5b 70 2e 79 2c .. (g.map[p.y,
10a0: 70 2e 78 2b 31 5d 3d 3d 27 20 27 7c 7c 67 2e 6d p.x+1]==' '||g.m
10b0: 61 70 5b 70 2e 79 2c 70 2e 78 2b 31 5d 3d 3d 27 ap[p.y,p.x+1]=='
10c0: 52 27 29 0a 09 09 09 09 20 7c 7c 28 67 2e 6d 61 R')..... ||(g.ma
10d0: 70 5b 70 2e 79 2d 31 2c 70 2e 78 5d 3d 3d 27 20 p[p.y-1,p.x]=='
10e0: 27 7c 7c 67 2e 6d 61 70 5b 70 2e 79 2d 31 2c 70 '||g.map[p.y-1,p
10f0: 2e 78 5d 3d 3d 27 52 27 29 29 0a 09 09 09 09 09 .x]=='R'))......
1100: 74 67 74 20 7e 3d 20 70 3b 0a 0a 09 09 09 66 6f tgt ~= p;.....fo
1110: 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d 67 2e r(int y=1; y<=g.
1120: 6d 61 70 2e 48 3b 20 2b 2b 79 29 0a 09 09 09 66 map.H; ++y)....f
1130: 6f 72 28 69 6e 74 20 78 3d 31 3b 20 78 3c 3d 67 or(int x=1; x<=g
1140: 2e 6d 61 70 2e 57 3b 20 2b 2b 78 29 0a 09 09 09 .map.W; ++x)....
1150: 09 69 66 28 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d .if(g.map[y,x]==
1160: 27 2e 27 29 0a 09 09 09 09 09 69 66 28 69 73 5f '.')......if(is_
1170: 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2b 31 2c rocky(g.map[y+1,
1180: 78 5d 29 7c 7c 69 73 5f 72 6f 63 6b 79 28 67 2e x])||is_rocky(g.
1190: 6d 61 70 5b 79 2b 31 2c 78 2d 31 5d 29 7c 7c 69 map[y+1,x-1])||i
11a0: 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2b s_rocky(g.map[y+
11b0: 31 2c 78 2b 31 5d 29 0a 09 09 09 09 09 20 7c 7c 1,x+1])...... ||
11c0: 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 is_rocky(g.map[y
11d0: 2c 78 2b 31 5d 29 7c 7c 69 73 5f 72 6f 63 6b 79 ,x+1])||is_rocky
11e0: 28 67 2e 6d 61 70 5b 79 2c 78 2d 31 5d 29 29 0a (g.map[y,x-1])).
11f0: 09 09 09 09 09 09 74 67 74 20 7e 3d 20 6e 65 77 ......tgt ~= new
1200: 20 50 6f 73 28 79 2c 78 29 3b 0a 0a 09 09 09 69 Pos(y,x);.....i
1210: 66 28 21 74 67 74 2e 65 6d 70 74 79 29 0a 09 09 f(!tgt.empty)...
1220: 09 09 63 61 6e 64 20 7e 3d 20 73 65 61 72 63 68 ..cand ~= search
1230: 28 67 2c 20 72 6f 2c 20 74 67 74 2c 20 64 65 61 (g, ro, tgt, dea
1240: 74 68 2c 20 74 72 75 65 29 3b 0a 09 09 7d 0a 0a th, true);...}..
1250: 09 09 2f 2f 20 27 64 69 67 27 20 6d 6f 64 65 0a ..// 'dig' mode.
1260: 09 09 69 66 28 63 61 6e 64 2e 65 6d 70 74 79 29 ..if(cand.empty)
1270: 20 7b 0a 09 09 09 50 6f 73 5b 5d 20 74 67 74 3b {....Pos[] tgt;
1280: 0a 09 09 09 66 6f 72 28 69 6e 74 20 79 3d 31 3b ....for(int y=1;
1290: 20 79 3c 3d 67 2e 6d 61 70 2e 48 3b 20 2b 2b 79 y<=g.map.H; ++y
12a0: 29 0a 09 09 09 66 6f 72 28 69 6e 74 20 78 3d 31 )....for(int x=1
12b0: 3b 20 78 3c 3d 67 2e 6d 61 70 2e 57 3b 20 2b 2b ; x<=g.map.W; ++
12c0: 78 29 0a 09 09 09 09 69 66 28 67 2e 6d 61 70 5b x).....if(g.map[
12d0: 79 2c 78 5d 3d 3d 27 2e 27 29 0a 09 09 09 09 09 y,x]=='.')......
12e0: 69 66 28 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 if(is_rocky(g.ma
12f0: 70 5b 79 2b 31 2c 78 5d 29 7c 7c 69 73 5f 72 6f p[y+1,x])||is_ro
1300: 63 6b 79 28 67 2e 6d 61 70 5b 79 2b 31 2c 78 2d cky(g.map[y+1,x-
1310: 31 5d 29 7c 7c 69 73 5f 72 6f 63 6b 79 28 67 2e 1])||is_rocky(g.
1320: 6d 61 70 5b 79 2b 31 2c 78 2b 31 5d 29 0a 09 09 map[y+1,x+1])...
1330: 09 09 09 20 7c 7c 69 73 5f 72 6f 63 6b 79 28 67 ... ||is_rocky(g
1340: 2e 6d 61 70 5b 79 2c 78 2b 31 5d 29 7c 7c 69 73 .map[y,x+1])||is
1350: 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2c 78 _rocky(g.map[y,x
1360: 2d 31 5d 29 29 0a 09 09 09 09 09 09 74 67 74 20 -1])).......tgt
1370: 7e 3d 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 3b ~= new Pos(y,x);
1380: 0a 09 09 09 63 61 6e 64 20 7e 3d 20 73 65 61 72 ....cand ~= sear
1390: 63 68 28 67 2c 20 72 6f 2c 20 74 67 74 2c 20 64 ch(g, ro, tgt, d
13a0: 65 61 74 68 2c 20 74 72 75 65 29 3b 0a 09 09 7d eath, true);...}
13b0: 0a 0a 09 09 69 66 28 63 61 6e 64 2e 65 6d 70 74 ....if(cand.empt
13c0: 79 29 20 7b 0a 09 09 09 63 68 6f 6b 65 5f 63 6f y) {....choke_co
13d0: 75 6e 74 2b 2b 3b 0a 09 09 09 63 61 6e 64 20 7e unt++;....cand ~
13e0: 3d 20 74 75 70 6c 65 28 27 57 27 2c 69 6e 74 2e = tuple('W',int.
13f0: 6d 61 78 29 3b 0a 09 09 7d 0a 09 09 73 6f 72 74 max);...}...sort
1400: 21 28 28 54 75 70 6c 65 21 28 63 68 61 72 2c 69 !((Tuple!(char,i
1410: 6e 74 29 20 63 31 2c 20 54 75 70 6c 65 21 28 63 nt) c1, Tuple!(c
1420: 68 61 72 2c 69 6e 74 29 20 63 32 29 7b 0a 09 09 har,int) c2){...
1430: 09 69 66 28 63 31 5b 31 5d 20 21 3d 20 63 32 5b .if(c1[1] != c2[
1440: 31 5d 29 0a 09 09 09 09 72 65 74 75 72 6e 20 63 1]).....return c
1450: 31 5b 31 5d 20 3c 20 63 32 5b 31 5d 3b 0a 09 09 1[1] < c2[1];...
1460: 09 72 65 74 75 72 6e 20 63 31 5b 30 5d 20 3c 20 .return c1[0] <
1470: 63 32 5b 30 5d 3b 0a 09 09 7d 29 28 63 61 6e 64 c2[0];...})(cand
1480: 29 3b 0a 09 09 63 20 3d 20 63 61 6e 64 5b 30 5d );...c = cand[0]
1490: 5b 30 5d 3b 0a 0a 09 09 69 66 28 64 65 61 74 68 [0];....if(death
14a0: 2e 63 6f 75 6e 74 28 63 29 20 7c 7c 20 77 61 69 .count(c) || wai
14b0: 74 5f 63 6f 75 6e 74 3e 3d 32 29 20 7b 0a 09 09 t_count>=2) {...
14c0: 09 66 6f 72 65 61 63 68 28 63 68 61 72 20 6c 69 .foreach(char li
14d0: 76 65 3b 20 22 55 44 4c 52 57 22 29 0a 09 09 09 ve; "UDLRW")....
14e0: 09 69 66 28 64 65 61 74 68 2e 63 6f 75 6e 74 28 .if(death.count(
14f0: 6c 69 76 65 29 3d 3d 30 29 20 7b 0a 09 09 09 09 live)==0) {.....
1500: 09 63 3d 6c 69 76 65 3b 0a 09 09 09 09 09 62 72 .c=live;......br
1510: 65 61 6b 3b 0a 09 09 09 09 7d 0a 09 09 7d 0a 0a eak;.....}...}..
1520: 09 09 69 66 28 63 20 3d 3d 20 27 57 27 29 0a 09 ..if(c == 'W')..
1530: 09 09 77 61 69 74 5f 63 6f 75 6e 74 2b 2b 3b 0a ..wait_count++;.
1540: 09 09 65 6c 73 65 0a 09 09 09 77 61 69 74 5f 63 ..else....wait_c
1550: 6f 75 6e 74 20 3d 20 30 3b 0a 09 09 69 66 28 77 ount = 0;...if(w
1560: 61 69 74 5f 63 6f 75 6e 74 3d 3d 32 29 0a 09 09 ait_count==2)...
1570: 09 63 20 3d 20 27 41 27 3b 0a 09 09 69 66 28 63 .c = 'A';...if(c
1580: 68 6f 6b 65 5f 63 6f 75 6e 74 20 3e 3d 20 67 2e hoke_count >= g.
1590: 6d 61 70 2e 48 29 0a 09 09 09 63 20 3d 20 27 41 map.H)....c = 'A
15a0: 27 3b 0a 0a 09 09 62 6f 6f 6c 5b 63 68 61 72 5d ';....bool[char]
15b0: 20 63 68 6f 69 63 65 3b 0a 09 09 66 6f 72 65 61 choice;...forea
15c0: 63 68 28 74 3b 20 63 61 6e 64 29 0a 09 09 09 63 ch(t; cand)....c
15d0: 68 6f 69 63 65 5b 74 5b 30 5d 5d 20 3d 20 74 72 hoice[t[0]] = tr
15e0: 75 65 3b 0a 09 09 6c 6f 67 20 7e 3d 20 74 75 70 ue;...log ~= tup
15f0: 6c 65 28 72 6f 2e 63 6c 6f 6e 65 28 29 2c 20 63 le(ro.clone(), c
1600: 61 73 74 28 69 6e 74 29 63 68 6f 69 63 65 2e 6c ast(int)choice.l
1610: 65 6e 67 74 68 29 3b 0a 09 09 69 66 28 6c 6f 67 ength);...if(log
1620: 2e 6c 65 6e 67 74 68 20 3e 20 35 29 0a 09 09 09 .length > 5)....
1630: 6c 6f 67 20 3d 20 6c 6f 67 5b 24 2d 35 2e 2e 24 log = log[$-5..$
1640: 5d 3b 0a 09 09 69 6e 74 20 63 6e 74 20 3d 20 30 ];...int cnt = 0
1650: 3b 0a 09 09 66 6f 72 65 61 63 68 28 6c 3b 20 6c ;...foreach(l; l
1660: 6f 67 29 0a 09 09 09 69 66 28 6c 5b 30 5d 20 3d og)....if(l[0] =
1670: 3d 20 6c 6f 67 5b 24 2d 31 5d 5b 30 5d 29 0a 09 = log[$-1][0])..
1680: 09 09 09 2b 2b 63 6e 74 3b 0a 09 09 69 66 28 20 ...++cnt;...if(
1690: 63 6e 74 20 3e 3d 20 33 20 26 26 20 62 72 65 61 cnt >= 3 && brea
16a0: 74 68 3d 3d 31 20 29 20 7b 0a 09 09 09 66 6f 72 th==1 ) {....for
16b0: 62 69 64 64 65 6e 5f 63 65 6c 6c 5b 72 6f 2e 79 bidden_cell[ro.y
16c0: 5d 5b 72 6f 2e 78 5d 20 3d 20 74 72 75 65 3b 0a ][ro.x] = true;.
16d0: 09 09 7d 0a 0a 09 09 72 65 74 75 72 6e 20 63 3b ..}....return c;
16e0: 0a 09 7d 0a 0a 09 54 75 70 6c 65 21 28 63 68 61 ..}...Tuple!(cha
16f0: 72 2c 69 6e 74 29 5b 5d 20 73 65 61 72 63 68 28 r,int)[] search(
1700: 69 6e 20 47 61 6d 65 20 67 2c 20 69 6e 20 50 6f in Game g, in Po
1710: 73 20 73 2c 20 69 6e 20 50 6f 73 5b 5d 20 67 73 s s, in Pos[] gs
1720: 2c 20 73 74 72 69 6e 67 20 64 65 61 74 68 2c 20 , string death,
1730: 62 6f 6f 6c 20 64 61 6e 67 65 72 5f 6f 6b 3d 66 bool danger_ok=f
1740: 61 6c 73 65 29 0a 09 7b 0a 09 09 62 6f 6f 6c 20 alse)..{...bool
1750: 76 65 72 79 5f 64 61 6e 67 65 72 28 69 6e 74 20 very_danger(int
1760: 79 2c 20 69 6e 74 20 78 29 0a 09 09 7b 0a 09 09 y, int x)...{...
1770: 09 69 66 28 67 2e 6d 61 70 5b 79 2c 78 5d 20 3d .if(g.map[y,x] =
1780: 3d 20 27 20 27 20 7c 7c 20 67 2e 6d 61 70 5b 79 = ' ' || g.map[y
1790: 2c 78 5d 20 3d 3d 20 27 52 27 29 0a 09 09 09 09 ,x] == 'R').....
17a0: 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0a 09 09 return false;...
17b0: 09 69 66 28 69 73 5f 72 6f 63 6b 79 28 67 2e 6d .if(is_rocky(g.m
17c0: 61 70 5b 79 2b 31 2c 78 5d 29 29 0a 09 09 09 09 ap[y+1,x])).....
17d0: 72 65 74 75 72 6e 20 74 72 75 65 3b 0a 09 09 09 return true;....
17e0: 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0a 09 09 return false;...
17f0: 7d 0a 09 09 62 6f 6f 6c 20 64 61 6e 67 65 72 28 }...bool danger(
1800: 69 6e 74 20 79 2c 20 69 6e 74 20 78 29 0a 09 09 int y, int x)...
1810: 7b 0a 09 09 09 69 66 28 67 2e 6d 61 70 5b 79 2c {....if(g.map[y,
1820: 78 5d 20 3d 3d 20 27 20 27 20 7c 7c 20 67 2e 6d x] == ' ' || g.m
1830: 61 70 5b 79 2c 78 5d 20 3d 3d 20 27 52 27 29 0a ap[y,x] == 'R').
1840: 09 09 09 09 72 65 74 75 72 6e 20 66 61 6c 73 65 ....return false
1850: 3b 0a 09 09 09 69 66 28 69 73 5f 72 6f 63 6b 79 ;....if(is_rocky
1860: 28 67 2e 6d 61 70 5b 79 2b 31 2c 78 5d 29 29 0a (g.map[y+1,x])).
1870: 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b ....return true;
1880: 0a 09 09 09 69 66 28 69 73 5f 72 6f 63 6b 79 28 ....if(is_rocky(
1890: 67 2e 6d 61 70 5b 79 2b 31 2c 78 2d 31 5d 29 20 g.map[y+1,x-1])
18a0: 26 26 20 28 67 2e 6d 61 70 5b 79 2c 78 2d 31 5d && (g.map[y,x-1]
18b0: 3d 3d 27 5c 5c 27 7c 7c 69 73 5f 72 6f 63 6b 79 =='\\'||is_rocky
18c0: 28 67 2e 6d 61 70 5b 79 2c 78 2d 31 5d 29 29 0a (g.map[y,x-1])).
18d0: 09 09 09 20 20 26 26 20 28 67 2e 6d 61 70 5b 79 ... && (g.map[y
18e0: 2b 31 2c 78 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 +1,x]==' '||g.ma
18f0: 70 5b 79 2b 31 2c 78 5d 3d 3d 27 52 27 29 29 0a p[y+1,x]=='R')).
1900: 09 09 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b ....return true;
1910: 0a 09 09 09 69 66 28 69 73 5f 72 6f 63 6b 79 28 ....if(is_rocky(
1920: 67 2e 6d 61 70 5b 79 2b 31 2c 78 2b 31 5d 29 20 g.map[y+1,x+1])
1930: 26 26 20 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 && is_rocky(g.ma
1940: 70 5b 79 2c 78 2b 31 5d 29 20 26 26 20 28 67 2e p[y,x+1]) && (g.
1950: 6d 61 70 5b 79 2b 31 2c 78 5d 3d 3d 27 20 27 7c map[y+1,x]==' '|
1960: 7c 67 2e 6d 61 70 5b 79 2b 31 2c 78 5d 3d 3d 27 |g.map[y+1,x]=='
1970: 52 27 29 29 0a 09 09 09 09 72 65 74 75 72 6e 20 R')).....return
1980: 74 72 75 65 3b 0a 09 09 09 69 66 28 69 73 5f 72 true;....if(is_r
1990: 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2c 78 2d 31 ocky(g.map[y,x-1
19a0: 5d 29 20 26 26 20 28 67 2e 6d 61 70 5b 79 2d 31 ]) && (g.map[y-1
19b0: 2c 78 2d 31 5d 3d 3d 27 5c 5c 27 7c 7c 69 73 5f ,x-1]=='\\'||is_
19c0: 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2d 31 2c rocky(g.map[y-1,
19d0: 78 2d 31 5d 29 29 0a 09 09 09 20 20 26 26 20 28 x-1])).... && (
19e0: 67 2e 6d 61 70 5b 79 2d 31 2c 78 5d 3d 3d 27 20 g.map[y-1,x]=='
19f0: 27 7c 7c 67 2e 6d 61 70 5b 79 2d 31 2c 78 5d 3d '||g.map[y-1,x]=
1a00: 3d 27 52 27 29 29 0a 09 09 09 09 72 65 74 75 72 ='R')).....retur
1a10: 6e 20 74 72 75 65 3b 0a 09 09 09 69 66 28 69 73 n true;....if(is
1a20: 5f 72 6f 63 6b 79 28 67 2e 6d 61 70 5b 79 2c 78 _rocky(g.map[y,x
1a30: 2b 31 5d 29 20 26 26 20 69 73 5f 72 6f 63 6b 79 +1]) && is_rocky
1a40: 28 67 2e 6d 61 70 5b 79 2d 31 2c 78 2b 31 5d 29 (g.map[y-1,x+1])
1a50: 20 26 26 20 28 67 2e 6d 61 70 5b 79 2d 31 2c 78 && (g.map[y-1,x
1a60: 5d 3d 3d 27 20 27 7c 7c 67 2e 6d 61 70 5b 79 2d ]==' '||g.map[y-
1a70: 31 2c 78 5d 3d 3d 27 52 27 29 29 0a 09 09 09 09 1,x]=='R')).....
1a80: 72 65 74 75 72 6e 20 74 72 75 65 3b 0a 09 09 09 return true;....
1a90: 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0a 09 09 return false;...
1aa0: 7d 0a 0a 09 09 2f 2f 20 61 76 6f 69 64 20 64 69 }....// avoid di
1ab0: 72 65 63 74 6c 79 20 62 65 6c 6f 77 20 27 2a 27 rectly below '*'
1ac0: 0a 09 09 54 75 70 6c 65 21 28 63 68 61 72 2c 69 ...Tuple!(char,i
1ad0: 6e 74 29 5b 5d 20 74 72 79 41 28 29 20 7b 0a 09 nt)[] tryA() {..
1ae0: 09 09 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 71 ..const(Pos)[] q
1af0: 3b 0a 09 09 09 66 6f 72 65 61 63 68 28 70 3b 20 ;....foreach(p;
1b00: 67 73 29 0a 09 09 09 09 69 66 28 21 76 65 72 79 gs).....if(!very
1b10: 5f 64 61 6e 67 65 72 28 70 2e 79 2c 70 2e 78 29 _danger(p.y,p.x)
1b20: 29 0a 09 09 09 09 09 71 20 7e 3d 20 70 3b 0a 09 )......q ~= p;..
1b30: 09 09 62 6f 6f 6c 5b 5d 5b 5d 20 76 20 3d 20 6e ..bool[][] v = n
1b40: 65 77 20 62 6f 6f 6c 5b 5d 5b 5d 28 67 2e 6d 61 ew bool[][](g.ma
1b50: 70 2e 48 2b 32 2c 20 67 2e 6d 61 70 2e 57 2b 32 p.H+2, g.map.W+2
1b60: 29 3b 0a 09 09 09 66 6f 72 65 61 63 68 28 70 3b );....foreach(p;
1b70: 20 71 29 20 76 5b 70 2e 79 5d 5b 70 2e 78 5d 3d q) v[p.y][p.x]=
1b80: 74 72 75 65 3b 0a 09 09 09 62 6f 6f 6c 20 66 69 true;....bool fi
1b90: 72 73 74 5f 73 74 65 70 20 3d 20 74 72 75 65 3b rst_step = true;
1ba0: 0a 09 09 09 66 6f 72 28 69 6e 74 20 73 74 65 70 ....for(int step
1bb0: 3d 31 3b 20 71 2e 6c 65 6e 67 74 68 3b 20 2b 2b =1; q.length; ++
1bc0: 73 74 65 70 29 20 7b 0a 09 09 09 09 50 6f 73 5b step) {.....Pos[
1bd0: 5d 20 71 32 3b 0a 09 09 09 09 66 6f 72 65 61 63 ] q2;.....foreac
1be0: 68 28 70 3b 20 71 29 20 7b 0a 09 09 09 09 09 69 h(p; q) {......i
1bf0: 6e 74 5b 5d 20 79 79 79 3d 5b 70 2e 79 2d 31 2c nt[] yyy=[p.y-1,
1c00: 70 2e 79 2c 70 2e 79 2c 70 2e 79 2b 31 5d 3b 0a p.y,p.y,p.y+1];.
1c10: 09 09 09 09 09 69 6e 74 5b 5d 20 78 78 78 3d 5b .....int[] xxx=[
1c20: 70 2e 78 2c 70 2e 78 2d 31 2c 70 2e 78 2b 31 2c p.x,p.x-1,p.x+1,
1c30: 70 2e 78 5d 3b 0a 09 09 09 09 09 73 74 72 69 6e p.x];......strin
1c40: 67 20 73 73 73 3d 22 55 52 4c 44 22 3b 0a 09 09 g sss="URLD";...
1c50: 09 09 09 66 6f 72 28 69 6e 74 20 69 3d 30 3b 20 ...for(int i=0;
1c60: 69 3c 79 79 79 2e 6c 65 6e 67 74 68 3b 20 2b 2b i<yyy.length; ++
1c70: 69 29 20 69 66 28 21 66 69 72 73 74 5f 73 74 65 i) if(!first_ste
1c80: 70 20 7c 7c 20 67 2e 6d 61 70 5b 70 5d 21 3d 27 p || g.map[p]!='
1c90: 40 27 20 7c 7c 20 73 73 73 5b 69 5d 3d 3d 27 4c @' || sss[i]=='L
1ca0: 27 20 7c 7c 20 73 73 73 5b 69 5d 3d 3d 27 52 27 ' || sss[i]=='R'
1cb0: 29 20 7b 0a 09 09 09 09 09 09 69 6e 74 20 79 20 ) {.......int y
1cc0: 3d 20 79 79 79 5b 69 5d 3b 0a 09 09 09 09 09 09 = yyy[i];.......
1cd0: 69 6e 74 20 78 20 3d 20 78 78 78 5b 69 5d 3b 0a int x = xxx[i];.
1ce0: 09 09 09 09 09 09 69 66 28 27 31 27 3c 3d 67 2e ......if('1'<=g.
1cf0: 6d 61 70 5b 79 2c 78 5d 26 26 67 2e 6d 61 70 5b map[y,x]&&g.map[
1d00: 79 2c 78 5d 3c 3d 27 39 27 29 20 7b 0a 09 09 09 y,x]<='9') {....
1d10: 09 09 09 09 66 6f 72 65 61 63 68 28 70 70 70 3b ....foreach(ppp;
1d20: 20 67 2e 74 72 2e 73 6f 75 72 63 65 5f 70 6f 73 g.tr.source_pos
1d30: 28 67 2e 6d 61 70 5b 79 2c 78 5d 29 29 20 7b 0a (g.map[y,x])) {.
1d40: 09 09 09 09 09 09 09 09 79 79 79 20 7e 3d 20 70 ........yyy ~= p
1d50: 70 70 2e 79 3b 0a 09 09 09 09 09 09 09 09 78 78 pp.y;.........xx
1d60: 78 20 7e 3d 20 70 70 70 2e 78 3b 0a 09 09 09 09 x ~= ppp.x;.....
1d70: 09 09 09 7d 0a 09 09 09 09 09 09 09 63 6f 6e 74 ...}........cont
1d80: 69 6e 75 65 3b 0a 09 09 09 09 09 09 7d 0a 09 09 inue;.......}...
1d90: 09 09 09 09 69 66 28 76 5b 79 5d 5b 78 5d 29 20 ....if(v[y][x])
1da0: 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 09 09 09 continue;.......
1db0: 69 66 28 79 3d 3d 73 2e 79 20 26 26 20 78 3d 3d if(y==s.y && x==
1dc0: 73 2e 78 20 26 26 20 69 3c 34 29 20 7b 0a 09 09 s.x && i<4) {...
1dd0: 09 09 09 09 09 63 68 61 72 20 63 20 3d 20 73 73 .....char c = ss
1de0: 73 5b 69 5d 3b 0a 09 09 09 09 09 09 09 69 66 28 s[i];........if(
1df0: 20 64 65 61 74 68 2e 63 6f 75 6e 74 28 63 29 20 death.count(c)
1e00: 3d 3d 20 30 20 29 0a 09 09 09 09 09 09 09 09 72 == 0 ).........r
1e10: 65 74 75 72 6e 20 5b 74 75 70 6c 65 28 63 2c 73 eturn [tuple(c,s
1e20: 74 65 70 29 5d 3b 0a 09 09 09 09 09 09 7d 20 65 tep)];.......} e
1e30: 6c 73 65 20 69 66 28 66 6f 72 62 69 64 64 65 6e lse if(forbidden
1e40: 5f 63 65 6c 6c 5b 79 5d 5b 78 5d 29 7b 0a 09 09 _cell[y][x]){...
1e50: 09 09 09 09 7d 20 65 6c 73 65 20 69 66 28 67 2e ....} else if(g.
1e60: 6d 61 70 5b 79 2c 78 5d 3d 3d 27 20 27 7c 7c 67 map[y,x]==' '||g
1e70: 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 5c 5c 27 7c .map[y,x]=='\\'|
1e80: 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e 27 |g.map[y,x]=='.'
1e90: 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 21 ||g.map[y,x]=='!
1ea0: 27 7c 7c 69 3e 3d 34 29 20 7b 0a 09 09 09 09 09 '||i>=4) {......
1eb0: 09 09 69 66 28 64 61 6e 67 65 72 28 79 2c 78 29 ..if(danger(y,x)
1ec0: 29 0a 09 09 09 09 09 09 09 09 63 6f 6e 74 69 6e ).........contin
1ed0: 75 65 3b 0a 09 09 09 09 09 09 09 71 32 20 7e 3d ue;........q2 ~=
1ee0: 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 3b 0a 09 new Pos(y,x);..
1ef0: 09 09 09 09 09 09 76 5b 79 5d 5b 78 5d 3d 74 72 ......v[y][x]=tr
1f00: 75 65 3b 0a 09 09 09 09 09 09 7d 0a 09 09 09 09 ue;.......}.....
1f10: 09 7d 0a 09 09 09 09 7d 0a 09 09 09 09 66 69 72 .}.....}.....fir
1f20: 73 74 5f 73 74 65 70 20 3d 20 66 61 6c 73 65 3b st_step = false;
1f30: 0a 09 09 09 09 71 20 3d 20 71 32 3b 0a 09 09 09 .....q = q2;....
1f40: 7d 0a 09 09 09 72 65 74 75 72 6e 20 5b 5d 3b 0a }....return [];.
1f50: 09 09 7d 0a 0a 09 09 2f 2f 20 61 6e 79 20 65 6d ..}....// any em
1f60: 70 74 79 20 73 70 61 63 65 20 69 73 20 6d 79 20 pty space is my
1f70: 67 72 6f 75 6e 64 0a 09 09 54 75 70 6c 65 21 28 ground...Tuple!(
1f80: 63 68 61 72 2c 69 6e 74 29 5b 5d 20 74 72 79 42 char,int)[] tryB
1f90: 28 29 20 7b 0a 09 09 09 63 6f 6e 73 74 28 50 6f () {....const(Po
1fa0: 73 29 5b 5d 20 71 3b 0a 09 09 09 66 6f 72 65 61 s)[] q;....forea
1fb0: 63 68 28 70 3b 20 67 73 29 20 71 20 7e 3d 20 70 ch(p; gs) q ~= p
1fc0: 3b 0a 09 09 09 62 6f 6f 6c 5b 5d 5b 5d 20 76 20 ;....bool[][] v
1fd0: 3d 20 6e 65 77 20 62 6f 6f 6c 5b 5d 5b 5d 28 67 = new bool[][](g
1fe0: 2e 6d 61 70 2e 48 2b 32 2c 20 67 2e 6d 61 70 2e .map.H+2, g.map.
1ff0: 57 2b 32 29 3b 0a 09 09 09 66 6f 72 65 61 63 68 W+2);....foreach
2000: 28 70 3b 20 71 29 20 76 5b 70 2e 79 5d 5b 70 2e (p; q) v[p.y][p.
2010: 78 5d 3d 74 72 75 65 3b 0a 09 09 09 62 6f 6f 6c x]=true;....bool
2020: 20 66 69 72 73 74 5f 73 74 65 70 20 3d 20 74 72 first_step = tr
2030: 75 65 3b 0a 09 09 09 66 6f 72 28 69 6e 74 20 73 ue;....for(int s
2040: 74 65 70 3d 38 3b 20 71 2e 6c 65 6e 67 74 68 3b tep=8; q.length;
2050: 20 2b 2b 73 74 65 70 29 20 7b 0a 09 09 09 09 50 ++step) {.....P
2060: 6f 73 5b 5d 20 71 32 3b 0a 09 09 09 09 66 6f 72 os[] q2;.....for
2070: 65 61 63 68 28 70 3b 20 71 29 20 7b 0a 09 09 09 each(p; q) {....
2080: 09 09 69 6e 74 5b 5d 20 79 79 79 3d 5b 70 2e 79 ..int[] yyy=[p.y
2090: 2d 31 2c 70 2e 79 2c 70 2e 79 2c 70 2e 79 2b 31 -1,p.y,p.y,p.y+1
20a0: 5d 3b 0a 09 09 09 09 09 69 6e 74 5b 5d 20 78 78 ];......int[] xx
20b0: 78 3d 5b 70 2e 78 2c 70 2e 78 2d 31 2c 70 2e 78 x=[p.x,p.x-1,p.x
20c0: 2b 31 2c 70 2e 78 5d 3b 0a 09 09 09 09 09 73 74 +1,p.x];......st
20d0: 72 69 6e 67 20 73 73 73 3d 22 55 52 4c 44 22 3b ring sss="URLD";
20e0: 0a 09 09 09 09 09 66 6f 72 28 69 6e 74 20 69 3d ......for(int i=
20f0: 30 3b 20 69 3c 79 79 79 2e 6c 65 6e 67 74 68 3b 0; i<yyy.length;
2100: 20 2b 2b 69 29 20 69 66 28 21 66 69 72 73 74 5f ++i) if(!first_
2110: 73 74 65 70 20 7c 7c 20 67 2e 6d 61 70 5b 70 5d step || g.map[p]
2120: 21 3d 27 40 27 20 7c 7c 20 73 73 73 5b 69 5d 3d !='@' || sss[i]=
2130: 3d 27 4c 27 20 7c 7c 20 73 73 73 5b 69 5d 3d 3d ='L' || sss[i]==
2140: 27 52 27 29 20 7b 0a 09 09 09 09 09 09 69 6e 74 'R') {.......int
2150: 20 79 20 3d 20 79 79 79 5b 69 5d 3b 0a 09 09 09 y = yyy[i];....
2160: 09 09 09 69 6e 74 20 78 20 3d 20 78 78 78 5b 69 ...int x = xxx[i
2170: 5d 3b 0a 09 09 09 09 09 09 69 66 28 27 31 27 3c ];.......if('1'<
2180: 3d 67 2e 6d 61 70 5b 79 2c 78 5d 26 26 67 2e 6d =g.map[y,x]&&g.m
2190: 61 70 5b 79 2c 78 5d 3c 3d 27 39 27 29 20 7b 0a ap[y,x]<='9') {.
21a0: 09 09 09 09 09 09 09 66 6f 72 65 61 63 68 28 70 .......foreach(p
21b0: 70 70 3b 20 67 2e 74 72 2e 73 6f 75 72 63 65 5f pp; g.tr.source_
21c0: 70 6f 73 28 67 2e 6d 61 70 5b 79 2c 78 5d 29 29 pos(g.map[y,x]))
21d0: 20 7b 0a 09 09 09 09 09 09 09 09 79 79 79 20 7e {.........yyy ~
21e0: 3d 20 70 70 70 2e 79 3b 0a 09 09 09 09 09 09 09 = ppp.y;........
21f0: 09 78 78 78 20 7e 3d 20 70 70 70 2e 78 3b 0a 09 .xxx ~= ppp.x;..
2200: 09 09 09 09 09 09 7d 0a 09 09 09 09 09 09 09 63 ......}........c
2210: 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 09 09 09 7d ontinue;.......}
2220: 0a 09 09 09 09 09 09 69 66 28 76 5b 79 5d 5b 78 .......if(v[y][x
2230: 5d 29 20 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 ]) continue;....
2240: 09 09 09 69 66 28 79 3d 3d 73 2e 79 20 26 26 20 ...if(y==s.y &&
2250: 78 3d 3d 73 2e 78 20 26 26 20 69 3c 34 29 20 7b x==s.x && i<4) {
2260: 0a 09 09 09 09 09 09 09 63 68 61 72 20 63 20 3d ........char c =
2270: 20 73 73 73 5b 69 5d 3b 0a 09 09 09 09 09 09 09 sss[i];........
2280: 69 66 28 20 64 65 61 74 68 2e 63 6f 75 6e 74 28 if( death.count(
2290: 63 29 20 3d 3d 20 30 20 29 0a 09 09 09 09 09 09 c) == 0 ).......
22a0: 09 09 72 65 74 75 72 6e 20 5b 74 75 70 6c 65 28 ..return [tuple(
22b0: 63 2c 73 74 65 70 29 5d 3b 0a 09 09 09 09 09 09 c,step)];.......
22c0: 7d 20 65 6c 73 65 20 69 66 28 66 6f 72 62 69 64 } else if(forbid
22d0: 64 65 6e 5f 63 65 6c 6c 5b 79 5d 5b 78 5d 29 7b den_cell[y][x]){
22e0: 0a 09 09 09 09 09 09 7d 20 65 6c 73 65 20 69 66 .......} else if
22f0: 28 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 20 27 (g.map[y,x]==' '
2300: 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 5c ||g.map[y,x]=='\
2310: 5c 27 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d \'||g.map[y,x]==
2320: 27 2e 27 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d '.'||g.map[y,x]=
2330: 3d 27 21 27 7c 7c 69 3e 3d 34 29 20 7b 0a 09 09 ='!'||i>=4) {...
2340: 09 09 09 09 09 71 32 20 7e 3d 20 6e 65 77 20 50 .....q2 ~= new P
2350: 6f 73 28 79 2c 78 29 3b 0a 09 09 09 09 09 09 09 os(y,x);........
2360: 76 5b 79 5d 5b 78 5d 3d 74 72 75 65 3b 0a 09 09 v[y][x]=true;...
2370: 09 09 09 09 7d 0a 09 09 09 09 09 7d 0a 09 09 09 ....}......}....
2380: 09 7d 0a 09 09 09 09 66 69 72 73 74 5f 73 74 65 .}.....first_ste
2390: 70 20 3d 20 66 61 6c 73 65 3b 0a 09 09 09 09 71 p = false;.....q
23a0: 20 3d 20 71 32 3b 0a 09 09 09 7d 0a 09 09 09 72 = q2;....}....r
23b0: 65 74 75 72 6e 20 5b 5d 3b 0a 09 09 7d 0a 0a 09 eturn [];...}...
23c0: 09 2f 2f 20 70 75 73 68 20 72 6f 63 6b 73 21 0a .// push rocks!.
23d0: 09 09 54 75 70 6c 65 21 28 63 68 61 72 2c 69 6e ..Tuple!(char,in
23e0: 74 29 5b 5d 20 74 72 79 43 28 29 20 7b 0a 09 09 t)[] tryC() {...
23f0: 09 63 6f 6e 73 74 28 50 6f 73 29 5b 5d 20 71 3b .const(Pos)[] q;
2400: 0a 09 09 09 66 6f 72 65 61 63 68 28 70 3b 20 67 ....foreach(p; g
2410: 73 29 20 71 20 7e 3d 20 70 3b 0a 09 09 09 62 6f s) q ~= p;....bo
2420: 6f 6c 5b 5d 5b 5d 20 76 20 3d 20 6e 65 77 20 62 ol[][] v = new b
2430: 6f 6f 6c 5b 5d 5b 5d 28 67 2e 6d 61 70 2e 48 2b ool[][](g.map.H+
2440: 32 2c 20 67 2e 6d 61 70 2e 57 2b 32 29 3b 0a 09 2, g.map.W+2);..
2450: 09 09 66 6f 72 65 61 63 68 28 70 3b 20 71 29 20 ..foreach(p; q)
2460: 76 5b 70 2e 79 5d 5b 70 2e 78 5d 3d 74 72 75 65 v[p.y][p.x]=true
2470: 3b 0a 09 09 09 62 6f 6f 6c 20 66 69 72 73 74 5f ;....bool first_
2480: 73 74 65 70 20 3d 20 74 72 75 65 3b 0a 09 09 09 step = true;....
2490: 66 6f 72 28 69 6e 74 20 73 74 65 70 3d 32 30 3b for(int step=20;
24a0: 20 71 2e 6c 65 6e 67 74 68 3b 20 2b 2b 73 74 65 q.length; ++ste
24b0: 70 29 20 7b 0a 09 09 09 09 50 6f 73 5b 5d 20 71 p) {.....Pos[] q
24c0: 32 3b 0a 09 09 09 09 66 6f 72 65 61 63 68 28 70 2;.....foreach(p
24d0: 3b 20 71 29 20 7b 0a 09 09 09 09 09 69 6e 74 5b ; q) {......int[
24e0: 5d 20 79 79 79 3d 5b 70 2e 79 2d 31 2c 70 2e 79 ] yyy=[p.y-1,p.y
24f0: 2c 70 2e 79 2c 70 2e 79 2b 31 5d 3b 0a 09 09 09 ,p.y,p.y+1];....
2500: 09 09 69 6e 74 5b 5d 20 78 78 78 3d 5b 70 2e 78 ..int[] xxx=[p.x
2510: 2c 70 2e 78 2d 31 2c 70 2e 78 2b 31 2c 70 2e 78 ,p.x-1,p.x+1,p.x
2520: 5d 3b 0a 09 09 09 09 09 73 74 72 69 6e 67 20 73 ];......string s
2530: 73 73 3d 22 55 52 4c 44 22 3b 0a 09 09 09 09 09 ss="URLD";......
2540: 66 6f 72 28 69 6e 74 20 69 3d 30 3b 20 69 3c 79 for(int i=0; i<y
2550: 79 79 2e 6c 65 6e 67 74 68 3b 20 2b 2b 69 29 20 yy.length; ++i)
2560: 69 66 28 21 66 69 72 73 74 5f 73 74 65 70 20 7c if(!first_step |
2570: 7c 20 67 2e 6d 61 70 5b 70 5d 21 3d 27 40 27 20 | g.map[p]!='@'
2580: 7c 7c 20 73 73 73 5b 69 5d 3d 3d 27 4c 27 20 7c || sss[i]=='L' |
2590: 7c 20 73 73 73 5b 69 5d 3d 3d 27 52 27 29 20 7b | sss[i]=='R') {
25a0: 0a 09 09 09 09 09 09 69 6e 74 20 79 20 3d 20 79 .......int y = y
25b0: 79 79 5b 69 5d 3b 0a 09 09 09 09 09 09 69 6e 74 yy[i];.......int
25c0: 20 78 20 3d 20 78 78 78 5b 69 5d 3b 0a 09 09 09 x = xxx[i];....
25d0: 09 09 09 69 66 28 69 73 5f 72 6f 63 6b 79 28 67 ...if(is_rocky(g
25e0: 2e 6d 61 70 5b 70 5d 29 29 20 7b 0a 09 09 09 09 .map[p])) {.....
25f0: 09 09 09 69 66 28 69 3e 3d 34 29 63 6f 6e 74 69 ...if(i>=4)conti
2600: 6e 75 65 3b 0a 09 09 09 09 09 09 09 69 66 28 79 nue;........if(y
2610: 21 3d 70 2e 79 29 63 6f 6e 74 69 6e 75 65 3b 0a !=p.y)continue;.
2620: 09 09 09 09 09 09 09 69 66 28 67 2e 6d 61 70 5b .......if(g.map[
2630: 79 2c 70 2e 78 2b 28 70 2e 78 2d 78 29 5d 21 3d y,p.x+(p.x-x)]!=
2640: 27 20 27 26 26 67 2e 6d 61 70 5b 79 2c 70 2e 78 ' '&&g.map[y,p.x
2650: 2b 28 70 2e 78 2d 78 29 5d 21 3d 27 52 27 29 63 +(p.x-x)]!='R')c
2660: 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 09 09 09 7d ontinue;.......}
2670: 0a 09 09 09 09 09 09 69 66 28 27 31 27 3c 3d 67 .......if('1'<=g
2680: 2e 6d 61 70 5b 79 2c 78 5d 26 26 67 2e 6d 61 70 .map[y,x]&&g.map
2690: 5b 79 2c 78 5d 3c 3d 27 39 27 29 20 7b 0a 09 09 [y,x]<='9') {...
26a0: 09 09 09 09 09 66 6f 72 65 61 63 68 28 70 70 70 .....foreach(ppp
26b0: 3b 20 67 2e 74 72 2e 73 6f 75 72 63 65 5f 70 6f ; g.tr.source_po
26c0: 73 28 67 2e 6d 61 70 5b 79 2c 78 5d 29 29 20 7b s(g.map[y,x])) {
26d0: 0a 09 09 09 09 09 09 09 09 79 79 79 20 7e 3d 20 .........yyy ~=
26e0: 70 70 70 2e 79 3b 0a 09 09 09 09 09 09 09 09 78 ppp.y;.........x
26f0: 78 78 20 7e 3d 20 70 70 70 2e 78 3b 0a 09 09 09 xx ~= ppp.x;....
2700: 09 09 09 09 7d 0a 09 09 09 09 09 09 09 63 6f 6e ....}........con
2710: 74 69 6e 75 65 3b 0a 09 09 09 09 09 09 7d 0a 09 tinue;.......}..
2720: 09 09 09 09 09 69 66 28 76 5b 79 5d 5b 78 5d 29 .....if(v[y][x])
2730: 20 63 6f 6e 74 69 6e 75 65 3b 0a 09 09 09 09 09 continue;......
2740: 09 69 66 28 79 3d 3d 73 2e 79 20 26 26 20 78 3d .if(y==s.y && x=
2750: 3d 73 2e 78 20 26 26 20 69 3c 34 29 20 7b 0a 09 =s.x && i<4) {..
2760: 09 09 09 09 09 09 63 68 61 72 20 63 20 3d 20 73 ......char c = s
2770: 73 73 5b 69 5d 3b 0a 09 09 09 09 09 09 09 69 66 ss[i];........if
2780: 28 20 64 65 61 74 68 2e 63 6f 75 6e 74 28 63 29 ( death.count(c)
2790: 20 3d 3d 20 30 20 29 0a 09 09 09 09 09 09 09 09 == 0 ).........
27a0: 72 65 74 75 72 6e 20 5b 74 75 70 6c 65 28 63 2c return [tuple(c,
27b0: 73 74 65 70 29 5d 3b 0a 09 09 09 09 09 09 7d 20 step)];.......}
27c0: 65 6c 73 65 20 69 66 28 66 6f 72 62 69 64 64 65 else if(forbidde
27d0: 6e 5f 63 65 6c 6c 5b 79 5d 5b 78 5d 29 7b 0a 09 n_cell[y][x]){..
27e0: 09 09 09 09 09 7d 20 65 6c 73 65 20 69 66 28 67 .....} else if(g
27f0: 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 20 27 7c 7c .map[y,x]==' '||
2800: 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 5c 5c 27 g.map[y,x]=='\\'
2810: 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e ||g.map[y,x]=='.
2820: 27 7c 7c 69 73 5f 72 6f 63 6b 79 28 67 2e 6d 61 '||is_rocky(g.ma
2830: 70 5b 79 2c 78 5d 29 7c 7c 67 2e 6d 61 70 5b 79 p[y,x])||g.map[y
2840: 2c 78 5d 3d 3d 27 21 27 7c 7c 69 3e 3d 34 29 20 ,x]=='!'||i>=4)
2850: 7b 0a 09 09 09 09 09 09 09 71 32 20 7e 3d 20 6e {........q2 ~= n
2860: 65 77 20 50 6f 73 28 79 2c 78 29 3b 0a 09 09 09 ew Pos(y,x);....
2870: 09 09 09 09 76 5b 79 5d 5b 78 5d 3d 74 72 75 65 ....v[y][x]=true
2880: 3b 0a 09 09 09 09 09 09 7d 0a 09 09 09 09 09 7d ;.......}......}
2890: 0a 09 09 09 09 7d 0a 09 09 09 09 66 69 72 73 74 .....}.....first
28a0: 5f 73 74 65 70 20 3d 20 66 61 6c 73 65 3b 0a 09 _step = false;..
28b0: 09 09 09 71 20 3d 20 71 32 3b 0a 09 09 09 7d 0a ...q = q2;....}.
28c0: 09 09 09 72 65 74 75 72 6e 20 5b 5d 3b 0a 09 09 ...return [];...
28d0: 7d 0a 09 09 72 65 74 75 72 6e 20 28 64 61 6e 67 }...return (dang
28e0: 65 72 5f 6f 6b 20 3f 20 5b 5d 20 3a 20 74 72 79 er_ok ? [] : try
28f0: 41 28 29 29 20 7e 20 74 72 79 42 28 29 20 7e 20 A()) ~ tryB() ~
2900: 74 72 79 43 28 29 3b 0a 09 7d 0a 0a 09 62 6f 6f tryC();..}...boo
2910: 6c 20 69 73 5f 6f 6e 65 5f 77 61 79 5f 6c 6f 61 l is_one_way_loa
2920: 64 28 69 6e 20 47 61 6d 65 20 67 2c 20 63 68 61 d(in Game g, cha
2930: 72 20 63 29 0a 09 7b 0a 09 09 50 6f 73 20 70 20 r c)..{...Pos p
2940: 3d 20 67 2e 6d 61 70 2e 72 6f 62 6f 74 2e 63 6c = g.map.robot.cl
2950: 6f 6e 65 28 29 3b 0a 09 09 50 6f 73 20 71 3b 0a one();...Pos q;.
2960: 09 09 69 66 28 63 3d 3d 27 55 27 29 20 71 3d 6e ..if(c=='U') q=n
2970: 65 77 20 50 6f 73 28 70 2e 79 2b 31 2c 70 2e 78 ew Pos(p.y+1,p.x
2980: 29 3b 0a 09 09 69 66 28 63 3d 3d 27 44 27 29 20 );...if(c=='D')
2990: 71 3d 6e 65 77 20 50 6f 73 28 70 2e 79 2d 31 2c q=new Pos(p.y-1,
29a0: 70 2e 78 29 3b 0a 09 09 69 66 28 63 3d 3d 27 4c p.x);...if(c=='L
29b0: 27 29 20 71 3d 6e 65 77 20 50 6f 73 28 70 2e 79 ') q=new Pos(p.y
29c0: 2c 70 2e 78 2d 31 29 3b 0a 09 09 69 66 28 63 3d ,p.x-1);...if(c=
29d0: 3d 27 52 27 29 20 71 3d 6e 65 77 20 50 6f 73 28 ='R') q=new Pos(
29e0: 70 2e 79 2c 70 2e 78 2b 31 29 3b 0a 09 09 63 68 p.y,p.x+1);...ch
29f0: 61 72 20 64 20 3d 20 67 2e 6d 61 70 5b 71 5d 3b ar d = g.map[q];
2a00: 0a 09 09 69 66 28 21 28 64 3d 3d 27 20 27 7c 7c ...if(!(d==' '||
2a10: 64 3d 3d 27 2e 27 7c 7c 64 3d 3d 27 21 27 29 29 d=='.'||d=='!'))
2a20: 0a 09 09 09 72 65 74 75 72 6e 20 66 61 6c 73 65 ....return false
2a30: 3b 0a 0a 09 09 62 6f 6f 6c 20 66 6f 75 6e 64 5f ;....bool found_
2a40: 6c 61 6d 62 64 61 20 3d 20 66 61 6c 73 65 3b 0a lambda = false;.
2a50: 09 09 69 6e 74 5b 34 5d 20 64 79 3d 5b 2d 31 2c ..int[4] dy=[-1,
2a60: 2b 31 2c 30 2c 30 5d 3b 0a 09 09 69 6e 74 5b 34 +1,0,0];...int[4
2a70: 5d 20 64 78 3d 5b 30 2c 30 2c 2b 31 2c 2d 31 5d ] dx=[0,0,+1,-1]
2a80: 3b 0a 09 09 66 6f 72 28 3b 3b 29 0a 09 09 7b 0a ;...for(;;)...{.
2a90: 09 09 09 50 6f 73 20 72 20 3d 20 6e 75 6c 6c 3b ...Pos r = null;
2aa0: 0a 09 09 09 66 6f 72 28 69 6e 74 20 69 3d 30 3b ....for(int i=0;
2ab0: 20 69 3c 34 3b 20 2b 2b 69 29 20 7b 0a 09 09 09 i<4; ++i) {....
2ac0: 09 69 6e 74 20 79 3d 71 2e 79 2b 64 79 5b 69 5d .int y=q.y+dy[i]
2ad0: 3b 0a 09 09 09 09 69 6e 74 20 78 3d 71 2e 78 2b ;.....int x=q.x+
2ae0: 64 78 5b 69 5d 3b 0a 09 09 09 09 69 66 28 78 3d dx[i];.....if(x=
2af0: 3d 70 2e 78 20 26 26 20 79 3d 3d 70 2e 79 29 0a =p.x && y==p.y).
2b00: 09 09 09 09 09 63 6f 6e 74 69 6e 75 65 3b 0a 09 .....continue;..
2b10: 09 09 09 63 68 61 72 20 65 20 3d 20 67 2e 6d 61 ...char e = g.ma
2b20: 70 5b 79 2c 78 5d 3b 0a 09 09 09 09 69 66 28 65 p[y,x];.....if(e
2b30: 3d 3d 27 23 27 29 0a 09 09 09 09 09 63 6f 6e 74 =='#')......cont
2b40: 69 6e 75 65 3b 0a 09 09 09 09 69 66 28 65 3d 3d inue;.....if(e==
2b50: 27 20 27 7c 7c 65 3d 3d 27 2e 27 7c 7c 65 3d 3d ' '||e=='.'||e==
2b60: 27 21 27 7c 7c 65 3d 3d 27 52 27 7c 7c 65 3d 3d '!'||e=='R'||e==
2b70: 27 5c 5c 27 29 20 7b 0a 09 09 09 09 09 69 66 28 '\\') {......if(
2b80: 72 20 21 69 73 20 6e 75 6c 6c 29 0a 09 09 09 09 r !is null).....
2b90: 09 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0a ..return false;.
2ba0: 09 09 09 09 09 72 20 3d 20 6e 65 77 20 50 6f 73 .....r = new Pos
2bb0: 28 79 2c 78 29 3b 0a 09 09 09 09 09 69 66 28 65 (y,x);......if(e
2bc0: 3d 3d 27 5c 5c 27 29 0a 09 09 09 09 09 09 66 6f =='\\').......fo
2bd0: 75 6e 64 5f 6c 61 6d 62 64 61 20 3d 20 74 72 75 und_lambda = tru
2be0: 65 3b 0a 09 09 09 09 09 63 6f 6e 74 69 6e 75 65 e;......continue
2bf0: 3b 0a 09 09 09 09 7d 0a 09 09 09 09 72 65 74 75 ;.....}.....retu
2c00: 72 6e 20 66 61 6c 73 65 3b 0a 09 09 09 7d 0a 09 rn false;....}..
2c10: 09 09 69 66 28 72 20 69 73 20 6e 75 6c 6c 29 0a ..if(r is null).
2c20: 09 09 09 09 62 72 65 61 6b 3b 0a 09 09 09 70 3d ....break;....p=
2c30: 71 3b 0a 09 09 09 71 3d 72 3b 0a 09 09 7d 0a 09 q;....q=r;...}..
2c40: 09 72 65 74 75 72 6e 20 66 6f 75 6e 64 5f 6c 61 .return found_la
2c50: 6d 62 64 61 3b 0a 09 7d 0a 7d 0a 0a 2f 2f 2f 0a mbda;..}.}..///.
2c60: 2f 2f 2f 20 53 6f 6c 76 65 72 20 22 46 69 72 65 /// Solver "Fire
2c70: 22 3a 20 69 6e 20 72 61 69 64 69 6e 67 20 61 6e ": in raiding an
2c80: 64 20 70 6c 75 6e 64 65 72 69 6e 67 20 6f 74 68 d plundering oth
2c90: 65 72 20 73 6f 6c 76 65 72 73 2c 20 62 65 20 6c er solvers, be l
2ca0: 69 6b 65 20 66 69 72 65 2e 0a 2f 2f 2f 0a 63 6c ike fire..///.cl
2cb0: 61 73 73 20 e4 be b5 e6 8e a0 e5 a6 82 e7 81 ab ass ............
2cc0: 28 53 75 62 53 6f 6c 76 65 72 29 20 3a 20 53 6f (SubSolver) : So
2cd0: 6c 76 65 72 0a 7b 0a 09 2f 2f 20 50 61 72 61 6d lver.{..// Param
2ce0: 65 74 65 72 73 2e 0a 09 69 6e 74 20 20 20 20 20 eters...int
2cf0: 20 20 20 20 20 20 20 50 72 65 64 69 63 74 46 75 PredictFu
2d00: 74 75 72 65 20 3d 20 31 30 3b 0a 09 63 6f 6e 73 ture = 10;..cons
2d10: 74 20 73 74 72 69 6e 67 5b 5d 20 52 61 6e 64 6f t string[] Rando
2d20: 6d 43 68 6f 69 63 65 50 61 74 74 65 72 6e 3b 20 mChoicePattern;
2d30: 2f 2f 20 50 46 2a 52 43 50 20 65 78 68 61 75 73 // PF*RCP exhaus
2d40: 74 69 76 65 20 73 65 61 72 63 68 20 66 6f 72 20 tive search for
2d50: 52 4c 20 73 74 65 70 73 0a 09 63 6f 6e 73 74 20 RL steps..const
2d60: 20 20 20 20 20 20 20 20 20 52 65 70 6c 61 6e 4c ReplanL
2d70: 65 6e 67 74 68 20 20 3d 20 34 30 30 3b 20 2f 2f ength = 400; //
2d80: 20 4f 28 50 46 2a 52 43 50 2a 52 4c 2a 53 75 62 O(PF*RCP*RL*Sub
2d90: 53 6f 6c 76 65 72 2e 73 69 6e 67 6c 65 5f 73 74 Solver.single_st
2da0: 65 70 29 0a 0a 09 47 61 6d 65 20 20 20 20 20 20 ep)...Game
2db0: 63 75 72 72 65 6e 74 5f 67 61 6d 65 3b 0a 09 53 current_game;..S
2dc0: 75 62 53 6f 6c 76 65 72 20 73 75 62 5f 73 6f 6c ubSolver sub_sol
2dd0: 76 65 72 3b 0a 0a 09 65 6e 75 6d 20 7b 54 65 6e ver;...enum {Ten
2de0: 74 61 74 69 76 65 2c 20 54 65 6e 74 61 74 69 76 tative, Tentativ
2df0: 65 5f 53 74 75 63 6b 2c 20 46 69 78 65 64 7d 3b e_Stuck, Fixed};
2e00: 0a 09 73 74 72 69 6e 67 20 70 6c 61 6e 3b 0a 09 ..string plan;..
2e10: 69 6e 74 20 20 20 20 70 6c 61 6e 5f 73 74 61 74 int plan_stat
2e20: 65 3b 0a 09 69 6e 74 20 20 20 20 72 65 70 6c 61 e;..int repla
2e30: 6e 5f 6c 69 6d 69 74 3b 0a 09 62 6f 6f 6c 20 20 n_limit;..bool
2e40: 20 6c 61 6d 62 64 61 5f 67 65 74 74 65 72 3b 0a lambda_getter;.
2e50: 09 69 6e 74 20 20 20 20 63 6c 65 61 72 5f 69 6d .int clear_im
2e60: 70 72 6f 76 65 6d 65 6e 74 20 3d 20 33 3b 0a 0a provement = 3;..
2e70: 09 74 68 69 73 28 69 6e 20 47 61 6d 65 20 67 29 .this(in Game g)
2e80: 0a 09 7b 0a 09 09 63 75 72 72 65 6e 74 5f 67 61 ..{...current_ga
2e90: 6d 65 20 3d 20 67 2e 63 6c 6f 6e 65 28 29 3b 0a me = g.clone();.
2ea0: 09 09 70 6c 61 6e 20 20 20 20 20 20 20 20 20 3d ..plan =
2eb0: 20 22 22 3b 0a 09 09 70 6c 61 6e 5f 73 74 61 74 "";...plan_stat
2ec0: 65 20 20 20 3d 20 54 65 6e 74 61 74 69 76 65 3b e = Tentative;
2ed0: 0a 09 09 69 66 28 67 2e 6d 61 70 2e 57 2a 67 2e ...if(g.map.W*g.
2ee0: 6d 61 70 2e 48 20 3c 3d 20 34 30 30 29 20 7b 0a map.H <= 400) {.
2ef0: 09 09 09 52 61 6e 64 6f 6d 43 68 6f 69 63 65 50 ...RandomChoiceP
2f00: 61 74 74 65 72 6e 20 3d 20 5b 22 55 55 22 2c 22 attern = ["UU","
2f10: 55 44 22 2c 22 55 4c 22 2c 22 55 52 22 2c 0a 09 UD","UL","UR",..
2f20: 09 09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 ..
2f30: 20 20 20 20 20 20 20 20 20 22 44 55 22 2c 22 44 "DU","D
2f40: 44 22 2c 22 44 4c 22 2c 22 44 52 22 2c 0a 09 09 D","DL","DR",...
2f50: 09 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 .
2f60: 20 20 20 20 20 20 20 20 22 4c 55 22 2c 22 4c 44 "LU","LD
2f70: 22 2c 22 4c 4c 22 2c 22 4c 52 22 2c 0a 09 09 09 ","LL","LR",....
2f80: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20
2f90: 20 20 20 20 20 20 20 22 52 55 22 2c 22 52 44 22 "RU","RD"
2fa0: 2c 22 52 4c 22 2c 22 52 52 22 2c 22 55 55 55 22 ,"RL","RR","UUU"
2fb0: 2c 22 55 55 55 55 22 2c 22 55 55 55 55 55 22 5d ,"UUUU","UUUUU"]
2fc0: 3b 0a 09 09 09 50 72 65 64 69 63 74 46 75 74 75 ;....PredictFutu
2fd0: 72 65 20 3d 20 32 30 3b 0a 09 09 09 63 6c 65 61 re = 20;....clea
2fe0: 72 5f 69 6d 70 72 6f 76 65 6d 65 6e 74 20 3d 20 r_improvement =
2ff0: 31 3b 0a 09 09 7d 0a 09 09 65 6c 73 65 20 69 66 1;...}...else if
3000: 28 67 2e 6d 61 70 2e 57 2a 67 2e 6d 61 70 2e 48 (g.map.W*g.map.H
3010: 20 3c 3d 20 34 30 39 36 29 20 7b 0a 09 09 09 52 <= 4096) {....R
3020: 61 6e 64 6f 6d 43 68 6f 69 63 65 50 61 74 74 65 andomChoicePatte
3030: 72 6e 20 3d 20 5b 22 55 55 55 22 2c 22 55 22 2c rn = ["UUU","U",
3040: 22 44 22 2c 22 4c 22 2c 22 52 22 2c 22 55 44 22 "D","L","R","UD"
3050: 2c 22 44 55 22 2c 22 4c 52 22 2c 22 52 4c 22 5d ,"DU","LR","RL"]
3060: 3b 0a 09 09 09 50 72 65 64 69 63 74 46 75 74 75 ;....PredictFutu
3070: 72 65 20 3d 20 31 30 3b 0a 09 09 09 63 6c 65 61 re = 10;....clea
3080: 72 5f 69 6d 70 72 6f 76 65 6d 65 6e 74 20 3d 20 r_improvement =
3090: 30 3b 0a 09 09 7d 0a 09 09 65 6c 73 65 20 7b 0a 0;...}...else {.
30a0: 09 09 09 52 61 6e 64 6f 6d 43 68 6f 69 63 65 50 ...RandomChoiceP
30b0: 61 74 74 65 72 6e 20 3d 20 5b 22 55 22 2c 22 44 attern = ["U","D
30c0: 22 2c 22 4c 22 2c 22 52 22 5d 3b 0a 09 09 09 50 ","L","R"];....P
30d0: 72 65 64 69 63 74 46 75 74 75 72 65 20 3d 20 31 redictFuture = 1
30e0: 30 3b 0a 09 09 09 63 6c 65 61 72 5f 69 6d 70 72 0;....clear_impr
30f0: 6f 76 65 6d 65 6e 74 20 3d 20 30 3b 0a 09 09 7d ovement = 0;...}
3100: 0a 0a 09 09 72 65 70 6c 61 6e 5f 6c 69 6d 69 74 ....replan_limit
3110: 20 3d 20 50 72 65 64 69 63 74 46 75 74 75 72 65 = PredictFuture
3120: 3b 0a 09 7d 0a 0a 09 63 68 61 72 20 73 69 6e 67 ;..}...char sing
3130: 6c 65 5f 73 74 65 70 28 29 0a 09 7b 0a 09 09 69 le_step()..{...i
3140: 66 28 63 75 72 72 65 6e 74 5f 67 61 6d 65 2e 64 f(current_game.d
3150: 65 61 64 20 7c 7c 20 63 75 72 72 65 6e 74 5f 67 ead || current_g
3160: 61 6d 65 2e 63 6c 65 61 72 65 64 29 0a 09 09 09 ame.cleared)....
3170: 72 65 74 75 72 6e 20 27 41 27 3b 0a 0a 09 09 2f return 'A';..../
3180: 2f 20 4d 61 6b 65 20 65 6e 6f 75 67 68 20 70 72 / Make enough pr
3190: 65 64 69 63 74 69 6f 6e 2e 0a 09 09 77 68 69 6c ediction....whil
31a0: 65 28 20 70 6c 61 6e 5f 73 74 61 74 65 3d 3d 54 e( plan_state==T
31b0: 65 6e 74 61 74 69 76 65 20 26 26 20 70 6c 61 6e entative && plan
31c0: 2e 6c 65 6e 67 74 68 3c 72 65 70 6c 61 6e 5f 6c .length<replan_l
31d0: 69 6d 69 74 20 29 0a 09 09 09 73 69 6e 67 6c 65 imit )....single
31e0: 5f 73 74 65 70 5f 70 72 65 64 69 63 74 28 29 3b _step_predict();
31f0: 0a 0a 09 09 2f 2f 20 49 66 20 74 68 65 20 66 75 ....// If the fu
3200: 74 75 72 65 20 69 73 20 62 61 64 2c 20 63 6f 72 ture is bad, cor
3210: 72 65 63 74 2e 0a 09 09 69 66 28 20 70 6c 61 6e rect....if( plan
3220: 5f 73 74 61 74 65 3d 3d 54 65 6e 74 61 74 69 76 _state==Tentativ
3230: 65 5f 53 74 75 63 6b 20 26 26 20 70 6c 61 6e 2e e_Stuck && plan.
3240: 6c 65 6e 67 74 68 3c 72 65 70 6c 61 6e 5f 6c 69 length<replan_li
3250: 6d 69 74 20 26 26 20 21 6c 61 6d 62 64 61 5f 67 mit && !lambda_g
3260: 65 74 74 65 72 20 29 0a 09 09 09 72 65 70 6c 61 etter )....repla
3270: 6e 28 29 3b 0a 0a 09 09 2f 2f 20 46 6f 6c 6c 6f n();....// Follo
3280: 77 20 74 68 65 20 70 72 65 64 69 63 74 65 64 20 w the predicted
3290: 70 6c 61 6e 2e 0a 09 09 69 66 28 20 70 6c 61 6e plan....if( plan
32a0: 2e 65 6d 70 74 79 20 29 0a 09 09 09 72 65 74 75 .empty )....retu
32b0: 72 6e 20 27 41 27 3b 0a 09 09 63 68 61 72 20 63 rn 'A';...char c
32c0: 20 3d 20 70 6c 61 6e 5b 30 5d 3b 0a 09 09 70 6c = plan[0];...pl
32d0: 61 6e 20 3d 20 70 6c 61 6e 5b 31 2e 2e 24 5d 3b an = plan[1..$];
32e0: 0a 09 09 69 6e 74 20 62 5f 6c 61 6d 62 64 61 20 ...int b_lambda
32f0: 3d 20 63 75 72 72 65 6e 74 5f 67 61 6d 65 2e 6d = current_game.m
3300: 61 70 2e 63 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d ap.collected_lam
3310: 62 64 61 3b 0a 09 09 63 75 72 72 65 6e 74 5f 67 bda;...current_g
3320: 61 6d 65 2e 63 6f 6d 6d 61 6e 64 28 63 29 3b 0a ame.command(c);.
3330: 09 09 69 6e 74 20 61 5f 6c 61 6d 62 64 61 20 3d ..int a_lambda =
3340: 20 63 75 72 72 65 6e 74 5f 67 61 6d 65 2e 6d 61 current_game.ma
3350: 70 2e 63 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 p.collected_lamb
3360: 64 61 3b 0a 09 09 69 66 28 62 5f 6c 61 6d 62 64 da;...if(b_lambd
3370: 61 20 3c 20 61 5f 6c 61 6d 62 64 61 29 20 6c 61 a < a_lambda) la
3380: 6d 62 64 61 5f 67 65 74 74 65 72 20 3d 20 66 61 mbda_getter = fa
3390: 6c 73 65 3b 0a 09 09 72 65 74 75 72 6e 20 63 3b lse;...return c;
33a0: 0a 09 7d 0a 0a 09 76 6f 69 64 20 66 6f 72 63 65 ..}...void force
33b0: 28 63 68 61 72 20 63 29 0a 09 7b 0a 09 09 69 66 (char c)..{...if
33c0: 28 70 6c 61 6e 2e 6c 65 6e 67 74 68 3e 30 20 26 (plan.length>0 &
33d0: 26 20 70 6c 61 6e 5b 30 5d 3d 3d 63 29 0a 09 09 & plan[0]==c)...
33e0: 7b 0a 09 09 09 2f 2f 20 49 66 20 6d 61 74 63 68 {....// If match
33f0: 69 6e 67 20 74 68 65 20 70 6c 61 6e 2c 20 6a 75 ing the plan, ju
3400: 73 74 20 67 6f 20 66 6f 72 77 61 72 64 2e 0a 09 st go forward...
3410: 09 09 70 6c 61 6e 20 3d 20 70 6c 61 6e 5b 31 2e ..plan = plan[1.
3420: 2e 24 5d 3b 0a 09 09 7d 0a 09 09 65 6c 73 65 0a .$];...}...else.
3430: 09 09 7b 0a 09 09 09 2f 2f 20 44 69 73 63 61 72 ..{....// Discar
3440: 64 20 74 68 65 20 70 6c 61 6e 2c 20 6f 74 68 65 d the plan, othe
3450: 72 77 69 73 65 2e 0a 09 09 09 70 6c 61 6e 5f 73 rwise.....plan_s
3460: 74 61 74 65 20 3d 20 54 65 6e 74 61 74 69 76 65 tate = Tentative
3470: 3b 0a 09 09 09 70 6c 61 6e 20 20 20 20 20 20 20 ;....plan
3480: 3d 20 22 22 3b 0a 09 09 09 73 75 62 5f 73 6f 6c = "";....sub_sol
3490: 76 65 72 20 3d 20 6e 75 6c 6c 3b 0a 09 09 7d 0a ver = null;...}.
34a0: 09 09 63 75 72 72 65 6e 74 5f 67 61 6d 65 2e 63 ..current_game.c
34b0: 6f 6d 6d 61 6e 64 28 63 29 3b 0a 09 7d 0a 0a 09 ommand(c);..}...
34c0: 76 6f 69 64 20 73 69 6e 67 6c 65 5f 73 74 65 70 void single_step
34d0: 5f 70 72 65 64 69 63 74 28 29 0a 09 7b 0a 09 09 _predict()..{...
34e0: 69 66 28 73 75 62 5f 73 6f 6c 76 65 72 20 69 73 if(sub_solver is
34f0: 20 6e 75 6c 6c 29 20 7b 0a 09 09 09 73 75 62 5f null) {....sub_
3500: 73 6f 6c 76 65 72 20 3d 20 6e 65 77 20 53 75 62 solver = new Sub
3510: 53 6f 6c 76 65 72 28 63 75 72 72 65 6e 74 5f 67 Solver(current_g
3520: 61 6d 65 29 3b 0a 09 09 09 70 6c 61 6e 20 20 20 ame);....plan
3530: 20 20 20 20 3d 20 22 22 3b 0a 09 09 7d 0a 0a 09 = "";...}...
3540: 09 63 68 61 72 20 63 20 3d 20 73 75 62 5f 73 6f .char c = sub_so
3550: 6c 76 65 72 2e 73 69 6e 67 6c 65 5f 73 74 65 70 lver.single_step
3560: 28 29 3b 0a 09 09 69 66 28 63 20 3d 3d 20 27 41 ();...if(c == 'A
3570: 27 29 0a 09 09 09 70 6c 61 6e 5f 73 74 61 74 65 ')....plan_state
3580: 20 3d 20 54 65 6e 74 61 74 69 76 65 5f 53 74 75 = Tentative_Stu
3590: 63 6b 3b 0a 09 09 65 6c 73 65 20 7b 0a 09 09 09 ck;...else {....
35a0: 70 6c 61 6e 20 7e 3d 20 63 3b 0a 09 09 09 69 66 plan ~= c;....if
35b0: 28 73 75 62 5f 73 6f 6c 76 65 72 2e 67 2e 63 6c (sub_solver.g.cl
35c0: 65 61 72 65 64 29 20 7b 0a 09 09 09 09 69 66 28 eared) {.....if(
35d0: 63 6c 65 61 72 5f 69 6d 70 72 6f 76 65 6d 65 6e clear_improvemen
35e0: 74 2d 2d 3e 30 29 20 7b 0a 09 09 09 09 09 70 6c t-->0) {......pl
35f0: 61 6e 5f 73 74 61 74 65 20 3d 20 54 65 6e 74 61 an_state = Tenta
3600: 74 69 76 65 5f 53 74 75 63 6b 3b 0a 09 09 09 09 tive_Stuck;.....
3610: 09 72 65 70 6c 61 6e 5f 6c 69 6d 69 74 20 3d 20 .replan_limit =
3620: 6d 69 6e 28 70 6c 61 6e 2e 6c 65 6e 67 74 68 2d min(plan.length-
3630: 70 6c 61 6e 2e 6c 65 6e 67 74 68 2f 28 63 6c 65 plan.length/(cle
3640: 61 72 5f 69 6d 70 72 6f 76 65 6d 65 6e 74 2b 31 ar_improvement+1
3650: 29 2c 20 50 72 65 64 69 63 74 46 75 74 75 72 65 ), PredictFuture
3660: 29 3b 0a 09 09 09 09 7d 20 65 6c 73 65 20 7b 0a );.....} else {.
3670: 09 09 09 09 09 70 6c 61 6e 5f 73 74 61 74 65 20 .....plan_state
3680: 3d 20 46 69 78 65 64 3b 0a 09 09 09 09 7d 0a 09 = Fixed;.....}..
3690: 09 09 7d 20 65 6c 73 65 20 7b 0a 09 09 09 09 70 ..} else {.....p
36a0: 6c 61 6e 5f 73 74 61 74 65 20 3d 20 28 73 75 62 lan_state = (sub
36b0: 5f 73 6f 6c 76 65 72 2e 67 2e 64 65 61 64 20 3f _solver.g.dead ?
36c0: 20 54 65 6e 74 61 74 69 76 65 5f 53 74 75 63 6b Tentative_Stuck
36d0: 20 3a 20 54 65 6e 74 61 74 69 76 65 29 3b 0a 09 : Tentative);..
36e0: 09 09 7d 0a 09 09 7d 0a 09 7d 0a 0a 09 76 6f 69 ..}...}..}...voi
36f0: 64 20 72 65 70 6c 61 6e 28 29 0a 09 7b 0a 09 09 d replan()..{...
3700: 2f 2f 20 54 72 79 20 74 6f 20 72 65 70 6c 61 63 // Try to replac
3710: 65 20 65 76 65 72 79 20 73 74 65 70 20 6f 66 20 e every step of
3720: 74 68 65 20 70 6c 61 6e 20 62 79 20 61 6e 6f 74 the plan by anot
3730: 68 65 72 20 6d 6f 76 65 2e 0a 09 09 47 61 6d 65 her move....Game
3740: 20 67 20 3d 20 63 75 72 72 65 6e 74 5f 67 61 6d g = current_gam
3750: 65 2e 63 6c 6f 6e 65 28 29 3b 0a 09 09 54 75 70 e.clone();...Tup
3760: 6c 65 21 28 53 75 62 53 6f 6c 76 65 72 2c 20 73 le!(SubSolver, s
3770: 74 72 69 6e 67 2c 20 69 6e 74 29 20 63 61 6e 64 tring, int) cand
3780: 20 3d 20 74 75 70 6c 65 28 73 75 62 5f 73 6f 6c = tuple(sub_sol
3790: 76 65 72 2c 20 70 6c 61 6e 2c 20 54 65 6e 74 61 ver, plan, Tenta
37a0: 74 69 76 65 5f 53 74 75 63 6b 29 3b 0a 09 09 69 tive_Stuck);...i
37b0: 6e 74 20 69 6e 73 65 72 74 69 6f 6e 5f 70 6f 69 nt insertion_poi
37c0: 6e 74 20 3d 20 70 6c 61 6e 2e 6c 65 6e 67 74 68 nt = plan.length
37d0: 3b 0a 09 09 62 6f 6f 6c 20 74 69 65 62 72 65 61 ;...bool tiebrea
37e0: 6b 5f 62 79 5f 74 75 72 6e 20 3d 20 66 61 6c 73 k_by_turn = fals
37f0: 65 3b 0a 09 09 69 6e 74 20 63 6f 6e 73 69 64 65 e;...int conside
3800: 72 5f 6c 65 6e 67 74 68 20 3d 20 6d 69 6e 28 52 r_length = min(R
3810: 65 70 6c 61 6e 4c 65 6e 67 74 68 2c 20 67 2e 6d eplanLength, g.m
3820: 61 70 2e 57 2a 67 2e 6d 61 70 2e 48 29 3b 0a 09 ap.W*g.map.H);..
3830: 09 69 66 28 63 61 6e 64 5b 30 5d 2e 67 2e 63 6c .if(cand[0].g.cl
3840: 65 61 72 65 64 29 20 63 6f 6e 73 69 64 65 72 5f eared) consider_
3850: 6c 65 6e 67 74 68 20 3d 20 6d 69 6e 28 63 6f 6e length = min(con
3860: 73 69 64 65 72 5f 6c 65 6e 67 74 68 2c 20 63 61 sider_length, ca
3870: 6e 64 5b 31 5d 2e 6c 65 6e 67 74 68 29 3b 0a 0a nd[1].length);..
3880: 09 09 66 6f 72 28 69 6e 74 20 69 3d 30 3b 20 69 ..for(int i=0; i
3890: 3c 70 6c 61 6e 2e 6c 65 6e 67 74 68 3b 20 2b 2b <plan.length; ++
38a0: 69 29 20 7b 0a 09 09 09 66 6f 72 65 61 63 68 28 i) {....foreach(
38b0: 73 74 72 69 6e 67 20 70 72 65 66 69 78 3b 20 52 string prefix; R
38c0: 61 6e 64 6f 6d 43 68 6f 69 63 65 50 61 74 74 65 andomChoicePatte
38d0: 72 6e 29 0a 09 09 09 09 69 66 28 70 72 65 66 69 rn).....if(prefi
38e0: 78 5b 30 5d 20 21 3d 20 70 6c 61 6e 5b 69 5d 29 x[0] != plan[i])
38f0: 20 7b 0a 09 09 09 09 09 54 75 70 6c 65 21 28 53 {......Tuple!(S
3900: 75 62 53 6f 6c 76 65 72 2c 20 73 74 72 69 6e 67 ubSolver, string
3910: 2c 20 69 6e 74 29 20 72 20 3d 20 74 72 79 5f 70 , int) r = try_p
3920: 6c 61 6e 28 67 2c 20 70 72 65 66 69 78 2c 20 63 lan(g, prefix, c
3930: 6f 6e 73 69 64 65 72 5f 6c 65 6e 67 74 68 2d 69 onsider_length-i
3940: 2d 70 72 65 66 69 78 2e 6c 65 6e 67 74 68 29 3b -prefix.length);
3950: 0a 09 09 09 09 09 72 5b 31 5d 20 3d 20 70 6c 61 ......r[1] = pla
3960: 6e 5b 30 2e 2e 69 5d 20 7e 20 70 72 65 66 69 78 n[0..i] ~ prefix
3970: 20 7e 20 72 5b 31 5d 3b 0a 09 09 09 09 09 62 6f ~ r[1];......bo
3980: 6f 6c 20 62 65 74 74 65 72 20 3d 20 66 61 6c 73 ol better = fals
3990: 65 2c 20 74 62 74 3d 66 61 6c 73 65 3b 0a 09 09 e, tbt=false;...
39a0: 09 09 09 69 66 28 21 63 61 6e 64 5b 30 5d 2e 67 ...if(!cand[0].g
39b0: 2e 63 6c 65 61 72 65 64 20 26 26 20 72 5b 30 5d .cleared && r[0]
39c0: 2e 67 2e 63 6c 65 61 72 65 64 29 0a 09 09 09 09 .g.cleared).....
39d0: 09 09 62 65 74 74 65 72 20 3d 20 74 72 75 65 3b ..better = true;
39e0: 0a 09 09 09 09 09 65 6c 73 65 20 69 66 28 63 61 ......else if(ca
39f0: 6e 64 5b 30 5d 2e 67 2e 63 6c 65 61 72 65 64 20 nd[0].g.cleared
3a00: 26 26 20 72 5b 30 5d 2e 67 2e 63 6c 65 61 72 65 && r[0].g.cleare
3a10: 64 29 20 7b 0a 09 09 09 09 09 09 62 65 74 74 65 d) {.......bette
3a20: 72 20 3d 20 63 61 6e 64 5b 30 5d 2e 67 2e 73 63 r = cand[0].g.sc
3a30: 6f 72 65 20 3c 20 72 5b 30 5d 2e 67 2e 73 63 6f ore < r[0].g.sco
3a40: 72 65 3b 0a 09 09 09 09 09 7d 0a 09 09 09 09 09 re;......}......
3a50: 65 6c 73 65 20 69 66 28 21 63 61 6e 64 5b 30 5d else if(!cand[0]
3a60: 2e 67 2e 63 6c 65 61 72 65 64 20 26 26 20 21 72 .g.cleared && !r
3a70: 5b 30 5d 2e 67 2e 63 6c 65 61 72 65 64 29 20 7b [0].g.cleared) {
3a80: 0a 09 09 09 09 09 09 69 66 28 63 61 6e 64 5b 30 .......if(cand[0
3a90: 5d 2e 67 2e 6d 61 70 2e 63 6f 6c 6c 65 63 74 65 ].g.map.collecte
3aa0: 64 5f 6c 61 6d 62 64 61 20 3c 20 72 5b 30 5d 2e d_lambda < r[0].
3ab0: 67 2e 6d 61 70 2e 63 6f 6c 6c 65 63 74 65 64 5f g.map.collected_
3ac0: 6c 61 6d 62 64 61 29 0a 09 09 09 09 09 09 09 62 lambda)........b
3ad0: 65 74 74 65 72 20 3d 20 74 72 75 65 3b 0a 09 09 etter = true;...
3ae0: 09 09 09 09 65 6c 73 65 20 69 66 28 63 61 6e 64 ....else if(cand
3af0: 5b 30 5d 2e 67 2e 6d 61 70 2e 63 6f 6c 6c 65 63 [0].g.map.collec
3b00: 74 65 64 5f 6c 61 6d 62 64 61 20 3d 3d 20 72 5b ted_lambda == r[
3b10: 30 5d 2e 67 2e 6d 61 70 2e 63 6f 6c 6c 65 63 74 0].g.map.collect
3b20: 65 64 5f 6c 61 6d 62 64 61 29 20 7b 0a 09 09 09 ed_lambda) {....
3b30: 09 09 09 09 69 66 28 63 61 6e 64 5b 30 5d 2e 67 ....if(cand[0].g
3b40: 2e 64 65 61 64 20 26 26 20 21 72 5b 30 5d 2e 67 .dead && !r[0].g
3b50: 2e 64 65 61 64 29 0a 09 09 09 09 09 09 09 09 62 .dead).........b
3b60: 65 74 74 65 72 20 3d 20 74 72 75 65 3b 0a 09 09 etter = true;...
3b70: 09 09 09 09 09 65 6c 73 65 20 69 66 28 63 61 6e .....else if(can
3b80: 64 5b 30 5d 2e 67 2e 64 65 61 64 20 3d 3d 20 72 d[0].g.dead == r
3b90: 5b 30 5d 2e 67 2e 64 65 61 64 29 20 7b 0a 09 09 [0].g.dead) {...
3ba0: 09 09 09 09 09 09 62 65 74 74 65 72 20 3d 20 28 ......better = (
3bb0: 63 61 6e 64 5b 31 5d 2e 6c 65 6e 67 74 68 20 3c cand[1].length <
3bc0: 20 72 5b 31 5d 2e 6c 65 6e 67 74 68 20 26 26 20 r[1].length &&
3bd0: 72 5b 32 5d 21 3d 54 65 6e 74 61 74 69 76 65 5f r[2]!=Tentative_
3be0: 53 74 75 63 6b 29 3b 0a 09 09 09 09 09 09 09 09 Stuck);.........
3bf0: 74 62 74 20 3d 20 74 72 75 65 3b 0a 09 09 09 09 tbt = true;.....
3c00: 09 09 09 7d 0a 09 09 09 09 09 09 7d 0a 09 09 09 ...}.......}....
3c10: 09 09 7d 0a 09 09 09 09 09 69 66 28 62 65 74 74 ..}......if(bett
3c20: 65 72 29 20 7b 0a 09 09 09 09 09 09 63 61 6e 64 er) {.......cand
3c30: 20 3d 20 72 3b 0a 09 09 09 09 09 09 74 69 65 62 = r;.......tieb
3c40: 72 65 61 6b 5f 62 79 5f 74 75 72 6e 20 3d 20 74 reak_by_turn = t
3c50: 72 75 65 3b 0a 09 09 09 09 09 09 69 6e 73 65 72 rue;.......inser
3c60: 74 69 6f 6e 5f 70 6f 69 6e 74 20 3d 20 69 2b 70 tion_point = i+p
3c70: 72 65 66 69 78 2e 6c 65 6e 67 74 68 3b 0a 09 09 refix.length;...
3c80: 09 09 09 09 69 66 28 72 5b 30 5d 2e 67 2e 63 6c ....if(r[0].g.cl
3c90: 65 61 72 65 64 29 20 63 6f 6e 73 69 64 65 72 5f eared) consider_
3ca0: 6c 65 6e 67 74 68 20 3d 20 6d 69 6e 28 63 6f 6e length = min(con
3cb0: 73 69 64 65 72 5f 6c 65 6e 67 74 68 2c 20 72 5b sider_length, r[
3cc0: 31 5d 2e 6c 65 6e 67 74 68 29 3b 0a 09 09 09 09 1].length);.....
3cd0: 09 7d 0a 09 09 09 09 7d 0a 09 09 09 67 2e 63 6f .}.....}....g.co
3ce0: 6d 6d 61 6e 64 28 70 6c 61 6e 5b 69 5d 29 3b 0a mmand(plan[i]);.
3cf0: 09 09 7d 0a 0a 09 09 69 66 28 63 61 6e 64 5b 32 ..}....if(cand[2
3d00: 5d 3d 3d 46 69 78 65 64 20 26 26 20 69 6e 73 65 ]==Fixed && inse
3d10: 72 74 69 6f 6e 5f 70 6f 69 6e 74 21 3d 70 6c 61 rtion_point!=pla
3d20: 6e 2e 6c 65 6e 67 74 68 20 26 26 20 63 6c 65 61 n.length && clea
3d30: 72 5f 69 6d 70 72 6f 76 65 6d 65 6e 74 2d 2d 3e r_improvement-->
3d40: 30 29 20 7b 0a 09 09 09 73 75 62 5f 73 6f 6c 76 0) {....sub_solv
3d50: 65 72 20 20 20 3d 20 63 61 6e 64 5b 30 5d 3b 0a er = cand[0];.
3d60: 09 09 09 70 6c 61 6e 20 20 20 20 20 20 20 20 20 ...plan
3d70: 3d 20 63 61 6e 64 5b 31 5d 3b 0a 09 09 09 70 6c = cand[1];....pl
3d80: 61 6e 5f 73 74 61 74 65 20 20 20 3d 20 54 65 6e an_state = Ten
3d90: 74 61 74 69 76 65 5f 53 74 75 63 6b 3b 0a 09 09 tative_Stuck;...
3da0: 09 72 65 70 6c 61 6e 5f 6c 69 6d 69 74 20 3d 20 .replan_limit =
3db0: 6d 69 6e 28 70 6c 61 6e 2e 6c 65 6e 67 74 68 20 min(plan.length
3dc0: 2d 20 69 6e 73 65 72 74 69 6f 6e 5f 70 6f 69 6e - insertion_poin
3dd0: 74 2c 20 50 72 65 64 69 63 74 46 75 74 75 72 65 t, PredictFuture
3de0: 29 3b 0a 09 09 09 6c 61 6d 62 64 61 5f 67 65 74 );....lambda_get
3df0: 74 65 72 20 3d 20 63 75 72 72 65 6e 74 5f 67 61 ter = current_ga
3e00: 6d 65 2e 6d 61 70 2e 63 6f 6c 6c 65 63 74 65 64 me.map.collected
3e10: 5f 6c 61 6d 62 64 61 20 3c 20 63 61 6e 64 5b 30 _lambda < cand[0
3e20: 5d 2e 67 2e 6d 61 70 2e 63 6f 6c 6c 65 63 74 65 ].g.map.collecte
3e30: 64 5f 6c 61 6d 62 64 61 3b 0a 09 09 7d 20 65 6c d_lambda;...} el
3e40: 73 65 20 7b 0a 09 09 09 73 75 62 5f 73 6f 6c 76 se {....sub_solv
3e50: 65 72 20 20 20 3d 20 63 61 6e 64 5b 30 5d 3b 0a er = cand[0];.
3e60: 09 09 09 70 6c 61 6e 20 20 20 20 20 20 20 20 20 ...plan
3e70: 3d 20 63 61 6e 64 5b 31 5d 3b 0a 09 09 09 70 6c = cand[1];....pl
3e80: 61 6e 5f 73 74 61 74 65 20 20 20 3d 20 28 70 6c an_state = (pl
3e90: 61 6e 2e 6c 65 6e 67 74 68 20 3c 20 50 72 65 64 an.length < Pred
3ea0: 69 63 74 46 75 74 75 72 65 20 3f 20 46 69 78 65 ictFuture ? Fixe
3eb0: 64 20 3a 20 63 61 6e 64 5b 32 5d 29 3b 0a 09 09 d : cand[2]);...
3ec0: 09 72 65 70 6c 61 6e 5f 6c 69 6d 69 74 20 3d 20 .replan_limit =
3ed0: 74 69 65 62 72 65 61 6b 5f 62 79 5f 74 75 72 6e tiebreak_by_turn
3ee0: 20 3f 20 6d 69 6e 28 50 72 65 64 69 63 74 46 75 ? min(PredictFu
3ef0: 74 75 72 65 2c 20 28 70 6c 61 6e 2e 6c 65 6e 67 ture, (plan.leng
3f00: 74 68 2b 31 29 2f 32 29 20 3a 20 50 72 65 64 69 th+1)/2) : Predi
3f10: 63 74 46 75 74 75 72 65 3b 0a 09 09 09 6c 61 6d ctFuture;....lam
3f20: 62 64 61 5f 67 65 74 74 65 72 20 3d 20 63 75 72 bda_getter = cur
3f30: 72 65 6e 74 5f 67 61 6d 65 2e 6d 61 70 2e 63 6f rent_game.map.co
3f40: 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 64 61 20 3c llected_lambda <
3f50: 20 63 61 6e 64 5b 30 5d 2e 67 2e 6d 61 70 2e 63 cand[0].g.map.c
3f60: 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 64 61 3b ollected_lambda;
3f70: 0a 09 09 7d 0a 09 7d 0a 0a 09 54 75 70 6c 65 21 ...}..}...Tuple!
3f80: 28 53 75 62 53 6f 6c 76 65 72 2c 20 73 74 72 69 (SubSolver, stri
3f90: 6e 67 2c 20 69 6e 74 29 20 74 72 79 5f 70 6c 61 ng, int) try_pla
3fa0: 6e 28 69 6e 20 47 61 6d 65 20 67 2c 20 73 74 72 n(in Game g, str
3fb0: 69 6e 67 20 70 72 65 66 69 78 2c 20 69 6e 74 20 ing prefix, int
3fc0: 63 6f 6e 73 69 64 65 72 5f 6c 65 6e 67 74 68 29 consider_length)
3fd0: 0a 09 7b 0a 09 09 69 66 28 63 6f 6e 73 69 64 65 ..{...if(conside
3fe0: 72 5f 6c 65 6e 67 74 68 3c 3d 30 29 20 63 6f 6e r_length<=0) con
3ff0: 73 69 64 65 72 5f 6c 65 6e 67 74 68 20 3d 20 32 sider_length = 2
4000: 3b 0a 0a 09 09 53 75 62 53 6f 6c 76 65 72 20 73 ;....SubSolver s
4010: 20 3d 20 6e 65 77 20 53 75 62 53 6f 6c 76 65 72 = new SubSolver
4020: 28 67 29 3b 0a 09 09 66 6f 72 65 61 63 68 28 63 (g);...foreach(c
4030: 68 61 72 20 63 3b 20 70 72 65 66 69 78 29 0a 09 har c; prefix)..
4040: 09 09 73 2e 66 6f 72 63 65 28 63 29 3b 0a 09 09 ..s.force(c);...
4050: 73 74 72 69 6e 67 20 6c 6f 67 3b 0a 09 09 69 6e string log;...in
4060: 74 20 73 74 61 74 65 20 3d 20 54 65 6e 74 61 74 t state = Tentat
4070: 69 76 65 3b 0a 09 09 77 68 69 6c 65 28 21 73 2e ive;...while(!s.
4080: 67 2e 63 6c 65 61 72 65 64 20 26 26 20 21 73 2e g.cleared && !s.
4090: 67 2e 64 65 61 64 20 26 26 20 6c 6f 67 2e 6c 65 g.dead && log.le
40a0: 6e 67 74 68 3c 3d 63 6f 6e 73 69 64 65 72 5f 6c ngth<=consider_l
40b0: 65 6e 67 74 68 29 20 7b 0a 09 09 09 63 68 61 72 ength) {....char
40c0: 20 63 20 3d 20 73 2e 73 69 6e 67 6c 65 5f 73 74 c = s.single_st
40d0: 65 70 28 29 3b 0a 09 09 09 69 66 28 20 63 20 3d ep();....if( c =
40e0: 3d 20 27 41 27 20 29 20 7b 0a 09 09 09 09 73 74 = 'A' ) {.....st
40f0: 61 74 65 20 3d 20 54 65 6e 74 61 74 69 76 65 5f ate = Tentative_
4100: 53 74 75 63 6b 3b 0a 09 09 09 09 62 72 65 61 6b Stuck;.....break
4110: 3b 0a 09 09 09 7d 0a 09 09 09 6c 6f 67 20 7e 3d ;....}....log ~=
4120: 20 63 3b 0a 09 09 7d 0a 09 09 69 66 28 73 2e 67 c;...}...if(s.g
4130: 2e 63 6c 65 61 72 65 64 29 20 73 74 61 74 65 20 .cleared) state
4140: 3d 20 46 69 78 65 64 3b 0a 09 09 65 6c 73 65 20 = Fixed;...else
4150: 69 66 28 73 2e 67 2e 64 65 61 64 29 20 73 74 61 if(s.g.dead) sta
4160: 74 65 20 3d 20 54 65 6e 74 61 74 69 76 65 5f 53 te = Tentative_S
4170: 74 75 63 6b 3b 0a 09 09 72 65 74 75 72 6e 20 74 tuck;...return t
4180: 75 70 6c 65 28 73 2c 20 6c 6f 67 2c 20 73 74 61 uple(s, log, sta
4190: 74 65 29 3b 0a 09 7d 0a 7d 0a 0a 2f 2f 2f 0a 2f te);..}.}..///./
41a0: 2f 2f 20 53 6f 6c 76 65 72 20 22 57 69 6e 64 22 // Solver "Wind"
41b0: 3a 20 6c 65 74 20 79 6f 75 72 20 72 61 70 69 64 : let your rapid
41c0: 69 74 79 20 62 65 20 74 68 61 74 20 6f 66 20 74 ity be that of t
41d0: 68 65 20 77 69 6e 64 2e 0a 2f 2f 2f 20 0a 63 6c he wind../// .cl
41e0: 61 73 73 20 e7 96 be e5 a6 82 e9 a2 a8 28 62 6f ass .........(bo
41f0: 6f 6c 20 55 50 29 20 3a 20 53 6f 6c 76 65 72 0a ol UP) : Solver.
4200: 7b 0a 09 47 61 6d 65 20 67 3b 0a 09 74 68 69 73 {..Game g;..this
4210: 28 69 6e 20 47 61 6d 65 20 67 29 0a 09 7b 0a 09 (in Game g)..{..
4220: 09 74 68 69 73 2e 67 20 3d 20 67 2e 63 6c 6f 6e .this.g = g.clon
4230: 65 28 29 3b 0a 09 7d 0a 0a 09 73 74 72 69 6e 67 e();..}...string
4240: 20 70 6c 61 6e 3b 0a 0a 09 63 68 61 72 20 73 69 plan;...char si
4250: 6e 67 6c 65 5f 73 74 65 70 28 29 0a 09 7b 0a 09 ngle_step()..{..
4260: 09 61 75 74 6f 20 64 6d 20 3d 20 64 65 61 74 68 .auto dm = death
4270: 5f 6d 6f 76 65 28 67 29 3b 0a 09 09 69 66 28 20 _move(g);...if(
4280: 70 6c 61 6e 2e 65 6d 70 74 79 20 7c 7c 20 64 6d plan.empty || dm
4290: 5b 30 5d 2e 63 6f 75 6e 74 28 70 6c 61 6e 5b 30 [0].count(plan[0
42a0: 5d 29 20 29 20 7b 0a 09 09 09 70 6c 61 6e 20 3d ]) ) {....plan =
42b0: 20 74 68 69 6e 6b 28 67 2c 20 64 6d 5b 30 5d 29 think(g, dm[0])
42c0: 3b 0a 09 09 09 69 66 28 20 70 6c 61 6e 2e 65 6d ;....if( plan.em
42d0: 70 74 79 20 29 0a 09 09 09 09 70 6c 61 6e 20 3d pty ).....plan =
42e0: 20 22 57 22 3b 0a 09 09 7d 0a 0a 09 09 63 68 61 "W";...}....cha
42f0: 72 20 63 20 3d 20 70 6c 61 6e 5b 30 5d 3b 0a 09 r c = plan[0];..
4300: 09 70 6c 61 6e 20 3d 20 70 6c 61 6e 5b 31 2e 2e .plan = plan[1..
4310: 24 5d 3b 0a 0a 09 09 69 66 28 63 20 3d 3d 20 27 $];....if(c == '
4320: 57 27 29 20 7b 0a 09 09 09 77 61 69 74 5f 63 6f W') {....wait_co
4330: 75 6e 74 65 72 2b 2b 3b 0a 09 09 09 69 66 28 64 unter++;....if(d
4340: 6d 5b 30 5d 2e 63 6f 75 6e 74 28 63 29 20 7c 7c m[0].count(c) ||
4350: 20 77 61 69 74 5f 63 6f 75 6e 74 65 72 3e 3d 33 wait_counter>=3
4360: 29 20 7b 0a 09 09 09 09 63 20 3d 20 27 41 27 3b ) {.....c = 'A';
4370: 0a 09 09 09 09 66 6f 72 65 61 63 68 28 63 68 61 .....foreach(cha
4380: 72 20 63 63 3b 20 22 44 4c 52 55 22 29 0a 09 09 r cc; "DLRU")...
4390: 09 09 09 69 66 28 64 6d 5b 30 5d 2e 63 6f 75 6e ...if(dm[0].coun
43a0: 74 28 63 63 29 20 3d 3d 20 30 29 0a 09 09 09 09 t(cc) == 0).....
43b0: 09 09 63 20 3d 20 63 63 3b 0a 09 09 09 7d 0a 09 ..c = cc;....}..
43c0: 09 09 69 66 28 77 61 69 74 5f 63 6f 75 6e 74 65 ..if(wait_counte
43d0: 72 20 3e 20 32 30 29 0a 09 09 09 09 63 20 3d 20 r > 20).....c =
43e0: 27 41 27 3b 0a 09 09 7d 20 65 6c 73 65 20 7b 0a 'A';...} else {.
43f0: 09 09 09 77 61 69 74 5f 63 6f 75 6e 74 65 72 20 ...wait_counter
4400: 3d 20 30 3b 0a 09 09 7d 0a 09 09 69 66 28 63 20 = 0;...}...if(c
4410: 21 3d 20 27 41 27 29 0a 09 09 09 67 2e 63 6f 6d != 'A')....g.com
4420: 6d 61 6e 64 28 63 29 3b 0a 09 09 72 65 74 75 72 mand(c);...retur
4430: 6e 20 63 3b 0a 09 7d 0a 0a 09 76 6f 69 64 20 66 n c;..}...void f
4440: 6f 72 63 65 28 63 68 61 72 20 63 29 0a 09 7b 0a orce(char c)..{.
4450: 09 09 69 66 28 63 20 21 3d 20 27 41 27 29 0a 09 ..if(c != 'A')..
4460: 09 09 67 2e 63 6f 6d 6d 61 6e 64 28 63 29 3b 0a ..g.command(c);.
4470: 09 7d 0a 0a 09 69 6e 74 20 77 61 69 74 5f 63 6f .}...int wait_co
4480: 75 6e 74 65 72 20 3d 20 30 3b 0a 0a 09 73 74 72 unter = 0;...str
4490: 69 6e 67 20 74 68 69 6e 6b 28 69 6e 20 47 61 6d ing think(in Gam
44a0: 65 20 67 2c 20 73 74 72 69 6e 67 20 64 65 61 74 e g, string deat
44b0: 68 29 0a 09 7b 0a 09 09 61 75 74 6f 20 51 20 3d h)..{...auto Q =
44c0: 20 6e 65 77 20 51 75 65 75 65 21 28 54 75 70 6c new Queue!(Tupl
44d0: 65 21 28 50 6f 73 2c 50 6f 73 29 29 3b 0a 09 09 e!(Pos,Pos));...
44e0: 51 2e 70 75 73 68 28 74 75 70 6c 65 28 67 2e 6d Q.push(tuple(g.m
44f0: 61 70 2e 72 6f 62 6f 74 2e 63 6c 6f 6e 65 28 29 ap.robot.clone()
4500: 2c 20 67 2e 6d 61 70 2e 72 6f 62 6f 74 2e 63 6c , g.map.robot.cl
4510: 6f 6e 65 28 29 29 2c 20 30 29 3b 0a 09 09 50 6f one()), 0);...Po
4520: 73 5b 5d 5b 5d 20 56 20 3d 20 6e 65 77 20 50 6f s[][] V = new Po
4530: 73 5b 5d 5b 5d 28 67 2e 6d 61 70 2e 48 2b 32 2c s[][](g.map.H+2,
4540: 20 67 2e 6d 61 70 2e 57 2b 32 29 3b 0a 09 09 77 g.map.W+2);...w
4550: 68 69 6c 65 28 21 51 2e 65 6d 70 74 79 29 20 7b hile(!Q.empty) {
4560: 0a 09 09 09 61 75 74 6f 20 74 75 70 20 3d 20 51 ....auto tup = Q
4570: 2e 70 6f 70 28 29 3b 0a 09 09 09 50 6f 73 20 20 .pop();....Pos
4580: 70 20 20 20 20 3d 20 74 75 70 5b 30 5d 5b 30 5d p = tup[0][0]
4590: 3b 0a 09 09 09 50 6f 73 20 20 70 72 65 76 20 3d ;....Pos prev =
45a0: 20 74 75 70 5b 30 5d 5b 31 5d 3b 0a 09 09 09 69 tup[0][1];....i
45b0: 6e 74 20 20 64 69 73 74 20 3d 20 74 75 70 5b 31 nt dist = tup[1
45c0: 5d 3b 0a 09 09 09 69 66 28 56 5b 70 2e 79 5d 5b ];....if(V[p.y][
45d0: 70 2e 78 5d 29 0a 09 09 09 09 63 6f 6e 74 69 6e p.x]).....contin
45e0: 75 65 3b 0a 09 09 09 56 5b 70 2e 79 5d 5b 70 2e ue;....V[p.y][p.
45f0: 78 5d 20 3d 20 70 72 65 76 3b 0a 09 09 09 69 66 x] = prev;....if
4600: 28 67 2e 6d 61 70 5b 70 5d 3d 3d 27 5c 5c 27 20 (g.map[p]=='\\'
4610: 7c 7c 20 67 2e 6d 61 70 5b 70 5d 3d 3d 27 4f 27 || g.map[p]=='O'
4620: 29 0a 09 09 09 7b 0a 09 09 09 09 63 68 61 72 5b )....{.....char[
4630: 5d 20 74 72 61 63 65 3b 0a 09 09 09 09 66 6f 72 ] trace;.....for
4640: 28 3b 3b 29 20 7b 0a 09 09 09 09 09 50 6f 73 20 (;;) {......Pos
4650: 71 20 3d 20 56 5b 70 2e 79 5d 5b 70 2e 78 5d 3b q = V[p.y][p.x];
4660: 0a 09 09 09 09 09 74 72 61 63 65 20 7e 3d 20 28 ......trace ~= (
4670: 71 2e 79 3d 3d 70 2e 79 20 3f 20 28 71 2e 78 3c q.y==p.y ? (q.x<
4680: 70 2e 78 20 3f 20 27 52 27 20 3a 20 27 4c 27 29 p.x ? 'R' : 'L')
4690: 20 3a 0a 09 09 09 09 09 20 20 20 20 20 20 20 20 :......
46a0: 20 20 20 20 20 20 20 20 20 20 20 20 20 28 71 2e (q.
46b0: 79 3c 70 2e 79 20 3f 20 27 55 27 20 3a 20 27 44 y<p.y ? 'U' : 'D
46c0: 27 29 29 3b 0a 09 09 09 09 09 69 66 28 71 20 3d '));......if(q =
46d0: 3d 20 67 2e 6d 61 70 2e 72 6f 62 6f 74 29 20 7b = g.map.robot) {
46e0: 0a 09 09 09 09 09 09 72 65 76 65 72 73 65 28 74 .......reverse(t
46f0: 72 61 63 65 29 3b 0a 09 09 09 09 09 09 72 65 74 race);.......ret
4700: 75 72 6e 20 74 72 61 63 65 2e 69 64 75 70 3b 0a urn trace.idup;.
4710: 09 09 09 09 09 7d 0a 09 09 09 09 09 70 3d 71 3b .....}......p=q;
4720: 0a 09 09 09 09 7d 0a 09 09 09 7d 0a 0a 09 09 09 .....}....}.....
4730: 69 6e 74 5b 34 5d 20 64 79 3d 55 50 20 3f 20 5b int[4] dy=UP ? [
4740: 2b 31 2c 30 2c 30 2c 2d 31 5d 20 20 20 20 20 20 +1,0,0,-1]
4750: 20 3a 20 5b 2d 31 2c 2b 31 2c 30 2c 30 5d 3b 0a : [-1,+1,0,0];.
4760: 09 09 09 69 6e 74 5b 34 5d 20 64 78 3d 55 50 20 ...int[4] dx=UP
4770: 3f 20 5b 30 2c 2d 31 2c 2b 31 2c 30 5d 20 20 20 ? [0,-1,+1,0]
4780: 20 20 20 20 3a 20 5b 30 2c 30 2c 2d 31 2c 2b 31 : [0,0,-1,+1
4790: 5d 3b 0a 09 09 09 63 68 61 72 5b 5d 20 64 73 3d ];....char[] ds=
47a0: 55 50 20 3f 20 5b 27 55 27 2c 27 4c 27 2c 27 52 UP ? ['U','L','R
47b0: 27 2c 27 44 27 5d 20 3a 20 5b 27 44 27 2c 27 55 ','D'] : ['D','U
47c0: 27 2c 27 4c 27 2c 27 52 27 5d 3b 0a 09 09 09 66 ','L','R'];....f
47d0: 6f 72 28 69 6e 74 20 69 3d 30 3b 20 69 3c 34 3b or(int i=0; i<4;
47e0: 20 2b 2b 69 29 20 7b 0a 09 09 09 09 69 66 28 67 ++i) {.....if(g
47f0: 2e 6d 61 70 2e 72 6f 62 6f 74 3d 3d 70 20 26 26 .map.robot==p &&
4800: 20 64 65 61 74 68 2e 63 6f 75 6e 74 28 64 73 5b death.count(ds[
4810: 69 5d 29 29 0a 09 09 09 09 09 63 6f 6e 74 69 6e i]))......contin
4820: 75 65 3b 0a 09 09 09 09 69 6e 74 20 79 3d 70 2e ue;.....int y=p.
4830: 79 2b 64 79 5b 69 5d 2c 20 78 3d 70 2e 78 2b 64 y+dy[i], x=p.x+d
4840: 78 5b 69 5d 3b 0a 09 09 09 09 69 66 28 28 67 2e x[i];.....if((g.
4850: 6d 61 70 5b 79 2c 78 5d 3d 3d 27 20 27 7c 7c 67 map[y,x]==' '||g
4860: 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 5c 5c 27 7c .map[y,x]=='\\'|
4870: 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 2e 27 |g.map[y,x]=='.'
4880: 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 4f ||g.map[y,x]=='O
4890: 27 7c 7c 67 2e 6d 61 70 5b 79 2c 78 5d 3d 3d 27 '||g.map[y,x]=='
48a0: 21 27 29 26 26 21 56 5b 79 5d 5b 78 5d 29 20 7b !')&&!V[y][x]) {
48b0: 0a 09 09 09 09 09 51 2e 70 75 73 68 28 74 75 70 ......Q.push(tup
48c0: 6c 65 28 6e 65 77 20 50 6f 73 28 79 2c 78 29 2c le(new Pos(y,x),
48d0: 70 29 2c 20 64 69 73 74 2b 31 29 3b 0a 09 09 09 p), dist+1);....
48e0: 09 7d 0a 09 09 09 7d 0a 09 09 7d 0a 0a 09 09 72 .}....}...}....r
48f0: 65 74 75 72 6e 20 22 22 3b 0a 09 7d 0a 7d 0a 0a eturn "";..}.}..
4900: 63 6c 61 73 73 20 53 77 69 74 63 68 65 72 0a 7b class Switcher.{
4910: 0a 09 74 68 69 73 28 69 6e 20 47 61 6d 65 20 67 ..this(in Game g
4920: 29 0a 09 7b 0a 09 09 69 66 28 67 2e 6d 61 70 2e )..{...if(g.map.
4930: 57 2a 67 2e 6d 61 70 2e 48 20 3c 3d 20 31 36 30 W*g.map.H <= 160
4940: 30 29 0a 09 09 09 73 75 62 5f 73 6f 6c 76 65 72 0)....sub_solver
4950: 20 3d 20 6e 65 77 20 e4 be b5 e6 8e a0 e5 a6 82 = new .........
4960: e7 81 ab 21 28 e5 be 90 e5 a6 82 e6 9e 97 29 28 ...!(.........)(
4970: 67 29 3b 0a 09 09 65 6c 73 65 0a 09 09 09 73 75 g);...else....su
4980: 62 5f 73 6f 6c 76 65 72 20 3d 20 6e 65 77 20 e4 b_solver = new .
4990: be b5 e6 8e a0 e5 a6 82 e7 81 ab 21 28 e7 96 be ...........!(...
49a0: e5 a6 82 e9 a2 a8 21 28 74 72 75 65 29 29 28 67 ......!(true))(g
49b0: 29 3b 0a 09 7d 0a 09 63 68 61 72 20 73 69 6e 67 );..}..char sing
49c0: 6c 65 5f 73 74 65 70 28 29 20 7b 20 72 65 74 75 le_step() { retu
49d0: 72 6e 20 73 75 62 5f 73 6f 6c 76 65 72 2e 73 69 rn sub_solver.si
49e0: 6e 67 6c 65 5f 73 74 65 70 28 29 3b 20 7d 0a 09 ngle_step(); }..
49f0: 76 6f 69 64 20 66 6f 72 63 65 28 63 68 61 72 20 void force(char
4a00: 63 29 20 7b 20 72 65 74 75 72 6e 20 73 75 62 5f c) { return sub_
4a10: 73 6f 6c 76 65 72 2e 66 6f 72 63 65 28 63 29 3b solver.force(c);
4a20: 20 7d 0a 0a 09 70 72 69 76 61 74 65 20 53 6f 6c }...private Sol
4a30: 76 65 72 20 73 75 62 5f 73 6f 6c 76 65 72 3b 0a ver sub_solver;.
4a40: 7d 0a 0a 61 6c 69 61 73 20 e4 be b5 e6 8e a0 e5 }..alias .......
4a50: a6 82 e7 81 ab 21 28 e7 96 be e5 a6 82 e9 a2 a8 .....!(.........
4a60: 21 28 66 61 6c 73 65 29 29 20 46 61 73 74 53 6f !(false)) FastSo
4a70: 6c 76 65 72 3b 0a 0a 61 6c 69 61 73 20 53 77 69 lver;..alias Swi
4a80: 74 63 68 65 72 20 4d 61 69 6e 53 6f 6c 76 65 72 tcher MainSolver
4a90: 3b 0a 2f 2f 61 6c 69 61 73 20 46 61 73 74 53 6f ;.//alias FastSo
4aa0: 6c 76 65 72 20 4d 61 69 6e 53 6f 6c 76 65 72 3b lver MainSolver;
4ab0: 0a 2f 2f 61 6c 69 61 73 20 e5 be 90 e5 a6 82 e6 .//alias .......
4ac0: 9e 97 20 4d 61 69 6e 53 6f 6c 76 65 72 3b 0a .. MainSolver;.