0000: 69 6d 70 6f 72 74 20 75 74 69 6c 3b 0a 0a 2f 2f import util;..//
0010: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
0020: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
0030: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
0040: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
0050: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0a 0a //////////////..
0060: 63 6c 61 73 73 20 50 6f 73 0a 7b 0a 09 70 75 62 class Pos.{..pub
0070: 6c 69 63 20 69 6d 6d 75 74 61 62 6c 65 20 69 6e lic immutable in
0080: 74 20 79 2c 20 78 3b 0a 09 6d 69 78 69 6e 20 44 t y, x;..mixin D
0090: 65 72 69 76 65 43 72 65 61 74 65 3b 0a 09 6d 69 eriveCreate;..mi
00a0: 78 69 6e 20 44 65 72 69 76 65 43 6f 6d 70 61 72 xin DeriveCompar
00b0: 65 3b 0a 09 6d 69 78 69 6e 20 44 65 72 69 76 65 e;..mixin Derive
00c0: 53 68 6f 77 3b 0a 09 50 6f 73 20 63 6c 6f 6e 65 Show;..Pos clone
00d0: 28 29 20 63 6f 6e 73 74 20 7b 20 72 65 74 75 72 () const { retur
00e0: 6e 20 63 61 73 74 28 50 6f 73 29 20 74 68 69 73 n cast(Pos) this
00f0: 3b 20 7d 0a 0a 40 70 72 6f 70 65 72 74 79 3a 0a ; }..@property:.
0100: 09 50 6f 73 20 77 61 69 74 28 29 20 20 7b 20 72 .Pos wait() { r
0110: 65 74 75 72 6e 20 74 68 69 73 2e 63 6c 6f 6e 65 eturn this.clone
0120: 28 29 3b 20 7d 0a 09 50 6f 73 20 75 70 28 29 20 (); }..Pos up()
0130: 20 20 20 7b 20 72 65 74 75 72 6e 20 6e 65 77 20 { return new
0140: 50 6f 73 28 79 2b 31 2c 20 78 29 3b 20 7d 0a 09 Pos(y+1, x); }..
0150: 50 6f 73 20 64 6f 77 6e 28 29 20 20 7b 20 72 65 Pos down() { re
0160: 74 75 72 6e 20 6e 65 77 20 50 6f 73 28 79 2d 31 turn new Pos(y-1
0170: 2c 20 78 29 3b 20 7d 0a 09 50 6f 73 20 6c 65 66 , x); }..Pos lef
0180: 74 28 29 20 20 7b 20 72 65 74 75 72 6e 20 6e 65 t() { return ne
0190: 77 20 50 6f 73 28 79 2c 20 78 2d 31 29 3b 20 7d w Pos(y, x-1); }
01a0: 0a 09 50 6f 73 20 72 69 67 68 74 28 29 20 7b 20 ..Pos right() {
01b0: 72 65 74 75 72 6e 20 6e 65 77 20 50 6f 73 28 79 return new Pos(y
01c0: 2c 20 78 2b 31 29 3b 20 7d 0a 09 61 6c 69 61 73 , x+1); }..alias
01d0: 20 77 61 69 74 20 20 57 2c 77 3b 0a 09 61 6c 69 wait W,w;..ali
01e0: 61 73 20 75 70 20 20 20 20 55 2c 75 3b 0a 09 61 as up U,u;..a
01f0: 6c 69 61 73 20 64 6f 77 6e 20 20 44 2c 64 3b 0a lias down D,d;.
0200: 09 61 6c 69 61 73 20 6c 65 66 74 20 20 4c 2c 6c .alias left L,l
0210: 3b 0a 09 61 6c 69 61 73 20 72 69 67 68 74 20 52 ;..alias right R
0220: 2c 72 3b 0a 7d 0a 0a 75 6e 69 74 74 65 73 74 0a ,r;.}..unittest.
0230: 7b 0a 09 61 73 73 65 72 74 28 20 28 6e 65 77 20 {..assert( (new
0240: 50 6f 73 28 32 2c 31 29 29 2e 55 20 3d 3d 20 6e Pos(2,1)).U == n
0250: 65 77 20 50 6f 73 28 33 2c 31 29 20 29 3b 0a 09 ew Pos(3,1) );..
0260: 61 73 73 65 72 74 28 20 28 6e 65 77 20 50 6f 73 assert( (new Pos
0270: 28 30 2c 31 29 29 2e 44 20 3d 3d 20 6e 65 77 20 (0,1)).D == new
0280: 50 6f 73 28 2d 31 2c 31 29 20 29 3b 0a 09 61 73 Pos(-1,1) );..as
0290: 73 65 72 74 28 20 28 6e 65 77 20 50 6f 73 28 32 sert( (new Pos(2
02a0: 2c 31 29 29 2e 4c 20 3d 3d 20 6e 65 77 20 50 6f ,1)).L == new Po
02b0: 73 28 32 2c 30 29 20 29 3b 0a 09 61 73 73 65 72 s(2,0) );..asser
02c0: 74 28 20 28 6e 65 77 20 50 6f 73 28 32 2c 31 29 t( (new Pos(2,1)
02d0: 29 2e 52 20 3d 3d 20 6e 65 77 20 50 6f 73 28 32 ).R == new Pos(2
02e0: 2c 32 29 20 29 3b 0a 09 69 6e 74 5b 50 6f 73 5d ,2) );..int[Pos]
02f0: 20 61 61 3b 0a 09 61 61 5b 6e 65 77 20 50 6f 73 aa;..aa[new Pos
0300: 28 31 2c 32 29 5d 20 3d 20 31 3b 0a 09 61 61 5b (1,2)] = 1;..aa[
0310: 6e 65 77 20 50 6f 73 28 31 2c 32 29 5d 20 3d 20 new Pos(1,2)] =
0320: 32 3b 0a 09 61 61 5b 6e 65 77 20 50 6f 73 28 32 2;..aa[new Pos(2
0330: 2c 31 29 5d 20 3d 20 33 3b 0a 09 61 73 73 65 72 ,1)] = 3;..asser
0340: 74 28 20 61 61 2e 6c 65 6e 67 74 68 3d 3d 32 20 t( aa.length==2
0350: 29 3b 0a 09 61 73 73 65 72 74 28 20 61 61 5b 6e );..assert( aa[n
0360: 65 77 20 50 6f 73 28 31 2c 32 29 5d 3d 3d 32 20 ew Pos(1,2)]==2
0370: 29 3b 0a 7d 0a 0a 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f );.}..//////////
0380: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
0390: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
03a0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
03b0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
03c0: 2f 2f 2f 2f 2f 2f 0a 0a 63 6c 61 73 73 20 57 61 //////..class Wa
03d0: 74 65 72 0a 7b 0a 09 70 75 62 6c 69 63 20 69 6d ter.{..public im
03e0: 6d 75 74 61 62 6c 65 20 69 6e 74 20 62 61 73 65 mutable int base
03f0: 2c 20 70 61 63 65 3b 0a 09 6d 69 78 69 6e 20 44 , pace;..mixin D
0400: 65 72 69 76 65 43 72 65 61 74 65 3b 0a 09 6d 69 eriveCreate;..mi
0410: 78 69 6e 20 44 65 72 69 76 65 43 6f 6d 70 61 72 xin DeriveCompar
0420: 65 3b 0a 09 6d 69 78 69 6e 20 44 65 72 69 76 65 e;..mixin Derive
0430: 53 68 6f 77 3b 0a 09 57 61 74 65 72 20 63 6c 6f Show;..Water clo
0440: 6e 65 28 29 20 63 6f 6e 73 74 20 7b 20 72 65 74 ne() const { ret
0450: 75 72 6e 20 63 61 73 74 28 57 61 74 65 72 29 74 urn cast(Water)t
0460: 68 69 73 3b 20 7d 0a 0a 09 73 74 61 74 69 63 20 his; }...static
0470: 6c 6f 61 64 28 73 74 72 69 6e 67 5b 73 74 72 69 load(string[stri
0480: 6e 67 5d 20 70 61 72 61 6d 73 29 0a 09 7b 0a 09 ng] params)..{..
0490: 09 72 65 74 75 72 6e 20 6e 65 77 20 57 61 74 65 .return new Wate
04a0: 72 28 70 61 72 61 6d 73 2e 67 65 74 28 22 57 61 r(params.get("Wa
04b0: 74 65 72 22 2c 20 20 20 20 22 30 22 29 2e 74 6f ter", "0").to
04c0: 21 69 6e 74 28 29 2c 0a 09 09 20 20 20 20 20 20 !int(),...
04d0: 20 20 20 20 20 20 20 20 20 20 20 70 61 72 61 6d param
04e0: 73 2e 67 65 74 28 22 46 6c 6f 6f 64 69 6e 67 22 s.get("Flooding"
04f0: 2c 20 22 30 22 29 2e 74 6f 21 69 6e 74 28 29 29 , "0").to!int())
0500: 3b 0a 09 7d 0a 0a 09 69 6e 74 20 6c 65 76 65 6c ;..}...int level
0510: 28 69 6e 74 20 6e 75 6d 62 65 72 5f 6f 66 5f 75 (int number_of_u
0520: 70 64 61 74 65 29 20 63 6f 6e 73 74 0a 09 7b 0a pdate) const..{.
0530: 09 09 72 65 74 75 72 6e 20 70 61 63 65 20 3f 20 ..return pace ?
0540: 62 61 73 65 2b 28 6e 75 6d 62 65 72 5f 6f 66 5f base+(number_of_
0550: 75 70 64 61 74 65 2f 70 61 63 65 29 20 3a 20 62 update/pace) : b
0560: 61 73 65 3b 0a 09 7d 0a 0a 09 69 6e 74 20 75 6e ase;..}...int un
0570: 74 69 6c 5f 72 69 73 65 28 69 6e 74 20 6e 75 6d til_rise(int num
0580: 62 65 72 5f 6f 66 5f 75 70 64 61 74 65 29 20 63 ber_of_update) c
0590: 6f 6e 73 74 0a 09 7b 0a 09 09 72 65 74 75 72 6e onst..{...return
05a0: 20 70 61 63 65 20 3f 20 70 61 63 65 2d 6e 75 6d pace ? pace-num
05b0: 62 65 72 5f 6f 66 5f 75 70 64 61 74 65 25 70 61 ber_of_update%pa
05c0: 63 65 20 3a 20 69 6e 74 2e 6d 61 78 3b 0a 09 7d ce : int.max;..}
05d0: 0a 7d 0a 0a 75 6e 69 74 74 65 73 74 0a 7b 0a 09 .}..unittest.{..
05e0: 57 61 74 65 72 20 77 20 3d 20 6e 65 77 20 57 61 Water w = new Wa
05f0: 74 65 72 28 31 2c 20 33 29 3b 0a 09 61 73 73 65 ter(1, 3);..asse
0600: 72 74 28 20 31 20 3d 3d 20 77 2e 6c 65 76 65 6c rt( 1 == w.level
0610: 28 30 29 20 29 3b 0a 09 61 73 73 65 72 74 28 20 (0) );..assert(
0620: 31 20 3d 3d 20 77 2e 6c 65 76 65 6c 28 31 29 20 1 == w.level(1)
0630: 29 3b 0a 09 61 73 73 65 72 74 28 20 31 20 3d 3d );..assert( 1 ==
0640: 20 77 2e 6c 65 76 65 6c 28 32 29 20 29 3b 0a 09 w.level(2) );..
0650: 61 73 73 65 72 74 28 20 32 20 3d 3d 20 77 2e 6c assert( 2 == w.l
0660: 65 76 65 6c 28 33 29 20 29 3b 0a 09 61 73 73 65 evel(3) );..asse
0670: 72 74 28 20 32 20 3d 3d 20 77 2e 6c 65 76 65 6c rt( 2 == w.level
0680: 28 34 29 20 29 3b 0a 09 61 73 73 65 72 74 28 20 (4) );..assert(
0690: 32 20 3d 3d 20 77 2e 6c 65 76 65 6c 28 35 29 20 2 == w.level(5)
06a0: 29 3b 0a 09 61 73 73 65 72 74 28 20 33 20 3d 3d );..assert( 3 ==
06b0: 20 77 2e 6c 65 76 65 6c 28 36 29 20 29 3b 0a 0a w.level(6) );..
06c0: 09 77 20 3d 20 6e 65 77 20 57 61 74 65 72 28 31 .w = new Water(1
06d0: 2c 20 30 29 3b 0a 09 61 73 73 65 72 74 28 20 31 , 0);..assert( 1
06e0: 20 3d 3d 20 77 2e 6c 65 76 65 6c 28 30 29 20 29 == w.level(0) )
06f0: 3b 0a 09 61 73 73 65 72 74 28 20 31 20 3d 3d 20 ;..assert( 1 ==
0700: 77 2e 6c 65 76 65 6c 28 31 29 20 29 3b 0a 09 61 w.level(1) );..a
0710: 73 73 65 72 74 28 20 31 20 3d 3d 20 77 2e 6c 65 ssert( 1 == w.le
0720: 76 65 6c 28 32 29 20 29 3b 0a 09 61 73 73 65 72 vel(2) );..asser
0730: 74 28 20 31 20 3d 3d 20 77 2e 6c 65 76 65 6c 28 t( 1 == w.level(
0740: 33 29 20 29 3b 0a 09 61 73 73 65 72 74 28 20 31 3) );..assert( 1
0750: 20 3d 3d 20 77 2e 6c 65 76 65 6c 28 34 29 20 29 == w.level(4) )
0760: 3b 0a 09 61 73 73 65 72 74 28 20 31 20 3d 3d 20 ;..assert( 1 ==
0770: 77 2e 6c 65 76 65 6c 28 35 29 20 29 3b 0a 7d 0a w.level(5) );.}.
0780: 0a 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f .///////////////
0790: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
07a0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
07b0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
07c0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
07d0: 2f 0a 0a 63 6c 61 73 73 20 48 69 67 65 0a 7b 0a /..class Hige.{.
07e0: 09 70 75 62 6c 69 63 20 69 6d 6d 75 74 61 62 6c .public immutabl
07f0: 65 20 69 6e 74 20 70 61 63 65 3b 0a 09 6d 69 78 e int pace;..mix
0800: 69 6e 20 44 65 72 69 76 65 43 72 65 61 74 65 3b in DeriveCreate;
0810: 0a 09 6d 69 78 69 6e 20 44 65 72 69 76 65 43 6f ..mixin DeriveCo
0820: 6d 70 61 72 65 3b 0a 09 6d 69 78 69 6e 20 44 65 mpare;..mixin De
0830: 72 69 76 65 53 68 6f 77 3b 0a 09 48 69 67 65 20 riveShow;..Hige
0840: 63 6c 6f 6e 65 28 29 20 63 6f 6e 73 74 20 7b 20 clone() const {
0850: 72 65 74 75 72 6e 20 63 61 73 74 28 48 69 67 65 return cast(Hige
0860: 29 74 68 69 73 3b 20 7d 0a 0a 09 73 74 61 74 69 )this; }...stati
0870: 63 20 6c 6f 61 64 28 73 74 72 69 6e 67 5b 73 74 c load(string[st
0880: 72 69 6e 67 5d 20 70 61 72 61 6d 73 29 0a 09 7b ring] params)..{
0890: 0a 09 09 72 65 74 75 72 6e 20 6e 65 77 20 48 69 ...return new Hi
08a0: 67 65 28 70 61 72 61 6d 73 2e 67 65 74 28 22 47 ge(params.get("G
08b0: 72 6f 77 74 68 22 2c 20 22 32 35 22 29 2e 74 6f rowth", "25").to
08c0: 21 69 6e 74 28 29 29 3b 0a 09 7d 0a 0a 09 62 6f !int());..}...bo
08d0: 6f 6c 20 69 73 5f 67 72 6f 77 69 6e 67 5f 74 75 ol is_growing_tu
08e0: 72 6e 28 69 6e 74 20 74 75 72 6e 29 20 63 6f 6e rn(int turn) con
08f0: 73 74 0a 09 7b 0a 09 09 72 65 74 75 72 6e 20 70 st..{...return p
0900: 61 63 65 20 3f 20 74 75 72 6e 25 70 61 63 65 20 ace ? turn%pace
0910: 3d 3d 20 70 61 63 65 2d 31 20 3a 20 66 61 6c 73 == pace-1 : fals
0920: 65 3b 0a 09 7d 0a 0a 09 69 6e 74 20 75 6e 74 69 e;..}...int unti
0930: 6c 5f 72 69 73 65 28 69 6e 74 20 74 75 72 6e 29 l_rise(int turn)
0940: 20 63 6f 6e 73 74 0a 09 7b 0a 09 09 72 65 74 75 const..{...retu
0950: 72 6e 20 70 61 63 65 20 3f 20 70 61 63 65 2d 74 rn pace ? pace-t
0960: 75 72 6e 25 70 61 63 65 20 3a 20 69 6e 74 2e 6d urn%pace : int.m
0970: 61 78 3b 0a 09 7d 0a 7d 0a 0a 2f 2f 2f 2f 2f 2f ax;..}.}..//////
0980: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
0990: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
09a0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
09b0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
09c0: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 0a 0a 63 6c 61 73 //////////..clas
09d0: 73 20 4d 61 70 0a 7b 0a 09 6d 69 78 69 6e 20 44 s Map.{..mixin D
09e0: 65 72 69 76 65 53 68 6f 77 3b 0a 0a 09 73 74 61 eriveShow;...sta
09f0: 74 69 63 20 4d 61 70 20 6c 6f 61 64 28 73 74 72 tic Map load(str
0a00: 69 6e 67 5b 5d 20 72 61 77 5f 64 61 74 61 2c 20 ing[] raw_data,
0a10: 73 74 72 69 6e 67 5b 73 74 72 69 6e 67 5d 20 70 string[string] p
0a20: 61 72 61 6d 73 2c 20 63 68 61 72 5b 63 68 61 72 arams, char[char
0a30: 5d 20 74 72 61 6d 70 6f 29 0a 09 7b 0a 09 09 2f ] trampo)..{.../
0a40: 2f 20 54 4f 44 4f 3a 20 63 68 6f 6f 73 65 20 6f / TODO: choose o
0a50: 70 74 69 6d 61 6c 20 72 65 70 72 65 73 65 6e 74 ptimal represent
0a60: 61 74 69 6f 6e 2e 0a 09 09 72 65 74 75 72 6e 20 ation....return
0a70: 6e 65 77 20 4d 61 70 28 72 61 77 5f 64 61 74 61 new Map(raw_data
0a80: 2c 20 70 61 72 61 6d 73 2c 20 74 72 61 6d 70 6f , params, trampo
0a90: 29 3b 0a 09 7d 0a 0a 09 63 68 61 72 5b 5d 5b 5d );..}...char[][]
0aa0: 20 64 61 74 61 3b 0a 09 50 6f 73 20 72 6f 62 6f data;..Pos robo
0ab0: 74 3b 0a 09 50 6f 73 20 6c 69 66 74 3b 0a 09 69 t;..Pos lift;..i
0ac0: 6e 74 20 77 61 74 65 72 70 72 6f 6f 66 3b 0a 09 nt waterproof;..
0ad0: 50 6f 73 5b 63 68 61 72 5d 20 74 72 5f 74 61 72 Pos[char] tr_tar
0ae0: 67 65 74 3b 0a 09 50 6f 73 5b 5d 5b 63 68 61 72 get;..Pos[][char
0af0: 5d 20 74 72 5f 73 6f 75 72 63 65 3b 0a 09 63 6f ] tr_source;..co
0b00: 6e 73 74 28 48 69 67 65 29 20 68 69 67 65 3b 0a nst(Hige) hige;.
0b10: 09 69 6e 74 20 72 61 7a 6f 72 3b 0a 09 69 6e 74 .int razor;..int
0b20: 20 63 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 64 collected_lambd
0b30: 61 3b 0a 09 69 6e 74 20 74 6f 74 61 6c 5f 6c 61 a;..int total_la
0b40: 6d 62 64 61 3b 0a 0a 09 4d 61 70 20 63 6c 6f 6e mbda;...Map clon
0b50: 65 28 29 20 63 6f 6e 73 74 20 7b 20 72 65 74 75 e() const { retu
0b60: 72 6e 20 6e 65 77 20 4d 61 70 28 74 68 69 73 29 rn new Map(this)
0b70: 3b 20 7d 0a 09 74 68 69 73 28 69 6e 20 4d 61 70 ; }..this(in Map
0b80: 20 6d 29 20 7b 0a 09 09 66 6f 72 65 61 63 68 28 m) {...foreach(
0b90: 73 3b 20 6d 2e 64 61 74 61 29 0a 09 09 09 74 68 s; m.data)....th
0ba0: 69 73 2e 64 61 74 61 20 7e 3d 20 73 2e 64 75 70 is.data ~= s.dup
0bb0: 3b 0a 09 09 74 68 69 73 2e 72 6f 62 6f 74 20 3d ;...this.robot =
0bc0: 20 6d 2e 72 6f 62 6f 74 2e 63 6c 6f 6e 65 28 29 m.robot.clone()
0bd0: 3b 0a 09 09 74 68 69 73 2e 6c 69 66 74 20 3d 20 ;...this.lift =
0be0: 6d 2e 6c 69 66 74 2e 63 6c 6f 6e 65 28 29 3b 0a m.lift.clone();.
0bf0: 09 09 74 68 69 73 2e 77 61 74 65 72 70 72 6f 6f ..this.waterproo
0c00: 66 20 3d 20 6d 2e 77 61 74 65 72 70 72 6f 6f 66 f = m.waterproof
0c10: 3b 0a 09 09 74 68 69 73 2e 74 72 5f 74 61 72 67 ;...this.tr_targ
0c20: 65 74 20 3d 20 63 61 73 74 28 50 6f 73 5b 63 68 et = cast(Pos[ch
0c30: 61 72 5d 29 6d 2e 74 72 5f 74 61 72 67 65 74 3b ar])m.tr_target;
0c40: 0a 09 09 74 68 69 73 2e 74 72 5f 73 6f 75 72 63 ...this.tr_sourc
0c50: 65 20 3d 20 63 61 73 74 28 50 6f 73 5b 5d 5b 63 e = cast(Pos[][c
0c60: 68 61 72 5d 29 6d 2e 74 72 5f 73 6f 75 72 63 65 har])m.tr_source
0c70: 3b 0a 09 09 74 68 69 73 2e 68 69 67 65 20 3d 20 ;...this.hige =
0c80: 6d 2e 68 69 67 65 2e 63 6c 6f 6e 65 28 29 3b 0a m.hige.clone();.
0c90: 09 09 74 68 69 73 2e 72 61 7a 6f 72 20 3d 20 6d ..this.razor = m
0ca0: 2e 72 61 7a 6f 72 3b 0a 09 09 74 68 69 73 2e 63 .razor;...this.c
0cb0: 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 64 61 20 ollected_lambda
0cc0: 3d 20 6d 2e 63 6f 6c 6c 65 63 74 65 64 5f 6c 61 = m.collected_la
0cd0: 6d 62 64 61 3b 0a 09 09 74 68 69 73 2e 74 6f 74 mbda;...this.tot
0ce0: 61 6c 5f 6c 61 6d 62 64 61 20 3d 20 6d 2e 74 6f al_lambda = m.to
0cf0: 74 61 6c 5f 6c 61 6d 62 64 61 3b 0a 09 09 74 68 tal_lambda;...th
0d00: 69 73 2e 6d 61 79 5f 75 70 64 61 74 65 20 3d 20 is.may_update =
0d10: 28 63 61 73 74 28 4d 61 70 29 6d 29 2e 6d 61 79 (cast(Map)m).may
0d20: 5f 75 70 64 61 74 65 2e 64 75 70 3b 0a 09 7d 0a _update.dup;..}.
0d30: 0a 09 74 68 69 73 28 73 74 72 69 6e 67 5b 5d 20 ..this(string[]
0d40: 72 61 77 5f 64 61 74 61 2c 20 73 74 72 69 6e 67 raw_data, string
0d50: 5b 73 74 72 69 6e 67 5d 20 70 61 72 61 6d 73 2c [string] params,
0d60: 20 63 68 61 72 5b 63 68 61 72 5d 20 74 72 61 6d char[char] tram
0d70: 70 6f 29 0a 09 7b 0a 09 09 69 6e 74 20 77 69 64 po)..{...int wid
0d80: 74 68 20 3d 20 30 3b 0a 09 09 66 6f 72 65 61 63 th = 0;...foreac
0d90: 68 28 72 3b 20 72 61 77 5f 64 61 74 61 29 0a 09 h(r; raw_data)..
0da0: 09 09 77 69 64 74 68 20 3d 20 6d 61 78 28 77 69 ..width = max(wi
0db0: 64 74 68 2c 20 72 2e 6c 65 6e 67 74 68 29 3b 0a dth, r.length);.
0dc0: 09 09 66 6f 72 65 61 63 68 28 72 3b 20 72 61 77 ..foreach(r; raw
0dd0: 5f 64 61 74 61 29 20 7b 0a 09 09 09 74 68 69 73 _data) {....this
0de0: 2e 64 61 74 61 20 7e 3d 20 72 2e 64 75 70 3b 0a .data ~= r.dup;.
0df0: 09 09 09 74 68 69 73 2e 64 61 74 61 5b 24 2d 31 ...this.data[$-1
0e00: 5d 2e 6c 65 6e 67 74 68 20 3d 20 77 69 64 74 68 ].length = width
0e10: 3b 0a 09 09 09 74 68 69 73 2e 64 61 74 61 5b 24 ;....this.data[$
0e20: 2d 31 5d 5b 72 2e 6c 65 6e 67 74 68 2e 2e 24 5d -1][r.length..$]
0e30: 20 3d 20 27 20 27 3b 0a 09 09 7d 0a 0a 09 09 66 = ' ';...}....f
0e40: 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d 48 or(int y=1; y<=H
0e50: 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e 74 ; ++y)...for(int
0e60: 20 78 3d 31 3b 20 78 3c 3d 57 3b 20 2b 2b 78 29 x=1; x<=W; ++x)
0e70: 20 7b 0a 09 09 09 69 66 28 74 68 69 73 5b 79 2c {....if(this[y,
0e80: 78 5d 20 3d 3d 20 27 52 27 29 0a 09 09 09 09 74 x] == 'R').....t
0e90: 68 69 73 2e 72 6f 62 6f 74 20 3d 20 6e 65 77 20 his.robot = new
0ea0: 50 6f 73 28 79 2c 78 29 3b 0a 09 09 09 69 66 28 Pos(y,x);....if(
0eb0: 74 68 69 73 5b 79 2c 78 5d 20 3d 3d 20 27 4c 27 this[y,x] == 'L'
0ec0: 20 7c 7c 20 74 68 69 73 5b 79 2c 78 5d 20 3d 3d || this[y,x] ==
0ed0: 20 27 4f 27 29 0a 09 09 09 09 74 68 69 73 2e 6c 'O').....this.l
0ee0: 69 66 74 20 3d 20 6e 65 77 20 50 6f 73 28 79 2c ift = new Pos(y,
0ef0: 78 29 3b 0a 09 09 09 69 66 28 74 68 69 73 5b 79 x);....if(this[y
0f00: 2c 78 5d 20 3d 3d 20 27 5c 5c 27 20 7c 7c 20 74 ,x] == '\\' || t
0f10: 68 69 73 5b 79 2c 78 5d 20 3d 3d 20 27 40 27 29 his[y,x] == '@')
0f20: 0a 09 09 09 09 74 6f 74 61 6c 5f 6c 61 6d 62 64 .....total_lambd
0f30: 61 2b 2b 3b 0a 09 09 09 69 66 28 74 68 69 73 5b a++;....if(this[
0f40: 79 2c 78 5d 20 3d 3d 20 27 2a 27 20 7c 7c 20 74 y,x] == '*' || t
0f50: 68 69 73 5b 79 2c 78 5d 20 3d 3d 20 27 40 27 29 his[y,x] == '@')
0f60: 0a 09 09 09 09 6d 61 79 5f 75 70 64 61 74 65 20 .....may_update
0f70: 7e 3d 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 3b ~= new Pos(y,x);
0f80: 0a 09 09 7d 0a 0a 09 09 50 6f 73 5b 63 68 61 72 ...}....Pos[char
0f90: 5d 20 74 72 5f 70 6f 73 3b 0a 09 09 66 6f 72 28 ] tr_pos;...for(
0fa0: 69 6e 74 20 79 3d 31 3b 20 79 3c 3d 48 3b 20 2b int y=1; y<=H; +
0fb0: 2b 79 29 0a 09 09 66 6f 72 28 69 6e 74 20 78 3d +y)...for(int x=
0fc0: 31 3b 20 78 3c 3d 57 3b 20 2b 2b 78 29 20 7b 0a 1; x<=W; ++x) {.
0fd0: 09 09 09 63 68 61 72 20 63 20 3d 20 74 68 69 73 ...char c = this
0fe0: 5b 79 2c 78 5d 3b 0a 09 09 09 69 66 28 27 31 27 [y,x];....if('1'
0ff0: 3c 3d 63 20 26 26 20 63 3c 3d 27 39 27 20 7c 7c <=c && c<='9' ||
1000: 20 27 41 27 3c 3d 63 26 26 63 3c 3d 27 49 27 29 'A'<=c&&c<='I')
1010: 0a 09 09 09 09 74 72 5f 70 6f 73 5b 63 5d 20 3d .....tr_pos[c] =
1020: 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 3b 0a 09 new Pos(y,x);..
1030: 09 7d 0a 0a 09 09 74 68 69 73 2e 77 61 74 65 72 .}....this.water
1040: 70 72 6f 6f 66 20 3d 20 70 61 72 61 6d 73 2e 67 proof = params.g
1050: 65 74 28 22 57 61 74 65 72 70 72 6f 6f 66 22 2c et("Waterproof",
1060: 20 22 35 22 29 2e 74 6f 21 69 6e 74 28 29 3b 0a "5").to!int();.
1070: 09 09 66 6f 72 65 61 63 68 28 66 72 2c 74 6f 3b ..foreach(fr,to;
1080: 20 74 72 61 6d 70 6f 29 20 7b 0a 09 09 09 74 72 trampo) {....tr
1090: 5f 74 61 72 67 65 74 5b 66 72 5d 20 3d 20 74 72 _target[fr] = tr
10a0: 5f 70 6f 73 5b 74 6f 5d 3b 0a 09 09 09 69 66 28 _pos[to];....if(
10b0: 74 6f 20 21 69 6e 20 74 72 5f 73 6f 75 72 63 65 to !in tr_source
10c0: 29 20 74 72 5f 73 6f 75 72 63 65 5b 74 6f 5d 20 ) tr_source[to]
10d0: 3d 20 5b 5d 3b 0a 09 09 09 74 72 5f 73 6f 75 72 = [];....tr_sour
10e0: 63 65 5b 74 6f 5d 20 7e 3d 20 74 72 5f 70 6f 73 ce[to] ~= tr_pos
10f0: 5b 66 72 5d 3b 0a 09 09 7d 0a 0a 09 09 74 68 69 [fr];...}....thi
1100: 73 2e 68 69 67 65 20 3d 20 48 69 67 65 2e 6c 6f s.hige = Hige.lo
1110: 61 64 28 70 61 72 61 6d 73 29 3b 0a 09 09 74 68 ad(params);...th
1120: 69 73 2e 72 61 7a 6f 72 20 3d 20 70 61 72 61 6d is.razor = param
1130: 73 2e 67 65 74 28 22 52 61 7a 6f 72 73 22 2c 20 s.get("Razors",
1140: 22 30 22 29 2e 74 6f 21 69 6e 74 28 29 3b 0a 09 "0").to!int();..
1150: 7d 0a 0a 09 63 6f 6e 73 74 20 40 70 72 6f 70 65 }...const @prope
1160: 72 74 79 20 7b 0a 09 09 69 6e 74 20 48 28 29 20 rty {...int H()
1170: 7b 20 72 65 74 75 72 6e 20 64 61 74 61 2e 6c 65 { return data.le
1180: 6e 67 74 68 3b 20 7d 0a 09 09 69 6e 74 20 57 28 ngth; }...int W(
1190: 29 20 7b 20 72 65 74 75 72 6e 20 64 61 74 61 5b ) { return data[
11a0: 30 5d 2e 6c 65 6e 67 74 68 3b 20 7d 0a 09 7d 0a 0].length; }..}.
11b0: 0a 09 63 6f 6e 73 74 20 7b 0a 09 09 63 68 61 72 ..const {...char
11c0: 20 6f 70 49 6e 64 65 78 28 69 6e 74 20 79 2c 20 opIndex(int y,
11d0: 69 6e 74 20 78 29 0a 09 09 7b 0a 09 09 09 2f 2f int x)...{....//
11e0: 20 41 64 6a 75 73 74 20 63 6f 6f 72 64 69 6e 61 Adjust coordina
11f0: 74 65 20 74 6f 20 74 68 65 20 73 70 65 63 2e 20 te to the spec.
1200: 62 6f 74 74 6f 6d 2d 6c 65 66 74 20 69 73 20 28 bottom-left is (
1210: 31 2c 31 29 2e 0a 09 09 09 2d 2d 79 2c 20 2d 2d 1,1).....--y, --
1220: 78 3b 0a 09 09 09 69 66 28 79 3c 30 7c 7c 48 3c x;....if(y<0||H<
1230: 3d 79 7c 7c 78 3c 30 7c 7c 57 3c 3d 78 29 0a 09 =y||x<0||W<=x)..
1240: 09 09 09 72 65 74 75 72 6e 20 27 23 27 3b 0a 09 ...return '#';..
1250: 09 09 72 65 74 75 72 6e 20 64 61 74 61 5b 48 2d ..return data[H-
1260: 31 2d 79 5d 5b 78 5d 3b 0a 09 09 7d 0a 0a 09 09 1-y][x];...}....
1270: 63 68 61 72 20 6f 70 49 6e 64 65 78 28 69 6e 20 char opIndex(in
1280: 50 6f 73 20 70 29 0a 09 09 7b 0a 09 09 09 72 65 Pos p)...{....re
1290: 74 75 72 6e 20 74 68 69 73 5b 70 2e 79 2c 20 70 turn this[p.y, p
12a0: 2e 78 5d 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 76 6f .x];...}..}...vo
12b0: 69 64 20 6f 70 49 6e 64 65 78 41 73 73 69 67 6e id opIndexAssign
12c0: 28 63 68 61 72 20 63 2c 20 69 6e 74 20 79 2c 20 (char c, int y,
12d0: 69 6e 74 20 78 29 0a 09 7b 0a 09 09 2f 2f 20 41 int x)..{...// A
12e0: 64 6a 75 73 74 20 63 6f 6f 72 64 69 6e 61 74 65 djust coordinate
12f0: 20 74 6f 20 74 68 65 20 73 70 65 63 2e 20 62 6f to the spec. bo
1300: 74 74 6f 6d 2d 6c 65 66 74 20 69 73 20 28 31 2c ttom-left is (1,
1310: 31 29 2e 0a 09 09 2d 2d 79 2c 20 2d 2d 78 3b 0a 1)....--y, --x;.
1320: 09 09 69 66 28 79 3c 30 7c 7c 48 3c 3d 79 7c 7c ..if(y<0||H<=y||
1330: 78 3c 30 7c 7c 57 3c 3d 78 29 0a 09 09 09 72 65 x<0||W<=x)....re
1340: 74 75 72 6e 3b 0a 09 09 64 61 74 61 5b 48 2d 31 turn;...data[H-1
1350: 2d 79 5d 5b 78 5d 20 3d 20 63 3b 0a 09 7d 0a 0a -y][x] = c;..}..
1360: 09 76 6f 69 64 20 6f 70 49 6e 64 65 78 41 73 73 .void opIndexAss
1370: 69 67 6e 28 63 68 61 72 20 63 2c 20 69 6e 20 50 ign(char c, in P
1380: 6f 73 20 70 29 0a 09 7b 0a 09 09 74 68 69 73 5b os p)..{...this[
1390: 70 2e 79 2c 20 70 2e 78 5d 20 3d 20 63 3b 0a 09 p.y, p.x] = c;..
13a0: 7d 0a 0a 09 50 6f 73 5b 5d 20 6f 62 6a 65 63 74 }...Pos[] object
13b0: 73 28 63 68 61 72 20 63 29 20 63 6f 6e 73 74 20 s(char c) const
13c0: 7b 0a 09 09 50 6f 73 5b 5d 20 61 6e 73 3b 0a 09 {...Pos[] ans;..
13d0: 09 66 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c .for(int y=1; y<
13e0: 3d 48 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 =H; ++y)...for(i
13f0: 6e 74 20 78 3d 31 3b 20 78 3c 3d 57 3b 20 2b 2b nt x=1; x<=W; ++
1400: 78 29 0a 09 09 09 69 66 28 74 68 69 73 5b 79 2c x)....if(this[y,
1410: 78 5d 20 3d 3d 20 63 29 0a 09 09 09 09 61 6e 73 x] == c).....ans
1420: 20 7e 3d 20 6e 65 77 20 50 6f 73 28 79 2c 78 29 ~= new Pos(y,x)
1430: 3b 0a 09 09 72 65 74 75 72 6e 20 61 6e 73 3b 0a ;...return ans;.
1440: 09 7d 0a 0a 09 50 6f 73 5b 5d 20 72 61 7a 6f 72 .}...Pos[] razor
1450: 73 28 29 20 63 6f 6e 73 74 20 7b 20 72 65 74 75 s() const { retu
1460: 72 6e 20 6f 62 6a 65 63 74 73 28 27 21 27 29 3b rn objects('!');
1470: 20 7d 0a 09 50 6f 73 5b 5d 20 6c 61 6d 62 64 61 }..Pos[] lambda
1480: 73 28 29 20 63 6f 6e 73 74 20 7b 20 72 65 74 75 s() const { retu
1490: 72 6e 20 6f 62 6a 65 63 74 73 28 27 5c 5c 27 29 rn objects('\\')
14a0: 3b 20 7d 0a 0a 09 62 6f 6f 6c 20 63 6c 65 61 72 ; }...bool clear
14b0: 65 64 28 29 20 63 6f 6e 73 74 0a 09 7b 0a 09 09 ed() const..{...
14c0: 66 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d for(int y=1; y<=
14d0: 48 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e H; ++y)...for(in
14e0: 74 20 78 3d 31 3b 20 78 3c 3d 57 3b 20 2b 2b 78 t x=1; x<=W; ++x
14f0: 29 0a 09 09 09 69 66 28 74 68 69 73 5b 79 2c 78 )....if(this[y,x
1500: 5d 20 3d 3d 20 27 4c 27 20 7c 7c 20 74 68 69 73 ] == 'L' || this
1510: 5b 79 2c 78 5d 20 3d 3d 20 27 4f 27 29 0a 09 09 [y,x] == 'O')...
1520: 09 09 72 65 74 75 72 6e 20 66 61 6c 73 65 3b 0a ..return false;.
1530: 09 09 72 65 74 75 72 6e 20 74 72 75 65 3b 0a 09 ..return true;..
1540: 7d 0a 09 0a 09 62 6f 6f 6c 20 63 6f 6d 6d 61 6e }....bool comman
1550: 64 28 63 68 61 72 20 63 2c 20 69 6e 74 20 74 75 d(char c, int tu
1560: 72 6e 29 0a 09 7b 0a 09 09 61 73 73 65 72 74 28 rn)..{...assert(
1570: 20 74 68 69 73 5b 72 6f 62 6f 74 5d 20 3d 3d 20 this[robot] ==
1580: 27 52 27 20 29 3b 0a 09 09 69 66 28 63 3d 3d 27 'R' );...if(c=='
1590: 52 27 29 20 72 65 74 75 72 6e 20 6d 6f 76 65 28 R') return move(
15a0: 20 30 2c 20 2b 31 2c 20 74 75 72 6e 29 3b 0a 09 0, +1, turn);..
15b0: 09 69 66 28 63 3d 3d 27 4c 27 29 20 72 65 74 75 .if(c=='L') retu
15c0: 72 6e 20 6d 6f 76 65 28 20 30 2c 20 2d 31 2c 20 rn move( 0, -1,
15d0: 74 75 72 6e 29 3b 0a 09 09 69 66 28 63 3d 3d 27 turn);...if(c=='
15e0: 55 27 29 20 72 65 74 75 72 6e 20 6d 6f 76 65 28 U') return move(
15f0: 2b 31 2c 20 20 30 2c 20 74 75 72 6e 29 3b 0a 09 +1, 0, turn);..
1600: 09 69 66 28 63 3d 3d 27 44 27 29 20 72 65 74 75 .if(c=='D') retu
1610: 72 6e 20 6d 6f 76 65 28 2d 31 2c 20 20 30 2c 20 rn move(-1, 0,
1620: 74 75 72 6e 29 3b 0a 09 09 69 66 28 63 3d 3d 27 turn);...if(c=='
1630: 57 27 29 20 72 65 74 75 72 6e 20 6d 6f 76 65 28 W') return move(
1640: 20 30 2c 20 20 30 2c 20 74 75 72 6e 29 3b 0a 09 0, 0, turn);..
1650: 09 69 66 28 63 3d 3d 27 53 27 29 20 72 65 74 75 .if(c=='S') retu
1660: 72 6e 20 75 73 65 5f 72 61 7a 6f 72 28 74 75 72 rn use_razor(tur
1670: 6e 29 3b 0a 09 09 61 73 73 65 72 74 28 66 61 6c n);...assert(fal
1680: 73 65 29 3b 0a 09 7d 0a 0a 09 62 6f 6f 6c 20 75 se);..}...bool u
1690: 73 65 5f 72 61 7a 6f 72 28 69 6e 74 20 74 75 72 se_razor(int tur
16a0: 6e 29 0a 09 7b 0a 09 09 69 66 28 72 61 7a 6f 72 n)..{...if(razor
16b0: 29 20 7b 0a 09 09 09 72 61 7a 6f 72 2d 2d 3b 0a ) {....razor--;.
16c0: 09 09 09 66 6f 72 28 69 6e 74 20 64 79 3d 2d 31 ...for(int dy=-1
16d0: 3b 20 64 79 3c 3d 2b 31 3b 20 2b 2b 64 79 29 0a ; dy<=+1; ++dy).
16e0: 09 09 09 66 6f 72 28 69 6e 74 20 64 78 3d 2d 31 ...for(int dx=-1
16f0: 3b 20 64 78 3c 3d 2b 31 3b 20 2b 2b 64 78 29 0a ; dx<=+1; ++dx).
1700: 09 09 09 09 69 66 28 74 68 69 73 5b 72 6f 62 6f ....if(this[robo
1710: 74 2e 79 2b 64 79 2c 72 6f 62 6f 74 2e 78 2b 64 t.y+dy,robot.x+d
1720: 78 5d 20 3d 3d 20 27 57 27 29 0a 09 09 09 09 09 x] == 'W')......
1730: 74 68 69 73 5b 72 6f 62 6f 74 2e 79 2b 64 79 2c this[robot.y+dy,
1740: 72 6f 62 6f 74 2e 78 2b 64 78 5d 20 3d 20 27 20 robot.x+dx] = '
1750: 27 3b 0a 09 09 7d 0a 0a 09 09 72 65 74 75 72 6e ';...}....return
1760: 20 75 70 64 61 74 65 28 74 75 72 6e 29 3b 0a 09 update(turn);..
1770: 7d 0a 0a 09 62 6f 6f 6c 20 72 6f 63 6b 79 28 63 }...bool rocky(c
1780: 68 61 72 20 63 29 20 7b 20 72 65 74 75 72 6e 20 har c) { return
1790: 63 3d 3d 27 2a 27 20 7c 7c 20 63 3d 3d 27 40 27 c=='*' || c=='@'
17a0: 3b 20 7d 0a 09 50 6f 73 5b 5d 20 6d 61 79 5f 75 ; }..Pos[] may_u
17b0: 70 64 61 74 65 3b 0a 09 09 76 6f 69 64 20 65 6d pdate;...void em
17c0: 70 74 69 66 69 65 64 28 50 6f 73 20 70 29 20 7b ptified(Pos p) {
17d0: 0a 09 09 09 66 6f 72 28 69 6e 74 20 64 79 3d 30 ....for(int dy=0
17e0: 3b 20 64 79 3c 3d 2b 31 3b 20 2b 2b 64 79 29 0a ; dy<=+1; ++dy).
17f0: 09 09 09 66 6f 72 28 69 6e 74 20 64 78 3d 2d 31 ...for(int dx=-1
1800: 3b 20 64 78 3c 3d 2b 31 3b 20 2b 2b 64 78 29 0a ; dx<=+1; ++dx).
1810: 09 09 09 09 6d 61 79 5f 75 70 64 61 74 65 20 7e ....may_update ~
1820: 3d 20 6e 65 77 20 50 6f 73 28 70 2e 79 2b 64 79 = new Pos(p.y+dy
1830: 2c 20 70 2e 78 2b 64 78 29 3b 0a 09 09 7d 0a 0a , p.x+dx);...}..
1840: 09 62 6f 6f 6c 20 6d 6f 76 65 28 69 6e 74 20 64 .bool move(int d
1850: 79 2c 20 69 6e 74 20 64 78 2c 20 69 6e 74 20 74 y, int dx, int t
1860: 75 72 6e 29 0a 09 7b 0a 0a 09 09 65 6d 70 74 69 urn)..{....empti
1870: 66 69 65 64 28 72 6f 62 6f 74 29 3b 0a 0a 09 09 fied(robot);....
1880: 69 6e 74 20 79 20 3d 20 72 6f 62 6f 74 2e 79 3b int y = robot.y;
1890: 0a 09 09 69 6e 74 20 78 20 3d 20 72 6f 62 6f 74 ...int x = robot
18a0: 2e 78 3b 0a 09 09 69 66 28 20 27 5c 5c 27 20 3d .x;...if( '\\' =
18b0: 3d 20 74 68 69 73 5b 79 2b 64 79 2c 78 2b 64 78 = this[y+dy,x+dx
18c0: 5d 20 29 0a 09 09 09 63 6f 6c 6c 65 63 74 65 64 ] )....collected
18d0: 5f 6c 61 6d 62 64 61 2b 2b 3b 0a 09 09 69 66 28 _lambda++;...if(
18e0: 20 27 21 27 20 3d 3d 20 74 68 69 73 5b 79 2b 64 '!' == this[y+d
18f0: 79 2c 78 2b 64 78 5d 20 29 0a 09 09 09 72 61 7a y,x+dx] )....raz
1900: 6f 72 2b 2b 3b 0a 09 09 69 66 28 20 22 20 5c 5c or++;...if( " \\
1910: 21 2e 4f 22 2e 63 6f 75 6e 74 28 74 68 69 73 5b !.O".count(this[
1920: 79 2b 64 79 2c 78 2b 64 78 5d 29 3d 3d 31 20 29 y+dy,x+dx])==1 )
1930: 20 7b 0a 09 09 09 74 68 69 73 5b 79 2c 78 5d 3d {....this[y,x]=
1940: 27 20 27 3b 0a 09 09 09 74 68 69 73 5b 79 2b 64 ' ';....this[y+d
1950: 79 2c 78 2b 64 78 5d 3d 27 52 27 3b 0a 09 09 09 y,x+dx]='R';....
1960: 72 6f 62 6f 74 20 3d 20 6e 65 77 20 50 6f 73 28 robot = new Pos(
1970: 79 2b 64 79 2c 78 2b 64 78 29 3b 0a 09 09 7d 20 y+dy,x+dx);...}
1980: 65 6c 73 65 20 69 66 28 64 79 3d 3d 30 20 26 26 else if(dy==0 &&
1990: 20 72 6f 63 6b 79 28 74 68 69 73 5b 79 2b 64 79 rocky(this[y+dy
19a0: 2c 78 2b 64 78 5d 29 20 26 26 20 27 20 27 3d 3d ,x+dx]) && ' '==
19b0: 74 68 69 73 5b 79 2b 64 79 2a 32 2c 78 2b 64 78 this[y+dy*2,x+dx
19c0: 2a 32 5d 29 20 7b 0a 09 09 09 63 68 61 72 20 72 *2]) {....char r
19d0: 6f 63 6b 20 3d 20 74 68 69 73 5b 79 2b 64 79 2c ock = this[y+dy,
19e0: 78 2b 64 78 5d 3b 0a 09 09 09 74 68 69 73 5b 79 x+dx];....this[y
19f0: 2c 78 5d 3d 27 20 27 3b 0a 09 09 09 74 68 69 73 ,x]=' ';....this
1a00: 5b 79 2b 64 79 2c 78 2b 64 78 5d 3d 27 52 27 3b [y+dy,x+dx]='R';
1a10: 0a 09 09 09 74 68 69 73 5b 79 2b 64 79 2a 32 2c ....this[y+dy*2,
1a20: 78 2b 64 78 2a 32 5d 3d 72 6f 63 6b 3b 0a 09 09 x+dx*2]=rock;...
1a30: 09 72 6f 62 6f 74 20 3d 20 6e 65 77 20 50 6f 73 .robot = new Pos
1a40: 28 79 2b 64 79 2c 78 2b 64 78 29 3b 0a 09 09 7d (y+dy,x+dx);...}
1a50: 20 65 6c 73 65 20 69 66 28 27 41 27 3c 3d 74 68 else if('A'<=th
1a60: 69 73 5b 79 2b 64 79 2c 78 2b 64 78 5d 20 26 26 is[y+dy,x+dx] &&
1a70: 20 74 68 69 73 5b 79 2b 64 79 2c 78 2b 64 78 5d this[y+dy,x+dx]
1a80: 3c 3d 27 49 27 29 20 7b 0a 09 09 09 74 68 69 73 <='I') {....this
1a90: 5b 79 2c 78 5d 3d 27 20 27 3b 0a 09 09 09 50 6f [y,x]=' ';....Po
1aa0: 73 20 74 70 20 3d 20 74 72 5f 74 61 72 67 65 74 s tp = tr_target
1ab0: 5b 74 68 69 73 5b 79 2b 64 79 2c 78 2b 64 78 5d [this[y+dy,x+dx]
1ac0: 5d 3b 0a 09 09 09 66 6f 72 65 61 63 68 28 70 3b ];....foreach(p;
1ad0: 20 74 72 5f 73 6f 75 72 63 65 5b 74 68 69 73 5b tr_source[this[
1ae0: 74 70 5d 5d 29 20 7b 0a 09 09 09 09 65 6d 70 74 tp]]) {.....empt
1af0: 69 66 69 65 64 28 70 29 3b 0a 09 09 09 09 74 68 ified(p);.....th
1b00: 69 73 5b 70 5d 20 3d 20 27 20 27 3b 0a 09 09 09 is[p] = ' ';....
1b10: 7d 0a 09 09 09 74 68 69 73 5b 74 70 5d 20 3d 20 }....this[tp] =
1b20: 27 52 27 3b 0a 09 09 09 72 6f 62 6f 74 20 3d 20 'R';....robot =
1b30: 74 70 3b 0a 09 09 7d 0a 09 09 72 65 74 75 72 6e tp;...}...return
1b40: 20 75 70 64 61 74 65 28 74 75 72 6e 29 3b 0a 09 update(turn);..
1b50: 7d 0a 0a 09 62 6f 6f 6c 20 75 70 64 61 74 65 28 }...bool update(
1b60: 69 6e 74 20 74 75 72 6e 29 0a 09 7b 0a 09 09 2f int turn)..{.../
1b70: 2f 20 57 72 69 74 65 20 61 66 74 65 72 20 61 6c / Write after al
1b80: 6c 20 74 68 65 20 75 70 64 61 74 65 73 20 61 72 l the updates ar
1b90: 65 20 70 72 6f 63 65 73 73 65 64 2e 0a 09 09 54 e processed....T
1ba0: 75 70 6c 65 21 28 69 6e 74 2c 69 6e 74 2c 63 68 uple!(int,int,ch
1bb0: 61 72 29 5b 5d 20 77 72 69 74 65 5f 62 75 66 66 ar)[] write_buff
1bc0: 65 72 3b 0a 09 09 76 6f 69 64 20 77 72 69 74 65 er;...void write
1bd0: 28 69 6e 74 20 79 2c 20 69 6e 74 20 78 2c 20 63 (int y, int x, c
1be0: 68 61 72 20 63 29 20 7b 20 77 72 69 74 65 5f 62 har c) { write_b
1bf0: 75 66 66 65 72 20 7e 3d 20 74 75 70 6c 65 28 79 uffer ~= tuple(y
1c00: 2c 78 2c 63 29 3b 20 7d 0a 09 09 76 6f 69 64 20 ,x,c); }...void
1c10: 77 72 69 74 65 70 28 50 6f 73 20 70 2c 20 63 68 writep(Pos p, ch
1c20: 61 72 20 63 29 20 7b 20 77 72 69 74 65 5f 62 75 ar c) { write_bu
1c30: 66 66 65 72 20 7e 3d 20 74 75 70 6c 65 28 30 2b ffer ~= tuple(0+
1c40: 70 2e 79 2c 30 2b 70 2e 78 2c 63 29 3b 20 7d 0a p.y,0+p.x,c); }.
1c50: 09 09 73 63 6f 70 65 28 65 78 69 74 29 20 7b 0a ..scope(exit) {.
1c60: 09 09 09 6d 61 79 5f 75 70 64 61 74 65 2e 6c 65 ...may_update.le
1c70: 6e 67 74 68 20 3d 20 30 3b 0a 09 09 09 66 6f 72 ngth = 0;....for
1c80: 65 61 63 68 28 77 72 3b 20 77 72 69 74 65 5f 62 each(wr; write_b
1c90: 75 66 66 65 72 29 20 7b 0a 09 09 09 09 74 68 69 uffer) {.....thi
1ca0: 73 5b 77 72 5b 30 5d 2c 77 72 5b 31 5d 5d 20 3d s[wr[0],wr[1]] =
1cb0: 20 77 72 5b 32 5d 3b 0a 09 09 09 09 69 66 28 72 wr[2];.....if(r
1cc0: 6f 63 6b 79 28 77 72 5b 32 5d 29 29 0a 09 09 09 ocky(wr[2]))....
1cd0: 09 09 6d 61 79 5f 75 70 64 61 74 65 20 7e 3d 20 ..may_update ~=
1ce0: 6e 65 77 20 50 6f 73 28 77 72 5b 30 5d 2c 77 72 new Pos(wr[0],wr
1cf0: 5b 31 5d 29 3b 0a 09 09 09 09 69 66 28 77 72 5b [1]);.....if(wr[
1d00: 32 5d 3d 3d 27 20 27 29 0a 09 09 09 09 09 65 6d 2]==' ')......em
1d10: 70 74 69 66 69 65 64 28 6e 65 77 20 50 6f 73 28 ptified(new Pos(
1d20: 77 72 5b 30 5d 2c 20 77 72 5b 31 5d 29 29 3b 0a wr[0], wr[1]));.
1d30: 09 09 09 7d 0a 09 09 7d 0a 0a 09 09 69 66 28 63 ...}...}....if(c
1d40: 6f 6c 6c 65 63 74 65 64 5f 6c 61 6d 62 64 61 20 ollected_lambda
1d50: 3d 3d 20 74 6f 74 61 6c 5f 6c 61 6d 62 64 61 29 == total_lambda)
1d60: 0a 09 09 09 69 66 28 74 68 69 73 5b 6c 69 66 74 ....if(this[lift
1d70: 5d 3d 3d 27 4c 27 29 0a 09 09 09 09 74 68 69 73 ]=='L').....this
1d80: 5b 6c 69 66 74 5d 20 3d 20 27 4f 27 3b 0a 0a 09 [lift] = 'O';...
1d90: 09 62 6f 6f 6c 20 64 65 61 64 20 3d 20 66 61 6c .bool dead = fal
1da0: 73 65 3b 0a 09 09 73 6f 72 74 28 6d 61 79 5f 75 se;...sort(may_u
1db0: 70 64 61 74 65 29 3b 0a 09 09 66 6f 72 65 61 63 pdate);...foreac
1dc0: 68 28 70 3b 20 6d 61 79 5f 75 70 64 61 74 65 29 h(p; may_update)
1dd0: 20 7b 0a 09 09 09 69 6e 74 20 79 20 3d 20 70 2e {....int y = p.
1de0: 79 2c 20 78 20 3d 20 70 2e 78 3b 0a 09 09 09 63 y, x = p.x;....c
1df0: 68 61 72 20 72 6f 63 6b 20 3d 20 74 68 69 73 5b har rock = this[
1e00: 70 5d 3b 0a 09 09 09 69 66 28 72 6f 63 6b 79 28 p];....if(rocky(
1e10: 74 68 69 73 5b 70 5d 29 29 20 7b 0a 09 09 09 09 this[p])) {.....
1e20: 69 66 28 74 68 69 73 5b 70 2e 44 5d 3d 3d 27 20 if(this[p.D]=='
1e30: 27 29 20 7b 0a 09 09 09 09 09 77 72 69 74 65 70 ') {......writep
1e40: 28 70 2c 20 27 20 27 29 3b 0a 09 09 09 09 09 77 (p, ' ');......w
1e50: 72 69 74 65 70 28 70 2e 44 2c 20 28 72 6f 63 6b ritep(p.D, (rock
1e60: 3d 3d 27 40 27 26 26 74 68 69 73 5b 70 2e 44 2e =='@'&&this[p.D.
1e70: 44 5d 21 3d 27 20 27 20 3f 20 27 5c 5c 27 20 3a D]!=' ' ? '\\' :
1e80: 20 72 6f 63 6b 29 29 3b 0a 09 09 09 09 09 69 66 rock));......if
1e90: 28 72 6f 62 6f 74 20 3d 3d 20 70 2e 44 2e 44 29 (robot == p.D.D)
1ea0: 0a 09 09 09 09 09 09 64 65 61 64 3d 74 72 75 65 .......dead=true
1eb0: 3b 0a 09 09 09 09 7d 0a 09 09 09 09 65 6c 73 65 ;.....}.....else
1ec0: 20 69 66 28 28 72 6f 63 6b 79 28 74 68 69 73 5b if((rocky(this[
1ed0: 70 2e 44 5d 29 20 7c 7c 20 74 68 69 73 5b 70 2e p.D]) || this[p.
1ee0: 44 5d 3d 3d 27 5c 5c 27 29 20 26 26 20 74 68 69 D]=='\\') && thi
1ef0: 73 5b 70 2e 52 5d 3d 3d 27 20 27 20 26 26 20 74 s[p.R]==' ' && t
1f00: 68 69 73 5b 70 2e 52 2e 44 5d 3d 3d 27 20 27 29 his[p.R.D]==' ')
1f10: 20 7b 0a 09 09 09 09 09 77 72 69 74 65 70 28 70 {......writep(p
1f20: 2c 20 27 20 27 29 3b 0a 09 09 09 09 09 77 72 69 , ' ');......wri
1f30: 74 65 70 28 70 2e 52 2e 44 2c 28 72 6f 63 6b 3d tep(p.R.D,(rock=
1f40: 3d 27 40 27 26 26 74 68 69 73 5b 70 2e 52 2e 44 ='@'&&this[p.R.D
1f50: 2e 44 5d 21 3d 27 20 27 20 3f 20 27 5c 5c 27 20 .D]!=' ' ? '\\'
1f60: 3a 20 72 6f 63 6b 29 29 3b 0a 09 09 09 09 09 69 : rock));......i
1f70: 66 28 72 6f 62 6f 74 20 3d 3d 20 70 2e 52 2e 44 f(robot == p.R.D
1f80: 2e 44 29 0a 09 09 09 09 09 09 64 65 61 64 3d 74 .D).......dead=t
1f90: 72 75 65 3b 0a 09 09 09 09 7d 0a 09 09 09 09 65 rue;.....}.....e
1fa0: 6c 73 65 20 69 66 28 72 6f 63 6b 79 28 74 68 69 lse if(rocky(thi
1fb0: 73 5b 70 2e 44 5d 29 20 26 26 20 74 68 69 73 5b s[p.D]) && this[
1fc0: 70 2e 4c 5d 3d 3d 27 20 27 20 26 26 20 74 68 69 p.L]==' ' && thi
1fd0: 73 5b 70 2e 4c 2e 44 5d 3d 3d 27 20 27 29 20 7b s[p.L.D]==' ') {
1fe0: 0a 09 09 09 09 09 77 72 69 74 65 70 28 70 2c 20 ......writep(p,
1ff0: 27 20 27 29 3b 0a 09 09 09 09 09 77 72 69 74 65 ' ');......write
2000: 70 28 70 2e 4c 2e 44 2c 20 28 72 6f 63 6b 3d 3d p(p.L.D, (rock==
2010: 27 40 27 26 26 74 68 69 73 5b 70 2e 4c 2e 44 2e '@'&&this[p.L.D.
2020: 44 5d 21 3d 27 20 27 20 3f 20 27 5c 5c 27 20 3a D]!=' ' ? '\\' :
2030: 20 72 6f 63 6b 29 29 3b 0a 09 09 09 09 09 69 66 rock));......if
2040: 28 72 6f 62 6f 74 20 3d 3d 20 70 2e 4c 2e 44 2e (robot == p.L.D.
2050: 44 29 0a 09 09 09 09 09 09 64 65 61 64 3d 74 72 D).......dead=tr
2060: 75 65 3b 0a 09 09 09 09 7d 0a 09 09 09 7d 0a 09 ue;.....}....}..
2070: 09 09 65 6c 73 65 20 69 66 28 74 68 69 73 5b 70 ..else if(this[p
2080: 5d 3d 3d 27 57 27 29 20 7b 0a 09 09 09 09 69 66 ]=='W') {.....if
2090: 28 20 68 69 67 65 2e 69 73 5f 67 72 6f 77 69 6e ( hige.is_growin
20a0: 67 5f 74 75 72 6e 28 74 75 72 6e 29 20 29 0a 09 g_turn(turn) )..
20b0: 09 09 09 09 66 6f 72 28 69 6e 74 20 64 79 3d 2d ....for(int dy=-
20c0: 31 3b 20 64 79 3c 3d 2b 31 3b 20 2b 2b 64 79 29 1; dy<=+1; ++dy)
20d0: 0a 09 09 09 09 09 66 6f 72 28 69 6e 74 20 64 78 ......for(int dx
20e0: 3d 2d 31 3b 20 64 78 3c 3d 2b 31 3b 20 2b 2b 64 =-1; dx<=+1; ++d
20f0: 78 29 0a 09 09 09 09 09 09 69 66 28 74 68 69 73 x).......if(this
2100: 5b 70 2e 79 2b 64 79 2c 70 2e 78 2b 64 78 5d 20 [p.y+dy,p.x+dx]
2110: 3d 3d 20 27 20 27 29 0a 09 09 09 09 09 09 09 77 == ' ')........w
2120: 72 69 74 65 28 70 2e 79 2b 64 79 2c 70 2e 78 2b rite(p.y+dy,p.x+
2130: 64 78 2c 27 57 27 29 3b 0a 09 09 09 7d 0a 09 09 dx,'W');....}...
2140: 7d 0a 09 09 72 65 74 75 72 6e 20 64 65 61 64 3b }...return dead;
2150: 0a 09 7d 0a 7d 0a 0a 2f 2f 2f 2f 2f 2f 2f 2f 2f ..}.}../////////
2160: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
2170: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
2180: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
2190: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f ////////////////
21a0: 2f 2f 2f 2f 2f 2f 2f 0a 0a 63 6c 61 73 73 20 47 ///////..class G
21b0: 61 6d 65 0a 7b 0a 09 6d 69 78 69 6e 20 44 65 72 ame.{..mixin Der
21c0: 69 76 65 53 68 6f 77 3b 0a 0a 09 73 74 61 74 69 iveShow;...stati
21d0: 63 20 47 61 6d 65 20 6c 6f 61 64 28 46 69 6c 65 c Game load(File
21e0: 20 69 6e 70 75 74 29 0a 09 7b 0a 09 09 73 74 72 input)..{...str
21f0: 69 6e 67 5b 5d 20 20 20 20 20 20 20 72 61 77 5f ing[] raw_
2200: 64 61 74 61 3b 0a 09 09 73 74 72 69 6e 67 5b 73 data;...string[s
2210: 74 72 69 6e 67 5d 20 70 61 72 61 6d 73 3b 0a 0a tring] params;..
2220: 09 09 2f 2f 20 52 61 77 20 6d 61 70 20 64 61 74 ..// Raw map dat
2230: 61 3b 20 72 65 61 64 20 75 6e 74 69 6c 20 65 6d a; read until em
2240: 70 74 79 20 6c 69 6e 65 2e 0a 09 09 66 6f 72 28 pty line....for(
2250: 73 74 72 69 6e 67 20 6c 69 6e 65 3b 20 21 28 6c string line; !(l
2260: 69 6e 65 3d 69 6e 70 75 74 2e 72 65 61 64 6c 6e ine=input.readln
2270: 28 29 2e 63 68 6f 6d 70 28 29 29 2e 65 6d 70 74 ().chomp()).empt
2280: 79 3b 20 29 0a 09 09 09 72 61 77 5f 64 61 74 61 y; )....raw_data
2290: 20 7e 3d 20 6c 69 6e 65 3b 0a 0a 09 09 2f 2f 20 ~= line;....//
22a0: 41 64 64 69 74 69 6f 6e 61 6c 20 63 6f 6d 6d 61 Additional comma
22b0: 6e 64 73 3b 20 72 65 61 64 20 75 6e 74 69 6c 20 nds; read until
22c0: 45 4f 46 2e 0a 09 09 63 68 61 72 5b 63 68 61 72 EOF....char[char
22d0: 5d 20 74 72 61 6d 70 6f 3b 0a 09 09 66 6f 72 28 ] trampo;...for(
22e0: 73 74 72 69 6e 67 20 6c 69 6e 65 3b 20 21 28 6c string line; !(l
22f0: 69 6e 65 3d 69 6e 70 75 74 2e 72 65 61 64 6c 6e ine=input.readln
2300: 28 29 29 2e 65 6d 70 74 79 3b 20 29 20 7b 0a 09 ()).empty; ) {..
2310: 09 09 73 74 72 69 6e 67 5b 5d 20 73 73 20 3d 20 ..string[] ss =
2320: 6c 69 6e 65 2e 73 70 6c 69 74 28 29 3b 0a 09 09 line.split();...
2330: 09 69 66 28 20 73 73 2e 6c 65 6e 67 74 68 20 3d .if( ss.length =
2340: 3d 20 32 20 29 0a 09 09 09 09 70 61 72 61 6d 73 = 2 ).....params
2350: 5b 73 73 5b 30 5d 5d 20 3d 20 73 73 5b 31 5d 3b [ss[0]] = ss[1];
2360: 0a 09 09 09 69 66 28 20 73 73 2e 6c 65 6e 67 74 ....if( ss.lengt
2370: 68 20 3d 3d 20 34 20 26 26 20 73 73 5b 30 5d 3d h == 4 && ss[0]=
2380: 3d 22 54 72 61 6d 70 6f 6c 69 6e 65 22 20 26 26 ="Trampoline" &&
2390: 20 73 73 5b 32 5d 3d 3d 22 74 61 72 67 65 74 73 ss[2]=="targets
23a0: 22 20 29 0a 09 09 09 09 74 72 61 6d 70 6f 5b 73 " ).....trampo[s
23b0: 73 5b 31 5d 5b 30 5d 5d 20 3d 20 73 73 5b 33 5d s[1][0]] = ss[3]
23c0: 5b 30 5d 3b 0a 09 09 7d 0a 0a 09 09 72 65 74 75 [0];...}....retu
23d0: 72 6e 20 6c 6f 61 64 28 72 61 77 5f 64 61 74 61 rn load(raw_data
23e0: 2c 20 70 61 72 61 6d 73 2c 20 74 72 61 6d 70 6f , params, trampo
23f0: 29 3b 0a 09 7d 0a 0a 09 73 74 61 74 69 63 20 47 );..}...static G
2400: 61 6d 65 20 6c 6f 61 64 28 73 74 72 69 6e 67 5b ame load(string[
2410: 5d 20 72 61 77 5f 64 61 74 61 2c 20 73 74 72 69 ] raw_data, stri
2420: 6e 67 5b 73 74 72 69 6e 67 5d 20 70 61 72 61 6d ng[string] param
2430: 73 2c 20 63 68 61 72 5b 63 68 61 72 5d 20 74 72 s, char[char] tr
2440: 61 6d 70 6f 20 3d 20 6e 75 6c 6c 29 0a 09 7b 0a ampo = null)..{.
2450: 09 09 72 65 74 75 72 6e 20 6e 65 77 20 47 61 6d ..return new Gam
2460: 65 28 72 61 77 5f 64 61 74 61 2c 20 70 61 72 61 e(raw_data, para
2470: 6d 73 2c 20 74 72 61 6d 70 6f 29 3b 0a 09 7d 0a ms, trampo);..}.
2480: 0a 09 74 68 69 73 28 73 74 72 69 6e 67 5b 5d 20 ..this(string[]
2490: 72 61 77 5f 64 61 74 61 2c 20 73 74 72 69 6e 67 raw_data, string
24a0: 5b 73 74 72 69 6e 67 5d 20 70 61 72 61 6d 73 2c [string] params,
24b0: 20 63 68 61 72 5b 63 68 61 72 5d 20 74 72 61 6d char[char] tram
24c0: 70 6f 29 0a 09 7b 0a 09 09 74 68 69 73 2e 6d 61 po)..{...this.ma
24d0: 70 20 3d 20 4d 61 70 2e 6c 6f 61 64 28 72 61 77 p = Map.load(raw
24e0: 5f 64 61 74 61 2c 20 70 61 72 61 6d 73 2c 20 74 _data, params, t
24f0: 72 61 6d 70 6f 29 3b 0a 09 09 74 68 69 73 2e 77 rampo);...this.w
2500: 61 74 65 72 20 3d 20 57 61 74 65 72 2e 6c 6f 61 ater = Water.loa
2510: 64 28 70 61 72 61 6d 73 29 3b 0a 09 7d 0a 0a 09 d(params);..}...
2520: 47 61 6d 65 20 63 6c 6f 6e 65 28 29 20 63 6f 6e Game clone() con
2530: 73 74 20 7b 20 72 65 74 75 72 6e 20 6e 65 77 20 st { return new
2540: 47 61 6d 65 28 74 68 69 73 29 3b 20 7d 0a 09 74 Game(this); }..t
2550: 68 69 73 28 69 6e 20 47 61 6d 65 20 67 29 20 7b his(in Game g) {
2560: 0a 09 09 6d 61 70 20 3d 20 67 2e 6d 61 70 2e 63 ...map = g.map.c
2570: 6c 6f 6e 65 28 29 3b 0a 09 09 77 61 74 65 72 20 lone();...water
2580: 3d 20 67 2e 77 61 74 65 72 2e 63 6c 6f 6e 65 28 = g.water.clone(
2590: 29 3b 0a 09 09 74 75 72 6e 20 3d 20 67 2e 74 75 );...turn = g.tu
25a0: 72 6e 3b 0a 09 09 64 65 61 64 20 3d 20 67 2e 64 rn;...dead = g.d
25b0: 65 61 64 3b 0a 09 09 63 6c 65 61 72 65 64 20 3d ead;...cleared =
25c0: 20 67 2e 63 6c 65 61 72 65 64 3b 0a 09 09 75 6e g.cleared;...un
25d0: 64 65 72 5f 77 61 74 65 72 20 3d 20 67 2e 75 6e der_water = g.un
25e0: 64 65 72 5f 77 61 74 65 72 3b 0a 09 7d 0a 0a 09 der_water;..}...
25f0: 76 6f 69 64 20 63 6f 6d 6d 61 6e 64 28 63 68 61 void command(cha
2600: 72 20 63 29 0a 09 7b 0a 09 09 61 73 73 65 72 74 r c)..{...assert
2610: 28 63 20 21 3d 20 27 41 27 29 3b 0a 09 09 69 66 (c != 'A');...if
2620: 28 64 65 61 64 20 7c 7c 20 63 6c 65 61 72 65 64 (dead || cleared
2630: 29 0a 09 09 09 72 65 74 75 72 6e 3b 0a 0a 09 09 )....return;....
2640: 2f 2f 20 54 4f 44 4f 3a 20 63 6c 61 72 69 66 79 // TODO: clarify
2650: 20 74 68 65 20 65 76 65 6e 74 20 6f 72 64 65 72 the event order
2660: 0a 09 09 62 6f 6f 6c 20 64 65 61 64 5f 6e 6f 77 ...bool dead_now
2670: 20 3d 20 6d 61 70 2e 63 6f 6d 6d 61 6e 64 28 63 = map.command(c
2680: 2c 20 74 75 72 6e 29 3b 0a 09 09 69 66 28 20 6d , turn);...if( m
2690: 61 70 2e 63 6c 65 61 72 65 64 28 29 20 29 20 7b ap.cleared() ) {
26a0: 0a 09 09 09 63 6c 65 61 72 65 64 20 3d 20 74 72 ....cleared = tr
26b0: 75 65 3b 0a 09 09 7d 0a 09 09 65 6c 73 65 20 7b ue;...}...else {
26c0: 0a 09 09 09 69 66 28 20 64 65 61 64 5f 6e 6f 77 ....if( dead_now
26d0: 20 29 0a 09 09 09 09 64 65 61 64 20 3d 20 74 72 ).....dead = tr
26e0: 75 65 3b 0a 09 09 7d 0a 09 09 69 66 28 21 63 6c ue;...}...if(!cl
26f0: 65 61 72 65 64 29 20 7b 0a 09 09 09 69 66 28 20 eared) {....if(
2700: 6d 61 70 2e 72 6f 62 6f 74 2e 79 20 3c 3d 20 77 map.robot.y <= w
2710: 61 74 65 72 5f 6c 65 76 65 6c 20 29 0a 09 09 09 ater_level )....
2720: 09 2b 2b 75 6e 64 65 72 5f 77 61 74 65 72 3b 0a .++under_water;.
2730: 09 09 09 65 6c 73 65 0a 09 09 09 09 75 6e 64 65 ...else.....unde
2740: 72 5f 77 61 74 65 72 20 3d 20 30 3b 0a 09 09 09 r_water = 0;....
2750: 69 66 28 20 75 6e 64 65 72 5f 77 61 74 65 72 20 if( under_water
2760: 3e 20 6d 61 70 2e 77 61 74 65 72 70 72 6f 6f 66 > map.waterproof
2770: 20 29 0a 09 09 09 09 64 65 61 64 20 3d 20 74 72 ).....dead = tr
2780: 75 65 3b 0a 09 09 7d 0a 09 09 74 75 72 6e 20 2b ue;...}...turn +
2790: 3d 20 31 3b 0a 09 7d 0a 0a 09 4d 61 70 20 6d 61 = 1;..}...Map ma
27a0: 70 3b 0a 09 57 61 74 65 72 20 77 61 74 65 72 3b p;..Water water;
27b0: 0a 09 69 6e 74 20 20 74 75 72 6e 20 3d 20 30 3b ..int turn = 0;
27c0: 0a 09 62 6f 6f 6c 20 64 65 61 64 20 3d 20 66 61 ..bool dead = fa
27d0: 6c 73 65 3b 0a 09 69 6e 74 20 20 75 6e 64 65 72 lse;..int under
27e0: 5f 77 61 74 65 72 20 3d 20 30 3b 0a 09 62 6f 6f _water = 0;..boo
27f0: 6c 20 63 6c 65 61 72 65 64 20 3d 20 66 61 6c 73 l cleared = fals
2800: 65 3b 0a 09 2f 2f 20 54 4f 44 4f 3a 20 77 68 65 e;..// TODO: whe
2810: 6e 20 61 64 64 69 6e 67 20 6d 65 6d 62 65 72 73 n adding members
2820: 2c 20 74 61 6b 65 20 63 61 72 65 20 6f 66 20 63 , take care of c
2830: 6c 6f 6e 65 28 29 2e 0a 09 2f 2f 20 54 4f 44 4f lone()...// TODO
2840: 3a 20 66 69 78 20 74 68 69 73 20 70 6f 6f 72 20 : fix this poor
2850: 64 65 73 69 67 6e 2e 0a 0a 09 40 70 72 6f 70 65 design....@prope
2860: 72 74 79 20 63 6f 6e 73 74 20 7b 0a 09 09 6c 6f rty const {...lo
2870: 6e 67 20 73 63 6f 72 65 28 29 20 7b 20 72 65 74 ng score() { ret
2880: 75 72 6e 20 6d 61 70 2e 63 6f 6c 6c 65 63 74 65 urn map.collecte
2890: 64 5f 6c 61 6d 62 64 61 2a 28 64 65 61 64 20 3f d_lambda*(dead ?
28a0: 20 32 35 4c 20 3a 20 63 6c 65 61 72 65 64 20 3f 25L : cleared ?
28b0: 20 37 35 4c 20 3a 20 35 30 4c 29 20 2d 20 74 75 75L : 50L) - tu
28c0: 72 6e 3b 20 7d 0a 09 09 69 6e 74 20 77 61 74 65 rn; }...int wate
28d0: 72 5f 6c 65 76 65 6c 28 29 20 7b 20 72 65 74 75 r_level() { retu
28e0: 72 6e 20 77 61 74 65 72 2e 6c 65 76 65 6c 28 74 rn water.level(t
28f0: 75 72 6e 29 3b 20 7d 0a 09 09 69 6e 74 20 77 61 urn); }...int wa
2900: 74 65 72 5f 75 6e 74 69 6c 5f 72 69 73 65 28 29 ter_until_rise()
2910: 20 7b 20 72 65 74 75 72 6e 20 77 61 74 65 72 2e { return water.
2920: 75 6e 74 69 6c 5f 72 69 73 65 28 74 75 72 6e 29 until_rise(turn)
2930: 3b 20 7d 0a 09 09 69 6e 74 20 68 69 67 65 5f 75 ; }...int hige_u
2940: 6e 74 69 6c 5f 72 69 73 65 28 29 20 7b 20 72 65 ntil_rise() { re
2950: 74 75 72 6e 20 6d 61 70 2e 68 69 67 65 2e 75 6e turn map.hige.un
2960: 74 69 6c 5f 72 69 73 65 28 74 75 72 6e 29 3b 20 til_rise(turn);
2970: 7d 0a 09 09 69 6e 74 20 68 70 28 29 20 7b 20 72 }...int hp() { r
2980: 65 74 75 72 6e 20 6d 61 70 2e 77 61 74 65 72 70 eturn map.waterp
2990: 72 6f 6f 66 20 2d 20 75 6e 64 65 72 5f 77 61 74 roof - under_wat
29a0: 65 72 3b 20 7d 0a 09 7d 0a 7d 0a er; }..}.}.