Hex Artifact Content
Not logged in

Artifact e25c75ea96d8050747f4b4ad800450ae9fbc69b5:


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 0a 09 4d 61  .int razor;...Ma
0b20: 70 20 63 6c 6f 6e 65 28 29 20 63 6f 6e 73 74 20  p clone() const 
0b30: 7b 20 72 65 74 75 72 6e 20 6e 65 77 20 4d 61 70  { return new Map
0b40: 28 74 68 69 73 29 3b 20 7d 0a 09 74 68 69 73 28  (this); }..this(
0b50: 69 6e 20 4d 61 70 20 6d 29 20 7b 0a 09 09 66 6f  in Map m) {...fo
0b60: 72 65 61 63 68 28 73 3b 20 6d 2e 64 61 74 61 29  reach(s; m.data)
0b70: 0a 09 09 09 74 68 69 73 2e 64 61 74 61 20 7e 3d  ....this.data ~=
0b80: 20 73 2e 64 75 70 3b 0a 09 09 74 68 69 73 2e 72   s.dup;...this.r
0b90: 6f 62 6f 74 20 3d 20 6d 2e 72 6f 62 6f 74 2e 63  obot = m.robot.c
0ba0: 6c 6f 6e 65 28 29 3b 0a 09 09 74 68 69 73 2e 6c  lone();...this.l
0bb0: 69 66 74 20 3d 20 6d 2e 6c 69 66 74 2e 63 6c 6f  ift = m.lift.clo
0bc0: 6e 65 28 29 3b 0a 09 09 74 68 69 73 2e 77 61 74  ne();...this.wat
0bd0: 65 72 70 72 6f 6f 66 20 3d 20 6d 2e 77 61 74 65  erproof = m.wate
0be0: 72 70 72 6f 6f 66 3b 0a 09 09 74 68 69 73 2e 74  rproof;...this.t
0bf0: 72 5f 74 61 72 67 65 74 20 3d 20 63 61 73 74 28  r_target = cast(
0c00: 50 6f 73 5b 63 68 61 72 5d 29 6d 2e 74 72 5f 74  Pos[char])m.tr_t
0c10: 61 72 67 65 74 3b 0a 09 09 74 68 69 73 2e 74 72  arget;...this.tr
0c20: 5f 73 6f 75 72 63 65 20 3d 20 63 61 73 74 28 50  _source = cast(P
0c30: 6f 73 5b 5d 5b 63 68 61 72 5d 29 6d 2e 74 72 5f  os[][char])m.tr_
0c40: 73 6f 75 72 63 65 3b 0a 09 09 74 68 69 73 2e 68  source;...this.h
0c50: 69 67 65 20 3d 20 6d 2e 68 69 67 65 2e 63 6c 6f  ige = m.hige.clo
0c60: 6e 65 28 29 3b 0a 09 09 74 68 69 73 2e 72 61 7a  ne();...this.raz
0c70: 6f 72 20 3d 20 6d 2e 72 61 7a 6f 72 3b 0a 09 7d  or = m.razor;..}
0c80: 0a 0a 09 74 68 69 73 28 73 74 72 69 6e 67 5b 5d  ...this(string[]
0c90: 20 72 61 77 5f 64 61 74 61 2c 20 73 74 72 69 6e   raw_data, strin
0ca0: 67 5b 73 74 72 69 6e 67 5d 20 70 61 72 61 6d 73  g[string] params
0cb0: 2c 20 63 68 61 72 5b 63 68 61 72 5d 20 74 72 61  , char[char] tra
0cc0: 6d 70 6f 29 0a 09 7b 0a 09 09 69 6e 74 20 77 69  mpo)..{...int wi
0cd0: 64 74 68 20 3d 20 30 3b 0a 09 09 66 6f 72 65 61  dth = 0;...forea
0ce0: 63 68 28 72 3b 20 72 61 77 5f 64 61 74 61 29 0a  ch(r; raw_data).
0cf0: 09 09 09 77 69 64 74 68 20 3d 20 6d 61 78 28 77  ...width = max(w
0d00: 69 64 74 68 2c 20 72 2e 6c 65 6e 67 74 68 29 3b  idth, r.length);
0d10: 0a 09 09 66 6f 72 65 61 63 68 28 72 3b 20 72 61  ...foreach(r; ra
0d20: 77 5f 64 61 74 61 29 20 7b 0a 09 09 09 74 68 69  w_data) {....thi
0d30: 73 2e 64 61 74 61 20 7e 3d 20 72 2e 64 75 70 3b  s.data ~= r.dup;
0d40: 0a 09 09 09 74 68 69 73 2e 64 61 74 61 5b 24 2d  ....this.data[$-
0d50: 31 5d 2e 6c 65 6e 67 74 68 20 3d 20 77 69 64 74  1].length = widt
0d60: 68 3b 0a 09 09 09 74 68 69 73 2e 64 61 74 61 5b  h;....this.data[
0d70: 24 2d 31 5d 5b 72 2e 6c 65 6e 67 74 68 2e 2e 24  $-1][r.length..$
0d80: 5d 20 3d 20 27 20 27 3b 0a 09 09 7d 0a 0a 09 09  ] = ' ';...}....
0d90: 66 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d  for(int y=1; y<=
0da0: 48 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e  H; ++y)...for(in
0db0: 74 20 78 3d 31 3b 20 78 3c 3d 57 3b 20 2b 2b 78  t x=1; x<=W; ++x
0dc0: 29 20 7b 0a 09 09 09 69 66 28 74 68 69 73 5b 79  ) {....if(this[y
0dd0: 2c 78 5d 20 3d 3d 20 27 52 27 29 0a 09 09 09 09  ,x] == 'R').....
0de0: 74 68 69 73 2e 72 6f 62 6f 74 20 3d 20 6e 65 77  this.robot = new
0df0: 20 50 6f 73 28 79 2c 78 29 3b 0a 09 09 09 69 66   Pos(y,x);....if
0e00: 28 74 68 69 73 5b 79 2c 78 5d 20 3d 3d 20 27 4c  (this[y,x] == 'L
0e10: 27 20 7c 7c 20 74 68 69 73 5b 79 2c 78 5d 20 3d  ' || this[y,x] =
0e20: 3d 20 27 4f 27 29 0a 09 09 09 09 74 68 69 73 2e  = 'O').....this.
0e30: 6c 69 66 74 20 3d 20 6e 65 77 20 50 6f 73 28 79  lift = new Pos(y
0e40: 2c 78 29 3b 0a 09 09 7d 0a 0a 09 09 50 6f 73 5b  ,x);...}....Pos[
0e50: 63 68 61 72 5d 20 74 72 5f 70 6f 73 3b 0a 09 09  char] tr_pos;...
0e60: 66 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d  for(int y=1; y<=
0e70: 48 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e  H; ++y)...for(in
0e80: 74 20 78 3d 31 3b 20 78 3c 3d 57 3b 20 2b 2b 78  t x=1; x<=W; ++x
0e90: 29 20 7b 0a 09 09 09 63 68 61 72 20 63 20 3d 20  ) {....char c = 
0ea0: 74 68 69 73 5b 79 2c 78 5d 3b 0a 09 09 09 69 66  this[y,x];....if
0eb0: 28 27 31 27 3c 3d 63 20 26 26 20 63 3c 3d 27 39  ('1'<=c && c<='9
0ec0: 27 20 7c 7c 20 27 41 27 3c 3d 63 26 26 63 3c 3d  ' || 'A'<=c&&c<=
0ed0: 27 49 27 29 0a 09 09 09 09 74 72 5f 70 6f 73 5b  'I').....tr_pos[
0ee0: 63 5d 20 3d 20 6e 65 77 20 50 6f 73 28 79 2c 78  c] = new Pos(y,x
0ef0: 29 3b 0a 09 09 7d 0a 0a 09 09 74 68 69 73 2e 77  );...}....this.w
0f00: 61 74 65 72 70 72 6f 6f 66 20 3d 20 70 61 72 61  aterproof = para
0f10: 6d 73 2e 67 65 74 28 22 57 61 74 65 72 70 72 6f  ms.get("Waterpro
0f20: 6f 66 22 2c 20 22 35 22 29 2e 74 6f 21 69 6e 74  of", "5").to!int
0f30: 28 29 3b 0a 09 09 66 6f 72 65 61 63 68 28 66 72  ();...foreach(fr
0f40: 2c 74 6f 3b 20 74 72 61 6d 70 6f 29 20 7b 0a 09  ,to; trampo) {..
0f50: 09 09 74 72 5f 74 61 72 67 65 74 5b 66 72 5d 20  ..tr_target[fr] 
0f60: 3d 20 74 72 5f 70 6f 73 5b 74 6f 5d 3b 0a 09 09  = tr_pos[to];...
0f70: 09 69 66 28 74 6f 20 21 69 6e 20 74 72 5f 73 6f  .if(to !in tr_so
0f80: 75 72 63 65 29 20 74 72 5f 73 6f 75 72 63 65 5b  urce) tr_source[
0f90: 74 6f 5d 20 3d 20 5b 5d 3b 0a 09 09 09 74 72 5f  to] = [];....tr_
0fa0: 73 6f 75 72 63 65 5b 74 6f 5d 20 7e 3d 20 74 72  source[to] ~= tr
0fb0: 5f 70 6f 73 5b 66 72 5d 3b 0a 09 09 7d 0a 0a 09  _pos[fr];...}...
0fc0: 09 74 68 69 73 2e 68 69 67 65 20 3d 20 48 69 67  .this.hige = Hig
0fd0: 65 2e 6c 6f 61 64 28 70 61 72 61 6d 73 29 3b 0a  e.load(params);.
0fe0: 09 09 74 68 69 73 2e 72 61 7a 6f 72 20 3d 20 70  ..this.razor = p
0ff0: 61 72 61 6d 73 2e 67 65 74 28 22 52 61 7a 6f 72  arams.get("Razor
1000: 73 22 2c 20 22 30 22 29 2e 74 6f 21 69 6e 74 28  s", "0").to!int(
1010: 29 3b 0a 09 7d 0a 0a 09 63 6f 6e 73 74 20 40 70  );..}...const @p
1020: 72 6f 70 65 72 74 79 20 7b 0a 09 09 69 6e 74 20  roperty {...int 
1030: 48 28 29 20 7b 20 72 65 74 75 72 6e 20 64 61 74  H() { return dat
1040: 61 2e 6c 65 6e 67 74 68 3b 20 7d 0a 09 09 69 6e  a.length; }...in
1050: 74 20 57 28 29 20 7b 20 72 65 74 75 72 6e 20 64  t W() { return d
1060: 61 74 61 5b 30 5d 2e 6c 65 6e 67 74 68 3b 20 7d  ata[0].length; }
1070: 0a 09 7d 0a 0a 09 63 6f 6e 73 74 20 7b 0a 09 09  ..}...const {...
1080: 63 68 61 72 20 6f 70 49 6e 64 65 78 28 69 6e 74  char opIndex(int
1090: 20 79 2c 20 69 6e 74 20 78 29 0a 09 09 7b 0a 09   y, int x)...{..
10a0: 09 09 2f 2f 20 41 64 6a 75 73 74 20 63 6f 6f 72  ..// Adjust coor
10b0: 64 69 6e 61 74 65 20 74 6f 20 74 68 65 20 73 70  dinate to the sp
10c0: 65 63 2e 20 62 6f 74 74 6f 6d 2d 6c 65 66 74 20  ec. bottom-left 
10d0: 69 73 20 28 31 2c 31 29 2e 0a 09 09 09 2d 2d 79  is (1,1).....--y
10e0: 2c 20 2d 2d 78 3b 0a 09 09 09 69 66 28 79 3c 30  , --x;....if(y<0
10f0: 7c 7c 48 3c 3d 79 7c 7c 78 3c 30 7c 7c 57 3c 3d  ||H<=y||x<0||W<=
1100: 78 29 0a 09 09 09 09 72 65 74 75 72 6e 20 27 23  x).....return '#
1110: 27 3b 0a 09 09 09 72 65 74 75 72 6e 20 64 61 74  ';....return dat
1120: 61 5b 48 2d 31 2d 79 5d 5b 78 5d 3b 0a 09 09 7d  a[H-1-y][x];...}
1130: 0a 0a 09 09 63 68 61 72 20 6f 70 49 6e 64 65 78  ....char opIndex
1140: 28 69 6e 20 50 6f 73 20 70 29 0a 09 09 7b 0a 09  (in Pos p)...{..
1150: 09 09 72 65 74 75 72 6e 20 74 68 69 73 5b 70 2e  ..return this[p.
1160: 79 2c 20 70 2e 78 5d 3b 0a 09 09 7d 0a 09 7d 0a  y, p.x];...}..}.
1170: 0a 09 76 6f 69 64 20 6f 70 49 6e 64 65 78 41 73  ..void opIndexAs
1180: 73 69 67 6e 28 63 68 61 72 20 63 2c 20 69 6e 74  sign(char c, int
1190: 20 79 2c 20 69 6e 74 20 78 29 0a 09 7b 0a 09 09   y, int x)..{...
11a0: 2f 2f 20 41 64 6a 75 73 74 20 63 6f 6f 72 64 69  // Adjust coordi
11b0: 6e 61 74 65 20 74 6f 20 74 68 65 20 73 70 65 63  nate to the spec
11c0: 2e 20 62 6f 74 74 6f 6d 2d 6c 65 66 74 20 69 73  . bottom-left is
11d0: 20 28 31 2c 31 29 2e 0a 09 09 2d 2d 79 2c 20 2d   (1,1)....--y, -
11e0: 2d 78 3b 0a 09 09 69 66 28 79 3c 30 7c 7c 48 3c  -x;...if(y<0||H<
11f0: 3d 79 7c 7c 78 3c 30 7c 7c 57 3c 3d 78 29 0a 09  =y||x<0||W<=x)..
1200: 09 09 72 65 74 75 72 6e 3b 0a 09 09 64 61 74 61  ..return;...data
1210: 5b 48 2d 31 2d 79 5d 5b 78 5d 20 3d 20 63 3b 0a  [H-1-y][x] = c;.
1220: 09 7d 0a 0a 09 76 6f 69 64 20 6f 70 49 6e 64 65  .}...void opInde
1230: 78 41 73 73 69 67 6e 28 63 68 61 72 20 63 2c 20  xAssign(char c, 
1240: 69 6e 20 50 6f 73 20 70 29 0a 09 7b 0a 09 09 74  in Pos p)..{...t
1250: 68 69 73 5b 70 2e 79 2c 20 70 2e 78 5d 20 3d 20  his[p.y, p.x] = 
1260: 63 3b 0a 09 7d 0a 0a 09 50 6f 73 5b 5d 20 6f 62  c;..}...Pos[] ob
1270: 6a 65 63 74 73 28 63 68 61 72 20 63 29 20 63 6f  jects(char c) co
1280: 6e 73 74 20 7b 0a 09 09 50 6f 73 5b 5d 20 61 6e  nst {...Pos[] an
1290: 73 3b 0a 09 09 66 6f 72 28 69 6e 74 20 79 3d 31  s;...for(int y=1
12a0: 3b 20 79 3c 3d 48 3b 20 2b 2b 79 29 0a 09 09 66  ; y<=H; ++y)...f
12b0: 6f 72 28 69 6e 74 20 78 3d 31 3b 20 78 3c 3d 57  or(int x=1; x<=W
12c0: 3b 20 2b 2b 78 29 0a 09 09 09 69 66 28 74 68 69  ; ++x)....if(thi
12d0: 73 5b 79 2c 78 5d 20 3d 3d 20 63 29 0a 09 09 09  s[y,x] == c)....
12e0: 09 61 6e 73 20 7e 3d 20 6e 65 77 20 50 6f 73 28  .ans ~= new Pos(
12f0: 79 2c 78 29 3b 0a 09 09 72 65 74 75 72 6e 20 61  y,x);...return a
1300: 6e 73 3b 0a 09 7d 0a 0a 09 50 6f 73 5b 5d 20 72  ns;..}...Pos[] r
1310: 61 7a 6f 72 73 28 29 20 63 6f 6e 73 74 20 7b 20  azors() const { 
1320: 72 65 74 75 72 6e 20 6f 62 6a 65 63 74 73 28 27  return objects('
1330: 21 27 29 3b 20 7d 0a 09 50 6f 73 5b 5d 20 6c 61  !'); }..Pos[] la
1340: 6d 62 64 61 73 28 29 20 63 6f 6e 73 74 20 7b 20  mbdas() const { 
1350: 72 65 74 75 72 6e 20 6f 62 6a 65 63 74 73 28 27  return objects('
1360: 5c 5c 27 29 3b 20 7d 0a 0a 09 62 6f 6f 6c 20 63  \\'); }...bool c
1370: 6c 65 61 72 65 64 28 29 20 63 6f 6e 73 74 0a 09  leared() const..
1380: 7b 0a 09 09 66 6f 72 28 69 6e 74 20 79 3d 31 3b  {...for(int y=1;
1390: 20 79 3c 3d 48 3b 20 2b 2b 79 29 0a 09 09 66 6f   y<=H; ++y)...fo
13a0: 72 28 69 6e 74 20 78 3d 31 3b 20 78 3c 3d 57 3b  r(int x=1; x<=W;
13b0: 20 2b 2b 78 29 0a 09 09 09 69 66 28 74 68 69 73   ++x)....if(this
13c0: 5b 79 2c 78 5d 20 3d 3d 20 27 4c 27 20 7c 7c 20  [y,x] == 'L' || 
13d0: 74 68 69 73 5b 79 2c 78 5d 20 3d 3d 20 27 4f 27  this[y,x] == 'O'
13e0: 29 0a 09 09 09 09 72 65 74 75 72 6e 20 66 61 6c  ).....return fal
13f0: 73 65 3b 0a 09 09 72 65 74 75 72 6e 20 74 72 75  se;...return tru
1400: 65 3b 0a 09 7d 0a 09 0a 09 54 75 70 6c 65 21 28  e;..}....Tuple!(
1410: 69 6e 74 2c 62 6f 6f 6c 29 20 63 6f 6d 6d 61 6e  int,bool) comman
1420: 64 28 63 68 61 72 20 63 2c 20 69 6e 74 20 74 75  d(char c, int tu
1430: 72 6e 29 0a 09 7b 0a 09 09 61 73 73 65 72 74 28  rn)..{...assert(
1440: 20 74 68 69 73 5b 72 6f 62 6f 74 5d 20 3d 3d 20   this[robot] == 
1450: 27 52 27 20 29 3b 0a 09 09 69 66 28 63 3d 3d 27  'R' );...if(c=='
1460: 52 27 29 20 72 65 74 75 72 6e 20 6d 6f 76 65 28  R') return move(
1470: 20 30 2c 20 2b 31 2c 20 74 75 72 6e 29 3b 0a 09   0, +1, turn);..
1480: 09 69 66 28 63 3d 3d 27 4c 27 29 20 72 65 74 75  .if(c=='L') retu
1490: 72 6e 20 6d 6f 76 65 28 20 30 2c 20 2d 31 2c 20  rn move( 0, -1, 
14a0: 74 75 72 6e 29 3b 0a 09 09 69 66 28 63 3d 3d 27  turn);...if(c=='
14b0: 55 27 29 20 72 65 74 75 72 6e 20 6d 6f 76 65 28  U') return move(
14c0: 2b 31 2c 20 20 30 2c 20 74 75 72 6e 29 3b 0a 09  +1,  0, turn);..
14d0: 09 69 66 28 63 3d 3d 27 44 27 29 20 72 65 74 75  .if(c=='D') retu
14e0: 72 6e 20 6d 6f 76 65 28 2d 31 2c 20 20 30 2c 20  rn move(-1,  0, 
14f0: 74 75 72 6e 29 3b 0a 09 09 69 66 28 63 3d 3d 27  turn);...if(c=='
1500: 57 27 29 20 72 65 74 75 72 6e 20 6d 6f 76 65 28  W') return move(
1510: 20 30 2c 20 20 30 2c 20 74 75 72 6e 29 3b 0a 09   0,  0, turn);..
1520: 09 69 66 28 63 3d 3d 27 53 27 29 20 72 65 74 75  .if(c=='S') retu
1530: 72 6e 20 75 73 65 5f 72 61 7a 6f 72 28 74 75 72  rn use_razor(tur
1540: 6e 29 3b 0a 09 09 61 73 73 65 72 74 28 66 61 6c  n);...assert(fal
1550: 73 65 29 3b 0a 09 7d 0a 0a 09 54 75 70 6c 65 21  se);..}...Tuple!
1560: 28 69 6e 74 2c 20 62 6f 6f 6c 29 20 75 73 65 5f  (int, bool) use_
1570: 72 61 7a 6f 72 28 69 6e 74 20 74 75 72 6e 29 0a  razor(int turn).
1580: 09 7b 0a 09 09 69 66 28 72 61 7a 6f 72 29 20 7b  .{...if(razor) {
1590: 0a 09 09 09 72 61 7a 6f 72 2d 2d 3b 0a 09 09 09  ....razor--;....
15a0: 66 6f 72 28 69 6e 74 20 64 79 3d 2d 31 3b 20 64  for(int dy=-1; d
15b0: 79 3c 3d 2b 31 3b 20 2b 2b 64 79 29 0a 09 09 09  y<=+1; ++dy)....
15c0: 66 6f 72 28 69 6e 74 20 64 78 3d 2d 31 3b 20 64  for(int dx=-1; d
15d0: 78 3c 3d 2b 31 3b 20 2b 2b 64 78 29 0a 09 09 09  x<=+1; ++dx)....
15e0: 09 69 66 28 74 68 69 73 5b 72 6f 62 6f 74 2e 79  .if(this[robot.y
15f0: 2b 64 79 2c 72 6f 62 6f 74 2e 78 2b 64 78 5d 20  +dy,robot.x+dx] 
1600: 3d 3d 20 27 57 27 29 0a 09 09 09 09 09 74 68 69  == 'W')......thi
1610: 73 5b 72 6f 62 6f 74 2e 79 2b 64 79 2c 72 6f 62  s[robot.y+dy,rob
1620: 6f 74 2e 78 2b 64 78 5d 20 3d 20 27 20 27 3b 0a  ot.x+dx] = ' ';.
1630: 09 09 7d 0a 0a 09 09 62 6f 6f 6c 20 64 65 61 64  ..}....bool dead
1640: 20 3d 20 75 70 64 61 74 65 28 74 75 72 6e 29 3b   = update(turn);
1650: 0a 09 09 72 65 74 75 72 6e 20 74 75 70 6c 65 28  ...return tuple(
1660: 30 2c 64 65 61 64 29 3b 0a 09 7d 0a 0a 09 54 75  0,dead);..}...Tu
1670: 70 6c 65 21 28 69 6e 74 2c 20 62 6f 6f 6c 29 20  ple!(int, bool) 
1680: 6d 6f 76 65 28 69 6e 74 20 64 79 2c 20 69 6e 74  move(int dy, int
1690: 20 64 78 2c 20 69 6e 74 20 74 75 72 6e 29 0a 09   dx, int turn)..
16a0: 7b 0a 09 09 69 6e 74 20 79 20 3d 20 72 6f 62 6f  {...int y = robo
16b0: 74 2e 79 3b 0a 09 09 69 6e 74 20 78 20 3d 20 72  t.y;...int x = r
16c0: 6f 62 6f 74 2e 78 3b 0a 09 09 69 6e 74 20 6c 61  obot.x;...int la
16d0: 6d 62 64 61 20 3d 20 30 3b 0a 09 09 69 66 28 20  mbda = 0;...if( 
16e0: 27 5c 5c 27 20 3d 3d 20 74 68 69 73 5b 79 2b 64  '\\' == this[y+d
16f0: 79 2c 78 2b 64 78 5d 20 29 0a 09 09 09 6c 61 6d  y,x+dx] )....lam
1700: 62 64 61 2b 2b 3b 0a 09 09 69 66 28 20 27 21 27  bda++;...if( '!'
1710: 20 3d 3d 20 74 68 69 73 5b 79 2b 64 79 2c 78 2b   == this[y+dy,x+
1720: 64 78 5d 20 29 0a 09 09 09 72 61 7a 6f 72 2b 2b  dx] )....razor++
1730: 3b 0a 09 09 69 66 28 20 22 20 5c 5c 21 2e 4f 22  ;...if( " \\!.O"
1740: 2e 63 6f 75 6e 74 28 74 68 69 73 5b 79 2b 64 79  .count(this[y+dy
1750: 2c 78 2b 64 78 5d 29 3d 3d 31 20 29 20 7b 0a 09  ,x+dx])==1 ) {..
1760: 09 09 74 68 69 73 5b 79 2c 78 5d 3d 27 20 27 3b  ..this[y,x]=' ';
1770: 0a 09 09 09 74 68 69 73 5b 79 2b 64 79 2c 78 2b  ....this[y+dy,x+
1780: 64 78 5d 3d 27 52 27 3b 0a 09 09 09 72 6f 62 6f  dx]='R';....robo
1790: 74 20 3d 20 6e 65 77 20 50 6f 73 28 79 2b 64 79  t = new Pos(y+dy
17a0: 2c 78 2b 64 78 29 3b 0a 09 09 7d 20 65 6c 73 65  ,x+dx);...} else
17b0: 20 69 66 28 64 79 3d 3d 30 20 26 26 20 27 2a 27   if(dy==0 && '*'
17c0: 3d 3d 74 68 69 73 5b 79 2b 64 79 2c 78 2b 64 78  ==this[y+dy,x+dx
17d0: 5d 20 26 26 20 27 20 27 3d 3d 74 68 69 73 5b 79  ] && ' '==this[y
17e0: 2b 64 79 2a 32 2c 78 2b 64 78 2a 32 5d 29 20 7b  +dy*2,x+dx*2]) {
17f0: 0a 09 09 09 74 68 69 73 5b 79 2c 78 5d 3d 27 20  ....this[y,x]=' 
1800: 27 3b 0a 09 09 09 74 68 69 73 5b 79 2b 64 79 2c  ';....this[y+dy,
1810: 78 2b 64 78 5d 3d 27 52 27 3b 0a 09 09 09 74 68  x+dx]='R';....th
1820: 69 73 5b 79 2b 64 79 2a 32 2c 78 2b 64 78 2a 32  is[y+dy*2,x+dx*2
1830: 5d 3d 27 2a 27 3b 0a 09 09 09 72 6f 62 6f 74 20  ]='*';....robot 
1840: 3d 20 6e 65 77 20 50 6f 73 28 79 2b 64 79 2c 78  = new Pos(y+dy,x
1850: 2b 64 78 29 3b 0a 09 09 7d 20 65 6c 73 65 20 69  +dx);...} else i
1860: 66 28 27 41 27 3c 3d 74 68 69 73 5b 79 2b 64 79  f('A'<=this[y+dy
1870: 2c 78 2b 64 78 5d 20 26 26 20 74 68 69 73 5b 79  ,x+dx] && this[y
1880: 2b 64 79 2c 78 2b 64 78 5d 3c 3d 27 49 27 29 20  +dy,x+dx]<='I') 
1890: 7b 0a 09 09 09 74 68 69 73 5b 79 2c 78 5d 3d 27  {....this[y,x]='
18a0: 20 27 3b 0a 09 09 09 50 6f 73 20 74 70 20 3d 20   ';....Pos tp = 
18b0: 74 72 5f 74 61 72 67 65 74 5b 74 68 69 73 5b 79  tr_target[this[y
18c0: 2b 64 79 2c 78 2b 64 78 5d 5d 3b 0a 09 09 09 66  +dy,x+dx]];....f
18d0: 6f 72 65 61 63 68 28 70 3b 20 74 72 5f 73 6f 75  oreach(p; tr_sou
18e0: 72 63 65 5b 74 68 69 73 5b 74 70 5d 5d 29 0a 09  rce[this[tp]])..
18f0: 09 09 09 74 68 69 73 5b 70 5d 20 3d 20 27 20 27  ...this[p] = ' '
1900: 3b 0a 09 09 09 74 68 69 73 5b 74 70 5d 20 3d 20  ;....this[tp] = 
1910: 27 52 27 3b 0a 09 09 09 72 6f 62 6f 74 20 3d 20  'R';....robot = 
1920: 74 70 3b 0a 09 09 7d 0a 09 09 62 6f 6f 6c 20 64  tp;...}...bool d
1930: 65 61 64 20 3d 20 75 70 64 61 74 65 28 74 75 72  ead = update(tur
1940: 6e 29 3b 0a 09 09 72 65 74 75 72 6e 20 74 75 70  n);...return tup
1950: 6c 65 28 6c 61 6d 62 64 61 2c 64 65 61 64 29 3b  le(lambda,dead);
1960: 0a 09 7d 0a 0a 09 62 6f 6f 6c 20 75 70 64 61 74  ..}...bool updat
1970: 65 28 69 6e 74 20 74 75 72 6e 29 0a 09 7b 0a 09  e(int turn)..{..
1980: 09 62 6f 6f 6c 20 64 65 61 64 20 3d 20 66 61 6c  .bool dead = fal
1990: 73 65 3b 0a 0a 09 09 63 68 61 72 5b 5d 5b 5d 20  se;....char[][] 
19a0: 6e 65 78 74 3b 0a 09 09 66 6f 72 65 61 63 68 28  next;...foreach(
19b0: 79 2c 73 3b 20 64 61 74 61 29 0a 09 09 09 6e 65  y,s; data)....ne
19c0: 78 74 20 7e 3d 20 73 2e 64 75 70 3b 0a 0a 09 09  xt ~= s.dup;....
19d0: 72 65 66 20 63 68 61 72 20 61 63 63 65 73 73 28  ref char access(
19e0: 50 6f 73 20 70 29 20 7b 20 72 65 74 75 72 6e 20  Pos p) { return 
19f0: 6e 65 78 74 5b 48 2d 70 2e 79 5d 5b 70 2e 78 2d  next[H-p.y][p.x-
1a00: 31 5d 3b 20 7d 0a 0a 09 09 62 6f 6f 6c 20 6c 61  1]; }....bool la
1a10: 6d 62 64 61 20 3d 20 66 61 6c 73 65 3b 0a 09 09  mbda = false;...
1a20: 66 6f 72 28 69 6e 74 20 79 3d 31 3b 20 79 3c 3d  for(int y=1; y<=
1a30: 48 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e  H; ++y)...for(in
1a40: 74 20 78 3d 31 3b 20 78 3c 3d 57 3b 20 2b 2b 78  t x=1; x<=W; ++x
1a50: 29 0a 09 09 09 6c 61 6d 62 64 61 20 7c 3d 20 28  )....lambda |= (
1a60: 74 68 69 73 5b 79 2c 78 5d 20 3d 3d 20 27 5c 5c  this[y,x] == '\\
1a70: 27 29 3b 0a 0a 09 09 66 6f 72 28 69 6e 74 20 79  ');....for(int y
1a80: 3d 31 3b 20 79 3c 3d 48 3b 20 2b 2b 79 29 0a 09  =1; y<=H; ++y)..
1a90: 09 66 6f 72 28 69 6e 74 20 78 3d 31 3b 20 78 3c  .for(int x=1; x<
1aa0: 3d 57 3b 20 2b 2b 78 29 20 7b 0a 09 09 09 50 6f  =W; ++x) {....Po
1ab0: 73 20 70 20 3d 20 6e 65 77 20 50 6f 73 28 79 2c  s p = new Pos(y,
1ac0: 78 29 3b 0a 09 09 09 69 66 28 74 68 69 73 5b 70  x);....if(this[p
1ad0: 5d 3d 3d 27 2a 27 29 20 7b 0a 09 09 09 09 69 66  ]=='*') {.....if
1ae0: 28 74 68 69 73 5b 70 2e 44 5d 3d 3d 27 20 27 29  (this[p.D]==' ')
1af0: 20 7b 0a 09 09 09 09 09 61 63 63 65 73 73 28 70   {......access(p
1b00: 29 20 20 3d 27 20 27 3b 0a 09 09 09 09 09 61 63  )  =' ';......ac
1b10: 63 65 73 73 28 70 2e 44 29 3d 27 2a 27 3b 0a 09  cess(p.D)='*';..
1b20: 09 09 09 09 69 66 28 72 6f 62 6f 74 20 3d 3d 20  ....if(robot == 
1b30: 70 2e 44 2e 44 29 0a 09 09 09 09 09 09 64 65 61  p.D.D).......dea
1b40: 64 3d 74 72 75 65 3b 0a 09 09 09 09 7d 0a 09 09  d=true;.....}...
1b50: 09 09 65 6c 73 65 20 69 66 28 28 74 68 69 73 5b  ..else if((this[
1b60: 70 2e 44 5d 3d 3d 27 2a 27 20 7c 7c 20 74 68 69  p.D]=='*' || thi
1b70: 73 5b 70 2e 44 5d 3d 3d 27 5c 5c 27 29 20 26 26  s[p.D]=='\\') &&
1b80: 20 74 68 69 73 5b 70 2e 52 5d 3d 3d 27 20 27 20   this[p.R]==' ' 
1b90: 26 26 20 74 68 69 73 5b 70 2e 52 2e 44 5d 3d 3d  && this[p.R.D]==
1ba0: 27 20 27 29 20 7b 0a 09 09 09 09 09 61 63 63 65  ' ') {......acce
1bb0: 73 73 28 70 29 3d 27 20 27 3b 0a 09 09 09 09 09  ss(p)=' ';......
1bc0: 61 63 63 65 73 73 28 70 2e 52 2e 44 29 3d 27 2a  access(p.R.D)='*
1bd0: 27 3b 0a 09 09 09 09 09 69 66 28 72 6f 62 6f 74  ';......if(robot
1be0: 20 3d 3d 20 70 2e 52 2e 44 2e 44 29 0a 09 09 09   == p.R.D.D)....
1bf0: 09 09 09 64 65 61 64 3d 74 72 75 65 3b 0a 09 09  ...dead=true;...
1c00: 09 09 7d 0a 09 09 09 09 65 6c 73 65 20 69 66 28  ..}.....else if(
1c10: 74 68 69 73 5b 70 2e 44 5d 3d 3d 27 2a 27 20 26  this[p.D]=='*' &
1c20: 26 20 74 68 69 73 5b 70 2e 4c 5d 3d 3d 27 20 27  & this[p.L]==' '
1c30: 20 26 26 20 74 68 69 73 5b 70 2e 4c 2e 44 5d 3d   && this[p.L.D]=
1c40: 3d 27 20 27 29 20 7b 0a 09 09 09 09 09 61 63 63  =' ') {......acc
1c50: 65 73 73 28 70 29 3d 27 20 27 3b 0a 09 09 09 09  ess(p)=' ';.....
1c60: 09 61 63 63 65 73 73 28 70 2e 4c 2e 44 29 3d 27  .access(p.L.D)='
1c70: 2a 27 3b 0a 09 09 09 09 09 69 66 28 72 6f 62 6f  *';......if(robo
1c80: 74 20 3d 3d 20 70 2e 4c 2e 44 2e 44 29 0a 09 09  t == p.L.D.D)...
1c90: 09 09 09 09 64 65 61 64 3d 74 72 75 65 3b 0a 09  ....dead=true;..
1ca0: 09 09 09 7d 0a 09 09 09 7d 0a 09 09 09 65 6c 73  ...}....}....els
1cb0: 65 20 69 66 28 74 68 69 73 5b 70 5d 3d 3d 27 4c  e if(this[p]=='L
1cc0: 27 29 20 7b 0a 09 09 09 09 69 66 28 21 6c 61 6d  ') {.....if(!lam
1cd0: 62 64 61 29 0a 09 09 09 09 09 61 63 63 65 73 73  bda)......access
1ce0: 28 70 29 20 3d 20 27 4f 27 3b 0a 09 09 09 7d 0a  (p) = 'O';....}.
1cf0: 09 09 09 65 6c 73 65 20 69 66 28 74 68 69 73 5b  ...else if(this[
1d00: 70 5d 3d 3d 27 57 27 29 20 7b 0a 09 09 09 09 69  p]=='W') {.....i
1d10: 66 28 20 68 69 67 65 2e 69 73 5f 67 72 6f 77 69  f( hige.is_growi
1d20: 6e 67 5f 74 75 72 6e 28 74 75 72 6e 29 20 29 0a  ng_turn(turn) ).
1d30: 09 09 09 09 09 66 6f 72 28 69 6e 74 20 64 79 3d  .....for(int dy=
1d40: 2d 31 3b 20 64 79 3c 3d 2b 31 3b 20 2b 2b 64 79  -1; dy<=+1; ++dy
1d50: 29 0a 09 09 09 09 09 66 6f 72 28 69 6e 74 20 64  )......for(int d
1d60: 78 3d 2d 31 3b 20 64 78 3c 3d 2b 31 3b 20 2b 2b  x=-1; dx<=+1; ++
1d70: 64 78 29 0a 09 09 09 09 09 09 69 66 28 74 68 69  dx).......if(thi
1d80: 73 5b 70 2e 79 2b 64 79 2c 70 2e 78 2b 64 78 5d  s[p.y+dy,p.x+dx]
1d90: 20 3d 3d 20 27 20 27 29 0a 09 09 09 09 09 09 09   == ' ')........
1da0: 61 63 63 65 73 73 28 6e 65 77 20 50 6f 73 28 70  access(new Pos(p
1db0: 2e 79 2b 64 79 2c 70 2e 78 2b 64 78 29 29 20 3d  .y+dy,p.x+dx)) =
1dc0: 20 27 57 27 3b 0a 09 09 09 7d 0a 09 09 7d 0a 09   'W';....}...}..
1dd0: 09 64 61 74 61 20 3d 20 6e 65 78 74 3b 0a 09 09  .data = next;...
1de0: 72 65 74 75 72 6e 20 64 65 61 64 3b 0a 09 7d 0a  return dead;..}.
1df0: 7d 0a 0a 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  }../////////////
1e00: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
1e10: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
1e20: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
1e30: 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f 2f  ////////////////
1e40: 2f 2f 2f 0a 0a 63 6c 61 73 73 20 47 61 6d 65 0a  ///..class Game.
1e50: 7b 0a 09 6d 69 78 69 6e 20 44 65 72 69 76 65 53  {..mixin DeriveS
1e60: 68 6f 77 3b 0a 0a 09 73 74 61 74 69 63 20 47 61  how;...static Ga
1e70: 6d 65 20 6c 6f 61 64 28 46 69 6c 65 20 69 6e 70  me load(File inp
1e80: 75 74 29 0a 09 7b 0a 09 09 73 74 72 69 6e 67 5b  ut)..{...string[
1e90: 5d 20 20 20 20 20 20 20 72 61 77 5f 64 61 74 61  ]       raw_data
1ea0: 3b 0a 09 09 73 74 72 69 6e 67 5b 73 74 72 69 6e  ;...string[strin
1eb0: 67 5d 20 70 61 72 61 6d 73 3b 0a 0a 09 09 2f 2f  g] params;....//
1ec0: 20 52 61 77 20 6d 61 70 20 64 61 74 61 3b 20 72   Raw map data; r
1ed0: 65 61 64 20 75 6e 74 69 6c 20 65 6d 70 74 79 20  ead until empty 
1ee0: 6c 69 6e 65 2e 0a 09 09 66 6f 72 28 73 74 72 69  line....for(stri
1ef0: 6e 67 20 6c 69 6e 65 3b 20 21 28 6c 69 6e 65 3d  ng line; !(line=
1f00: 69 6e 70 75 74 2e 72 65 61 64 6c 6e 28 29 2e 63  input.readln().c
1f10: 68 6f 6d 70 28 29 29 2e 65 6d 70 74 79 3b 20 29  homp()).empty; )
1f20: 0a 09 09 09 72 61 77 5f 64 61 74 61 20 7e 3d 20  ....raw_data ~= 
1f30: 6c 69 6e 65 3b 0a 0a 09 09 2f 2f 20 41 64 64 69  line;....// Addi
1f40: 74 69 6f 6e 61 6c 20 63 6f 6d 6d 61 6e 64 73 3b  tional commands;
1f50: 20 72 65 61 64 20 75 6e 74 69 6c 20 45 4f 46 2e   read until EOF.
1f60: 0a 09 09 63 68 61 72 5b 63 68 61 72 5d 20 74 72  ...char[char] tr
1f70: 61 6d 70 6f 3b 0a 09 09 66 6f 72 28 73 74 72 69  ampo;...for(stri
1f80: 6e 67 20 6c 69 6e 65 3b 20 21 28 6c 69 6e 65 3d  ng line; !(line=
1f90: 69 6e 70 75 74 2e 72 65 61 64 6c 6e 28 29 29 2e  input.readln()).
1fa0: 65 6d 70 74 79 3b 20 29 20 7b 0a 09 09 09 73 74  empty; ) {....st
1fb0: 72 69 6e 67 5b 5d 20 73 73 20 3d 20 6c 69 6e 65  ring[] ss = line
1fc0: 2e 73 70 6c 69 74 28 29 3b 0a 09 09 09 69 66 28  .split();....if(
1fd0: 20 73 73 2e 6c 65 6e 67 74 68 20 3d 3d 20 32 20   ss.length == 2 
1fe0: 29 0a 09 09 09 09 70 61 72 61 6d 73 5b 73 73 5b  ).....params[ss[
1ff0: 30 5d 5d 20 3d 20 73 73 5b 31 5d 3b 0a 09 09 09  0]] = ss[1];....
2000: 69 66 28 20 73 73 2e 6c 65 6e 67 74 68 20 3d 3d  if( ss.length ==
2010: 20 34 20 26 26 20 73 73 5b 30 5d 3d 3d 22 54 72   4 && ss[0]=="Tr
2020: 61 6d 70 6f 6c 69 6e 65 22 20 26 26 20 73 73 5b  ampoline" && ss[
2030: 32 5d 3d 3d 22 74 61 72 67 65 74 73 22 20 29 0a  2]=="targets" ).
2040: 09 09 09 09 74 72 61 6d 70 6f 5b 73 73 5b 31 5d  ....trampo[ss[1]
2050: 5b 30 5d 5d 20 3d 20 73 73 5b 33 5d 5b 30 5d 3b  [0]] = ss[3][0];
2060: 0a 09 09 7d 0a 0a 09 09 72 65 74 75 72 6e 20 6c  ...}....return l
2070: 6f 61 64 28 72 61 77 5f 64 61 74 61 2c 20 70 61  oad(raw_data, pa
2080: 72 61 6d 73 2c 20 74 72 61 6d 70 6f 29 3b 0a 09  rams, trampo);..
2090: 7d 0a 0a 09 73 74 61 74 69 63 20 47 61 6d 65 20  }...static Game 
20a0: 6c 6f 61 64 28 73 74 72 69 6e 67 5b 5d 20 72 61  load(string[] ra
20b0: 77 5f 64 61 74 61 2c 20 73 74 72 69 6e 67 5b 73  w_data, string[s
20c0: 74 72 69 6e 67 5d 20 70 61 72 61 6d 73 2c 20 63  tring] params, c
20d0: 68 61 72 5b 63 68 61 72 5d 20 74 72 61 6d 70 6f  har[char] trampo
20e0: 20 3d 20 6e 75 6c 6c 29 0a 09 7b 0a 09 09 72 65   = null)..{...re
20f0: 74 75 72 6e 20 6e 65 77 20 47 61 6d 65 28 72 61  turn new Game(ra
2100: 77 5f 64 61 74 61 2c 20 70 61 72 61 6d 73 2c 20  w_data, params, 
2110: 74 72 61 6d 70 6f 29 3b 0a 09 7d 0a 0a 09 74 68  trampo);..}...th
2120: 69 73 28 73 74 72 69 6e 67 5b 5d 20 72 61 77 5f  is(string[] raw_
2130: 64 61 74 61 2c 20 73 74 72 69 6e 67 5b 73 74 72  data, string[str
2140: 69 6e 67 5d 20 70 61 72 61 6d 73 2c 20 63 68 61  ing] params, cha
2150: 72 5b 63 68 61 72 5d 20 74 72 61 6d 70 6f 29 0a  r[char] trampo).
2160: 09 7b 0a 09 09 74 68 69 73 2e 6d 61 70 20 3d 20  .{...this.map = 
2170: 4d 61 70 2e 6c 6f 61 64 28 72 61 77 5f 64 61 74  Map.load(raw_dat
2180: 61 2c 20 70 61 72 61 6d 73 2c 20 74 72 61 6d 70  a, params, tramp
2190: 6f 29 3b 0a 09 09 74 68 69 73 2e 77 61 74 65 72  o);...this.water
21a0: 20 3d 20 57 61 74 65 72 2e 6c 6f 61 64 28 70 61   = Water.load(pa
21b0: 72 61 6d 73 29 3b 0a 09 7d 0a 0a 09 47 61 6d 65  rams);..}...Game
21c0: 20 63 6c 6f 6e 65 28 29 20 63 6f 6e 73 74 20 7b   clone() const {
21d0: 20 72 65 74 75 72 6e 20 6e 65 77 20 47 61 6d 65   return new Game
21e0: 28 74 68 69 73 29 3b 20 7d 0a 09 74 68 69 73 28  (this); }..this(
21f0: 69 6e 20 47 61 6d 65 20 67 29 20 7b 0a 09 09 6d  in Game g) {...m
2200: 61 70 20 3d 20 67 2e 6d 61 70 2e 63 6c 6f 6e 65  ap = g.map.clone
2210: 28 29 3b 0a 09 09 77 61 74 65 72 20 3d 20 67 2e  ();...water = g.
2220: 77 61 74 65 72 2e 63 6c 6f 6e 65 28 29 3b 0a 09  water.clone();..
2230: 09 74 75 72 6e 20 3d 20 67 2e 74 75 72 6e 3b 0a  .turn = g.turn;.
2240: 09 09 64 65 61 64 20 3d 20 67 2e 64 65 61 64 3b  ..dead = g.dead;
2250: 0a 09 09 6c 61 6d 62 64 61 20 3d 20 67 2e 6c 61  ...lambda = g.la
2260: 6d 62 64 61 3b 0a 09 09 63 6c 65 61 72 65 64 20  mbda;...cleared 
2270: 3d 20 67 2e 63 6c 65 61 72 65 64 3b 0a 09 09 75  = g.cleared;...u
2280: 6e 64 65 72 5f 77 61 74 65 72 20 3d 20 67 2e 75  nder_water = g.u
2290: 6e 64 65 72 5f 77 61 74 65 72 3b 0a 09 7d 0a 0a  nder_water;..}..
22a0: 09 76 6f 69 64 20 63 6f 6d 6d 61 6e 64 28 63 68  .void command(ch
22b0: 61 72 20 63 29 0a 09 7b 0a 09 09 61 73 73 65 72  ar c)..{...asser
22c0: 74 28 63 20 21 3d 20 27 41 27 29 3b 0a 09 09 69  t(c != 'A');...i
22d0: 66 28 64 65 61 64 20 7c 7c 20 63 6c 65 61 72 65  f(dead || cleare
22e0: 64 29 0a 09 09 09 72 65 74 75 72 6e 3b 0a 0a 09  d)....return;...
22f0: 09 2f 2f 20 54 4f 44 4f 3a 20 63 6c 61 72 69 66  .// TODO: clarif
2300: 79 20 74 68 65 20 65 76 65 6e 74 20 6f 72 64 65  y the event orde
2310: 72 0a 09 09 54 75 70 6c 65 21 28 69 6e 74 2c 62  r...Tuple!(int,b
2320: 6f 6f 6c 29 20 6c 64 20 3d 20 6d 61 70 2e 63 6f  ool) ld = map.co
2330: 6d 6d 61 6e 64 28 63 2c 20 74 75 72 6e 29 3b 0a  mmand(c, turn);.
2340: 09 09 69 66 28 20 6d 61 70 2e 63 6c 65 61 72 65  ..if( map.cleare
2350: 64 28 29 20 29 20 7b 0a 09 09 09 63 6c 65 61 72  d() ) {....clear
2360: 65 64 20 3d 20 74 72 75 65 3b 0a 09 09 7d 0a 09  ed = true;...}..
2370: 09 65 6c 73 65 20 7b 0a 09 09 09 6c 61 6d 62 64  .else {....lambd
2380: 61 20 2b 3d 20 6c 64 5b 30 5d 3b 0a 09 09 09 69  a += ld[0];....i
2390: 66 28 20 6c 64 5b 31 5d 20 29 0a 09 09 09 09 64  f( ld[1] ).....d
23a0: 65 61 64 20 3d 20 74 72 75 65 3b 0a 09 09 7d 0a  ead = true;...}.
23b0: 09 09 69 66 28 21 63 6c 65 61 72 65 64 29 20 7b  ..if(!cleared) {
23c0: 0a 09 09 09 69 66 28 20 6d 61 70 2e 72 6f 62 6f  ....if( map.robo
23d0: 74 2e 79 20 3c 3d 20 77 61 74 65 72 5f 6c 65 76  t.y <= water_lev
23e0: 65 6c 20 29 0a 09 09 09 09 2b 2b 75 6e 64 65 72  el ).....++under
23f0: 5f 77 61 74 65 72 3b 0a 09 09 09 65 6c 73 65 0a  _water;....else.
2400: 09 09 09 09 75 6e 64 65 72 5f 77 61 74 65 72 20  ....under_water 
2410: 3d 20 30 3b 0a 09 09 09 69 66 28 20 75 6e 64 65  = 0;....if( unde
2420: 72 5f 77 61 74 65 72 20 3e 20 6d 61 70 2e 77 61  r_water > map.wa
2430: 74 65 72 70 72 6f 6f 66 20 29 0a 09 09 09 09 64  terproof ).....d
2440: 65 61 64 20 3d 20 74 72 75 65 3b 0a 09 09 7d 0a  ead = true;...}.
2450: 09 09 74 75 72 6e 20 2b 3d 20 31 3b 0a 09 7d 0a  ..turn += 1;..}.
2460: 0a 09 4d 61 70 20 6d 61 70 3b 0a 09 57 61 74 65  ..Map map;..Wate
2470: 72 20 77 61 74 65 72 3b 0a 09 69 6e 74 20 20 74  r water;..int  t
2480: 75 72 6e 20 3d 20 30 3b 0a 09 62 6f 6f 6c 20 64  urn = 0;..bool d
2490: 65 61 64 20 3d 20 66 61 6c 73 65 3b 0a 09 69 6e  ead = false;..in
24a0: 74 20 20 6c 61 6d 62 64 61 20 3d 20 30 3b 0a 09  t  lambda = 0;..
24b0: 69 6e 74 20 20 75 6e 64 65 72 5f 77 61 74 65 72  int  under_water
24c0: 20 3d 20 30 3b 0a 09 62 6f 6f 6c 20 63 6c 65 61   = 0;..bool clea
24d0: 72 65 64 20 3d 20 66 61 6c 73 65 3b 0a 09 2f 2f  red = false;..//
24e0: 20 54 4f 44 4f 3a 20 77 68 65 6e 20 61 64 64 69   TODO: when addi
24f0: 6e 67 20 6d 65 6d 62 65 72 73 2c 20 74 61 6b 65  ng members, take
2500: 20 63 61 72 65 20 6f 66 20 63 6c 6f 6e 65 28 29   care of clone()
2510: 2e 0a 09 2f 2f 20 54 4f 44 4f 3a 20 66 69 78 20  ...// TODO: fix 
2520: 74 68 69 73 20 70 6f 6f 72 20 64 65 73 69 67 6e  this poor design
2530: 2e 0a 0a 09 40 70 72 6f 70 65 72 74 79 20 63 6f  ....@property co
2540: 6e 73 74 20 7b 0a 09 09 6c 6f 6e 67 20 73 63 6f  nst {...long sco
2550: 72 65 28 29 20 7b 20 72 65 74 75 72 6e 20 6c 61  re() { return la
2560: 6d 62 64 61 2a 28 64 65 61 64 20 3f 20 32 35 4c  mbda*(dead ? 25L
2570: 20 3a 20 63 6c 65 61 72 65 64 20 3f 20 37 35 4c   : cleared ? 75L
2580: 20 3a 20 35 30 4c 29 20 2d 20 74 75 72 6e 3b 20   : 50L) - turn; 
2590: 7d 0a 09 09 69 6e 74 20 77 61 74 65 72 5f 6c 65  }...int water_le
25a0: 76 65 6c 28 29 20 7b 20 72 65 74 75 72 6e 20 77  vel() { return w
25b0: 61 74 65 72 2e 6c 65 76 65 6c 28 74 75 72 6e 29  ater.level(turn)
25c0: 3b 20 7d 0a 09 09 69 6e 74 20 77 61 74 65 72 5f  ; }...int water_
25d0: 75 6e 74 69 6c 5f 72 69 73 65 28 29 20 7b 20 72  until_rise() { r
25e0: 65 74 75 72 6e 20 77 61 74 65 72 2e 75 6e 74 69  eturn water.unti
25f0: 6c 5f 72 69 73 65 28 74 75 72 6e 29 3b 20 7d 0a  l_rise(turn); }.
2600: 09 09 69 6e 74 20 68 69 67 65 5f 75 6e 74 69 6c  ..int hige_until
2610: 5f 72 69 73 65 28 29 20 7b 20 72 65 74 75 72 6e  _rise() { return
2620: 20 6d 61 70 2e 68 69 67 65 2e 75 6e 74 69 6c 5f   map.hige.until_
2630: 72 69 73 65 28 74 75 72 6e 29 3b 20 7d 0a 09 09  rise(turn); }...
2640: 69 6e 74 20 68 70 28 29 20 7b 20 72 65 74 75 72  int hp() { retur
2650: 6e 20 6d 61 70 2e 77 61 74 65 72 70 72 6f 6f 66  n map.waterproof
2660: 20 2d 20 75 6e 64 65 72 5f 77 61 74 65 72 3b 20   - under_water; 
2670: 7d 0a 09 7d 0a 7d 0a                             }..}.}.