Hex Artifact Content
Not logged in

Artifact 32e0c6f4fbd77c98dddff188a6ec798a83585e94:


0000: 69 6d 70 6f 72 74 20 64 66 6c 2e 61 6c 6c 3b 0a  import dfl.all;.
0010: 69 6d 70 6f 72 74 20 75 74 69 6c 3b 0a 69 6d 70  import util;.imp
0020: 6f 72 74 20 67 61 6d 65 3b 0a 69 6d 70 6f 72 74  ort game;.import
0030: 20 64 72 69 76 65 72 3b 0a 0a 63 6c 61 73 73 20   driver;..class 
0040: 47 55 49 28 53 6f 6c 76 65 72 29 20 3a 20 46 6f  GUI(Solver) : Fo
0050: 72 6d 2c 20 47 61 6d 65 4f 62 73 65 72 76 65 72  rm, GameObserver
0060: 0a 7b 0a 09 74 68 69 73 28 69 6e 20 47 61 6d 65  .{..this(in Game
0070: 20 67 29 0a 09 7b 0a 09 09 74 68 69 73 2e 73 6f   g)..{...this.so
0080: 6c 76 65 72 20 3d 20 6e 65 77 20 53 6f 6c 76 65  lver = new Solve
0090: 72 28 67 29 3b 0a 09 09 73 65 74 75 70 5f 73 69  r(g);...setup_si
00a0: 7a 65 28 67 2e 6d 61 70 2e 57 2c 20 67 2e 6d 61  ze(g.map.W, g.ma
00b0: 70 2e 48 29 3b 0a 09 09 73 65 74 75 70 5f 72 65  p.H);...setup_re
00c0: 73 6f 75 72 63 65 73 28 67 29 3b 0a 09 09 64 72  sources(g);...dr
00d0: 61 77 28 67 29 3b 0a 09 7d 0a 0a 09 70 72 69 76  aw(g);..}...priv
00e0: 61 74 65 20 76 6f 69 64 20 64 65 6c 65 67 61 74  ate void delegat
00f0: 65 28 63 68 61 72 20 63 29 20 66 6e 3b 0a 09 76  e(char c) fn;..v
0100: 6f 69 64 20 73 65 74 5f 66 6e 28 46 29 28 46 20  oid set_fn(F)(F 
0110: 66 29 20 7b 20 74 68 69 73 2e 66 6e 20 3d 20 66  f) { this.fn = f
0120: 3b 20 7d 0a 0a 09 76 6f 69 64 20 72 75 6e 28 62  ; }...void run(b
0130: 6f 6f 6c 20 61 75 74 6f 6d 61 74 65 20 3d 20 66  ool automate = f
0140: 61 6c 73 65 29 0a 09 7b 0a 09 09 69 66 28 61 75  alse)..{...if(au
0150: 74 6f 6d 61 74 65 29 20 7b 0a 09 09 09 54 69 6d  tomate) {....Tim
0160: 65 72 20 74 20 3d 20 6e 65 77 20 54 69 6d 65 72  er t = new Timer
0170: 3b 0a 09 09 09 74 2e 69 6e 74 65 72 76 61 6c 20  ;....t.interval 
0180: 3d 20 35 30 3b 0a 09 09 09 74 2e 74 69 63 6b 20  = 50;....t.tick 
0190: 7e 3d 20 28 54 69 6d 65 72 20 73 65 6e 64 65 72  ~= (Timer sender
01a0: 2c 20 45 76 65 6e 74 41 72 67 73 20 65 61 29 7b  , EventArgs ea){
01b0: 0a 09 09 09 09 66 6e 28 73 6f 6c 76 65 72 2e 73  .....fn(solver.s
01c0: 69 6e 67 6c 65 5f 73 74 65 70 28 29 29 3b 0a 09  ingle_step());..
01d0: 09 09 7d 3b 0a 09 09 09 74 2e 73 74 61 72 74 28  ..};....t.start(
01e0: 29 3b 0a 09 09 09 74 68 69 73 2e 63 6c 6f 73 69  );....this.closi
01f0: 6e 67 20 7e 3d 20 28 46 6f 72 6d 20 66 2c 43 61  ng ~= (Form f,Ca
0200: 6e 63 65 6c 45 76 65 6e 74 41 72 67 73 20 63 29  ncelEventArgs c)
0210: 7b 74 2e 73 74 6f 70 28 29 3b 7d 3b 0a 09 09 7d  {t.stop();};...}
0220: 20 65 6c 73 65 20 7b 0a 09 09 09 73 65 74 75 70   else {....setup
0230: 5f 6b 65 79 68 61 6e 64 6c 69 6e 67 28 29 3b 0a  _keyhandling();.
0240: 09 09 7d 0a 09 09 41 70 70 6c 69 63 61 74 69 6f  ..}...Applicatio
0250: 6e 2e 72 75 6e 28 74 68 69 73 29 3b 0a 09 7d 0a  n.run(this);..}.
0260: 0a 09 6f 76 65 72 72 69 64 65 20 76 6f 69 64 20  ..override void 
0270: 6f 6e 5f 67 61 6d 65 5f 63 68 61 6e 67 65 64 28  on_game_changed(
0280: 63 68 61 72 20 63 2c 20 69 6e 20 47 61 6d 65 20  char c, in Game 
0290: 67 2c 20 62 6f 6f 6c 20 66 69 6e 69 73 68 65 64  g, bool finished
02a0: 29 0a 09 7b 0a 09 09 64 72 61 77 28 67 29 3b 0a  )..{...draw(g);.
02b0: 09 7d 0a 0a 70 72 69 76 61 74 65 3a 0a 09 69 6e  .}..private:..in
02c0: 74 20 63 65 6c 6c 3b 0a 0a 09 76 6f 69 64 20 73  t cell;...void s
02d0: 65 74 75 70 5f 73 69 7a 65 28 69 6e 74 20 57 2c  etup_size(int W,
02e0: 20 69 6e 74 20 48 29 0a 09 7b 0a 09 09 74 68 69   int H)..{...thi
02f0: 73 2e 66 6f 72 6d 42 6f 72 64 65 72 53 74 79 6c  s.formBorderStyl
0300: 65 20 3d 20 46 6f 72 6d 42 6f 72 64 65 72 53 74  e = FormBorderSt
0310: 79 6c 65 2e 46 49 58 45 44 5f 44 49 41 4c 4f 47  yle.FIXED_DIALOG
0320: 3b 0a 09 09 74 68 69 73 2e 6d 61 78 69 6d 69 7a  ;...this.maximiz
0330: 65 42 6f 78 20 3d 20 66 61 6c 73 65 3b 0a 09 09  eBox = false;...
0340: 74 68 69 73 2e 6d 69 6e 69 6d 69 7a 65 42 6f 78  this.minimizeBox
0350: 20 3d 20 66 61 6c 73 65 3b 0a 09 09 74 68 69 73   = false;...this
0360: 2e 63 65 6c 6c 20 3d 20 6d 69 6e 28 31 30 32 34  .cell = min(1024
0370: 2f 57 2c 20 36 34 30 2f 48 29 3b 0a 09 09 74 68  /W, 640/H);...th
0380: 69 73 2e 63 6c 69 65 6e 74 53 69 7a 65 20 3d 20  is.clientSize = 
0390: 53 69 7a 65 28 57 2a 63 65 6c 6c 2c 20 48 2a 63  Size(W*cell, H*c
03a0: 65 6c 6c 29 3b 0a 09 7d 0a 0a 09 46 6f 6e 74 20  ell);..}...Font 
03b0: 20 20 20 20 20 20 20 20 66 6f 6e 74 3b 0a 09 43          font;..C
03c0: 6f 6c 6f 72 5b 63 68 61 72 5d 20 20 63 6f 6c 6f  olor[char]  colo
03d0: 72 73 3b 0a 09 73 74 72 69 6e 67 5b 63 68 61 72  rs;..string[char
03e0: 5d 20 72 65 6e 64 65 72 3b 0a 09 47 72 61 70 68  ] render;..Graph
03f0: 69 63 73 20 20 20 20 20 67 72 61 70 68 69 63 43  ics     graphicC
0400: 6f 6e 74 65 78 74 3b 0a 0a 09 76 6f 69 64 20 73  ontext;...void s
0410: 65 74 75 70 5f 72 65 73 6f 75 72 63 65 73 28 69  etup_resources(i
0420: 6e 20 47 61 6d 65 20 67 29 0a 09 7b 0a 09 09 74  n Game g)..{...t
0430: 68 69 73 2e 67 72 61 70 68 69 63 43 6f 6e 74 65  his.graphicConte
0440: 78 74 20 3d 20 6e 65 77 20 4d 65 6d 6f 72 79 47  xt = new MemoryG
0450: 72 61 70 68 69 63 73 28 74 68 69 73 2e 63 6c 69  raphics(this.cli
0460: 65 6e 74 53 69 7a 65 2e 77 69 64 74 68 2c 20 74  entSize.width, t
0470: 68 69 73 2e 63 6c 69 65 6e 74 53 69 7a 65 2e 68  his.clientSize.h
0480: 65 69 67 68 74 29 3b 0a 09 09 74 68 69 73 2e 73  eight);...this.s
0490: 65 74 53 74 79 6c 65 28 43 6f 6e 74 72 6f 6c 53  etStyle(ControlS
04a0: 74 79 6c 65 73 2e 4f 50 41 51 55 45 2c 20 74 72  tyles.OPAQUE, tr
04b0: 75 65 29 3b 0a 09 09 74 68 69 73 2e 66 6f 6e 74  ue);...this.font
04c0: 20 3d 20 6e 65 77 20 46 6f 6e 74 28 22 4d 53 20   = new Font("MS 
04d0: 47 6f 74 68 69 63 22 2c 20 63 65 6c 6c 2d 32 2c  Gothic", cell-2,
04e0: 20 47 72 61 70 68 69 63 73 55 6e 69 74 2e 50 49   GraphicsUnit.PI
04f0: 58 45 4c 29 3b 0a 09 09 74 68 69 73 2e 62 61 63  XEL);...this.bac
0500: 6b 43 6f 6c 6f 72 20 3d 20 43 6f 6c 6f 72 28 32  kColor = Color(2
0510: 35 35 2c 32 35 35 2c 32 35 35 29 3b 0a 09 09 74  55,255,255);...t
0520: 68 69 73 2e 63 6f 6c 6f 72 73 5b 27 23 27 5d 20  his.colors['#'] 
0530: 3d 0a 09 09 74 68 69 73 2e 63 6f 6c 6f 72 73 5b  =...this.colors[
0540: 27 2e 27 5d 20 3d 20 43 6f 6c 6f 72 28 32 35 35  '.'] = Color(255
0550: 2c 31 39 31 2c 31 32 37 29 3b 0a 09 09 74 68 69  ,191,127);...thi
0560: 73 2e 63 6f 6c 6f 72 73 5b 27 2a 27 5d 20 3d 20  s.colors['*'] = 
0570: 43 6f 6c 6f 72 28 32 35 35 2c 31 32 37 2c 31 32  Color(255,127,12
0580: 37 29 3b 0a 09 09 74 68 69 73 2e 63 6f 6c 6f 72  7);...this.color
0590: 73 5b 27 52 27 5d 20 3d 20 43 6f 6c 6f 72 28 31  s['R'] = Color(1
05a0: 32 38 2c 31 32 38 2c 30 29 3b 0a 09 09 74 68 69  28,128,0);...thi
05b0: 73 2e 63 6f 6c 6f 72 73 5b 27 44 27 5d 20 3d 20  s.colors['D'] = 
05c0: 43 6f 6c 6f 72 28 32 35 35 2c 30 2c 30 29 3b 0a  Color(255,0,0);.
05d0: 09 09 74 68 69 73 2e 63 6f 6c 6f 72 73 5b 27 5c  ..this.colors['\
05e0: 5c 27 5d 20 3d 0a 09 09 74 68 69 73 2e 63 6f 6c  \'] =...this.col
05f0: 6f 72 73 5b 27 4c 27 5d 20 3d 0a 09 09 74 68 69  ors['L'] =...thi
0600: 73 2e 63 6f 6c 6f 72 73 5b 27 4f 27 5d 20 3d 20  s.colors['O'] = 
0610: 43 6f 6c 6f 72 28 31 32 37 2c 32 35 35 2c 31 32  Color(127,255,12
0620: 37 29 3b 0a 09 09 74 68 69 73 2e 63 6f 6c 6f 72  7);...this.color
0630: 73 5b 27 57 27 5d 20 3d 20 43 6f 6c 6f 72 28 32  s['W'] = Color(2
0640: 30 34 2c 32 32 39 2c 32 35 35 29 3b 0a 09 09 66  04,229,255);...f
0650: 6f 72 65 61 63 68 28 63 68 61 72 20 63 3b 20 27  oreach(char c; '
0660: 41 27 2e 2e 27 4a 27 29 20 74 68 69 73 2e 63 6f  A'..'J') this.co
0670: 6c 6f 72 73 5b 63 5d 20 3d 20 43 6f 6c 6f 72 28  lors[c] = Color(
0680: 31 34 32 2c 31 34 32 2c 32 35 35 29 3b 0a 09 09  142,142,255);...
0690: 66 6f 72 65 61 63 68 28 63 68 61 72 20 63 3b 20  foreach(char c; 
06a0: 27 31 27 2e 2e 27 3a 27 29 20 74 68 69 73 2e 63  '1'..':') this.c
06b0: 6f 6c 6f 72 73 5b 63 5d 20 3d 20 43 6f 6c 6f 72  olors[c] = Color
06c0: 28 32 35 35 2c 31 34 32 2c 32 35 35 29 3b 0a 09  (255,142,255);..
06d0: 09 74 68 69 73 2e 72 65 6e 64 65 72 5b 27 23 27  .this.render['#'
06e0: 5d 20 3d 20 22 e2 96 a0 22 3b 0a 09 09 74 68 69  ] = "...";...thi
06f0: 73 2e 72 65 6e 64 65 72 5b 27 2a 27 5d 20 3d 20  s.render['*'] = 
0700: 22 e2 9c b9 22 3b 0a 09 09 74 68 69 73 2e 72 65  "...";...this.re
0710: 6e 64 65 72 5b 27 2e 27 5d 20 3d 20 22 e2 99 92  nder['.'] = "...
0720: 22 3b 0a 09 09 74 68 69 73 2e 72 65 6e 64 65 72  ";...this.render
0730: 5b 27 5c 5c 27 5d 20 3d 20 22 ce bb 22 3b 0a 09  ['\\'] = "..";..
0740: 09 74 68 69 73 2e 72 65 6e 64 65 72 5b 27 52 27  .this.render['R'
0750: 5d 20 3d 20 22 e2 98 83 22 3b 0a 09 09 74 68 69  ] = "...";...thi
0760: 73 2e 72 65 6e 64 65 72 5b 27 44 27 5d 20 3d 20  s.render['D'] = 
0770: 22 e2 98 a0 22 3b 0a 09 09 74 68 69 73 2e 72 65  "...";...this.re
0780: 6e 64 65 72 5b 27 4c 27 5d 20 3d 20 22 e2 98 92  nder['L'] = "...
0790: 22 3b 0a 09 09 74 68 69 73 2e 72 65 6e 64 65 72  ";...this.render
07a0: 5b 27 4f 27 5d 20 3d 20 22 e2 98 90 22 3b 0a 09  ['O'] = "...";..
07b0: 09 66 6f 72 65 61 63 68 28 63 2c 74 70 3b 20 67  .foreach(c,tp; g
07c0: 2e 6d 61 70 2e 74 72 5f 74 61 72 67 65 74 29 20  .map.tr_target) 
07d0: 7b 0a 09 09 09 63 68 61 72 20 64 20 3d 20 67 2e  {....char d = g.
07e0: 6d 61 70 5b 74 70 5d 3b 0a 09 09 09 74 68 69 73  map[tp];....this
07f0: 2e 72 65 6e 64 65 72 5b 63 5d 20 3d 20 5b 63 61  .render[c] = [ca
0800: 73 74 28 64 63 68 61 72 29 28 27 e3 8b 80 27 2b  st(dchar)('...'+
0810: 64 2d 27 31 27 29 5d 2e 74 6f 21 73 74 72 69 6e  d-'1')].to!strin
0820: 67 28 29 3b 0a 09 09 7d 0a 09 09 66 6f 72 65 61  g();...}...forea
0830: 63 68 28 63 68 61 72 20 63 3b 20 27 31 27 2e 2e  ch(char c; '1'..
0840: 27 3a 27 29 20 74 68 69 73 2e 72 65 6e 64 65 72  ':') this.render
0850: 5b 63 5d 20 3d 20 5b 63 61 73 74 28 64 63 68 61  [c] = [cast(dcha
0860: 72 29 28 27 e3 8f a0 27 2b 63 2d 27 31 27 29 5d  r)('...'+c-'1')]
0870: 2e 74 6f 21 73 74 72 69 6e 67 28 29 3b 0a 09 09  .to!string();...
0880: 74 68 69 73 2e 70 61 69 6e 74 20 7e 3d 20 28 43  this.paint ~= (C
0890: 6f 6e 74 72 6f 6c 20 63 2c 20 50 61 69 6e 74 45  ontrol c, PaintE
08a0: 76 65 6e 74 41 72 67 73 20 65 76 29 20 7b 0a 09  ventArgs ev) {..
08b0: 09 09 67 72 61 70 68 69 63 43 6f 6e 74 65 78 74  ..graphicContext
08c0: 2e 63 6f 70 79 54 6f 28 65 76 2e 67 72 61 70 68  .copyTo(ev.graph
08d0: 69 63 73 2c 20 52 65 63 74 28 30 2c 30 2c 74 68  ics, Rect(0,0,th
08e0: 69 73 2e 63 6c 69 65 6e 74 53 69 7a 65 2e 77 69  is.clientSize.wi
08f0: 64 74 68 2c 74 68 69 73 2e 63 6c 69 65 6e 74 53  dth,this.clientS
0900: 69 7a 65 2e 68 65 69 67 68 74 29 29 3b 0a 09 09  ize.height));...
0910: 7d 3b 0a 09 7d 0a 0a 09 76 6f 69 64 20 64 72 61  };..}...void dra
0920: 77 28 69 6e 20 47 61 6d 65 20 67 29 0a 09 7b 0a  w(in Game g)..{.
0930: 09 09 69 6e 74 20 73 63 72 57 20 3d 20 74 68 69  ..int scrW = thi
0940: 73 2e 63 6c 69 65 6e 74 53 69 7a 65 2e 77 69 64  s.clientSize.wid
0950: 74 68 3b 0a 09 09 69 6e 74 20 73 63 72 48 20 3d  th;...int scrH =
0960: 20 74 68 69 73 2e 63 6c 69 65 6e 74 53 69 7a 65   this.clientSize
0970: 2e 68 65 69 67 68 74 3b 0a 0a 09 09 2f 2f 20 46  .height;....// F
0980: 69 6c 6c 20 62 67 2e 0a 09 09 67 72 61 70 68 69  ill bg....graphi
0990: 63 43 6f 6e 74 65 78 74 2e 66 69 6c 6c 52 65 63  cContext.fillRec
09a0: 74 61 6e 67 6c 65 28 74 68 69 73 2e 62 61 63 6b  tangle(this.back
09b0: 43 6f 6c 6f 72 2c 20 52 65 63 74 28 30 2c 30 2c  Color, Rect(0,0,
09c0: 73 63 72 57 2c 73 63 72 48 29 29 3b 0a 0a 09 09  scrW,scrH));....
09d0: 2f 2f 20 46 69 6c 6c 20 77 61 74 65 72 2e 0a 09  // Fill water...
09e0: 09 69 6e 74 20 77 20 3d 20 67 2e 77 61 74 65 72  .int w = g.water
09f0: 5f 6c 65 76 65 6c 28 29 3b 0a 09 09 67 72 61 70  _level();...grap
0a00: 68 69 63 43 6f 6e 74 65 78 74 2e 66 69 6c 6c 52  hicContext.fillR
0a10: 65 63 74 61 6e 67 6c 65 28 74 68 69 73 2e 63 6f  ectangle(this.co
0a20: 6c 6f 72 73 5b 27 57 27 5d 2c 20 52 65 63 74 28  lors['W'], Rect(
0a30: 30 2c 20 73 63 72 48 2d 63 65 6c 6c 2a 77 2d 31  0, scrH-cell*w-1
0a40: 2c 20 73 63 72 57 2c 20 63 65 6c 6c 2a 77 2b 31  , scrW, cell*w+1
0a50: 29 29 3b 0a 0a 09 09 2f 2f 20 50 61 69 6e 74 20  ));....// Paint 
0a60: 6d 61 70 2e 0a 09 09 66 6f 72 28 69 6e 74 20 79  map....for(int y
0a70: 3d 31 3b 20 79 3c 3d 67 2e 6d 61 70 2e 48 3b 20  =1; y<=g.map.H; 
0a80: 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e 74 20 78  ++y)...for(int x
0a90: 3d 31 3b 20 78 3c 3d 67 2e 6d 61 70 2e 57 3b 20  =1; x<=g.map.W; 
0aa0: 2b 2b 78 29 20 7b 0a 09 09 09 52 65 63 74 20 72  ++x) {....Rect r
0ab0: 20 3d 20 52 65 63 74 28 63 65 6c 6c 2a 28 78 2d   = Rect(cell*(x-
0ac0: 31 29 2c 20 73 63 72 48 2d 63 65 6c 6c 2a 79 2c  1), scrH-cell*y,
0ad0: 20 63 65 6c 6c 2c 20 63 65 6c 6c 29 3b 0a 09 09   cell, cell);...
0ae0: 09 63 68 61 72 20 63 20 3d 20 67 2e 6d 61 70 5b  .char c = g.map[
0af0: 79 2c 78 5d 3b 0a 09 09 09 69 66 28 20 63 20 21  y,x];....if( c !
0b00: 3d 20 27 20 27 20 29 20 7b 0a 09 09 09 09 69 66  = ' ' ) {.....if
0b10: 28 20 63 20 3d 3d 20 27 52 27 20 26 26 20 67 2e  ( c == 'R' && g.
0b20: 64 65 61 64 20 29 0a 09 09 09 09 09 63 20 3d 20  dead )......c = 
0b30: 27 44 27 3b 0a 09 09 09 09 67 72 61 70 68 69 63  'D';.....graphic
0b40: 43 6f 6e 74 65 78 74 2e 64 72 61 77 54 65 78 74  Context.drawText
0b50: 28 74 68 69 73 2e 72 65 6e 64 65 72 5b 63 5d 2c  (this.render[c],
0b60: 20 66 6f 6e 74 2c 20 74 68 69 73 2e 63 6f 6c 6f   font, this.colo
0b70: 72 73 5b 63 5d 2c 20 72 29 3b 0a 09 09 09 7d 0a  rs[c], r);....}.
0b80: 09 09 7d 0a 0a 09 09 2f 2f 20 55 70 64 61 74 65  ..}....// Update
0b90: 20 74 65 78 74 75 61 6c 20 69 6e 66 6f 2e 0a 09   textual info...
0ba0: 09 74 68 69 73 2e 74 65 78 74 20 3d 20 2e 74 65  .this.text = .te
0bb0: 78 74 28 22 53 63 6f 72 65 3a 20 22 2c 20 67 2e  xt("Score: ", g.
0bc0: 73 63 6f 72 65 2c 20 22 20 41 69 72 3a 20 22 2c  score, " Air: ",
0bd0: 20 67 2e 68 70 2c 20 22 20 54 69 64 65 3a 20 22   g.hp, " Tide: "
0be0: 2c 20 67 2e 77 61 74 65 72 5f 75 6e 74 69 6c 5f  , g.water_until_
0bf0: 72 69 73 65 29 3b 0a 09 09 69 6e 76 61 6c 69 64  rise);...invalid
0c00: 61 74 65 28 29 3b 0a 09 7d 0a 0a 70 72 69 76 61  ate();..}..priva
0c10: 74 65 3a 0a 09 76 6f 69 64 20 73 65 74 75 70 5f  te:..void setup_
0c20: 6b 65 79 68 61 6e 64 6c 69 6e 67 28 29 0a 09 7b  keyhandling()..{
0c30: 0a 09 09 6e 6f 4d 65 73 73 61 67 65 46 69 6c 74  ...noMessageFilt
0c40: 65 72 28 29 3b 0a 09 09 74 68 69 73 2e 6b 65 79  er();...this.key
0c50: 44 6f 77 6e 20 7e 3d 20 26 6d 79 5f 6b 65 79 64  Down ~= &my_keyd
0c60: 6f 77 6e 3b 0a 09 7d 0a 0a 09 76 6f 69 64 20 6d  own;..}...void m
0c70: 79 5f 6b 65 79 64 6f 77 6e 28 43 6f 6e 74 72 6f  y_keydown(Contro
0c80: 6c 20 63 2c 20 4b 65 79 45 76 65 6e 74 41 72 67  l c, KeyEventArg
0c90: 73 20 65 76 29 0a 09 7b 0a 09 09 73 77 69 74 63  s ev)..{...switc
0ca0: 68 28 65 76 2e 6b 65 79 43 6f 64 65 29 0a 09 09  h(ev.keyCode)...
0cb0: 7b 0a 09 09 63 61 73 65 20 4b 65 79 73 2e 44 4f  {...case Keys.DO
0cc0: 57 4e 3a 20 20 66 6e 28 27 44 27 29 3b 20 62 72  WN:  fn('D'); br
0cd0: 65 61 6b 3b 0a 09 09 63 61 73 65 20 4b 65 79 73  eak;...case Keys
0ce0: 2e 55 50 3a 20 20 20 20 66 6e 28 27 55 27 29 3b  .UP:    fn('U');
0cf0: 20 62 72 65 61 6b 3b 0a 09 09 63 61 73 65 20 4b   break;...case K
0d00: 65 79 73 2e 4c 45 46 54 3a 20 20 66 6e 28 27 4c  eys.LEFT:  fn('L
0d10: 27 29 3b 20 62 72 65 61 6b 3b 0a 09 09 63 61 73  '); break;...cas
0d20: 65 20 4b 65 79 73 2e 52 49 47 48 54 3a 20 66 6e  e Keys.RIGHT: fn
0d30: 28 27 52 27 29 3b 20 62 72 65 61 6b 3b 0a 09 09  ('R'); break;...
0d40: 63 61 73 65 20 4b 65 79 73 2e 57 3a 20 20 20 20  case Keys.W:    
0d50: 20 66 6e 28 27 57 27 29 3b 20 62 72 65 61 6b 3b   fn('W'); break;
0d60: 0a 09 09 63 61 73 65 20 4b 65 79 73 2e 41 3a 20  ...case Keys.A: 
0d70: 20 20 20 20 66 6e 28 27 41 27 29 3b 20 62 72 65      fn('A'); bre
0d80: 61 6b 3b 0a 09 09 63 61 73 65 20 4b 65 79 73 2e  ak;...case Keys.
0d90: 47 3a 20 20 20 20 20 66 6e 28 73 6f 6c 76 65 72  G:     fn(solver
0da0: 2e 73 69 6e 67 6c 65 5f 73 74 65 70 28 29 29 3b  .single_step());
0db0: 20 62 72 65 61 6b 3b 0a 09 09 64 65 66 61 75 6c   break;...defaul
0dc0: 74 3a 20 20 20 20 20 20 20 20 20 62 72 65 61 6b  t:         break
0dd0: 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 53 6f 6c 76 65  ;...}..}...Solve
0de0: 72 20 73 6f 6c 76 65 72 3b 0a 7d 0a              r solver;.}.