0000: 69 6d 70 6f 72 74 20 73 74 64 2e 61 6c 67 6f 72 import std.algor
0010: 69 74 68 6d 3b 0a 69 6d 70 6f 72 74 20 73 74 64 ithm;.import std
0020: 2e 61 72 72 61 79 3b 0a 69 6d 70 6f 72 74 20 73 .array;.import s
0030: 74 64 2e 63 6f 6e 76 3b 0a 69 6d 70 6f 72 74 20 td.conv;.import
0040: 73 74 64 2e 73 74 64 69 6f 3b 0a 69 6d 70 6f 72 std.stdio;.impor
0050: 74 20 73 74 64 2e 73 74 72 69 6e 67 3b 0a 69 6d t std.string;.im
0060: 70 6f 72 74 20 64 66 6c 2e 61 6c 6c 3b 0a 0a 63 port dfl.all;..c
0070: 6c 61 73 73 20 4d 61 70 0a 7b 0a 09 70 72 69 76 lass Map.{..priv
0080: 61 74 65 20 63 68 61 72 5b 5d 5b 5d 20 64 61 74 ate char[][] dat
0090: 61 3b 0a 0a 09 74 68 69 73 28 46 69 6c 65 20 69 a;...this(File i
00a0: 6e 70 75 74 29 0a 09 7b 0a 09 09 66 6f 72 65 61 nput)..{...forea
00b0: 63 68 28 73 3b 20 69 6e 70 75 74 2e 62 79 4c 69 ch(s; input.byLi
00c0: 6e 65 28 29 29 0a 09 09 09 64 61 74 61 20 7e 3d ne())....data ~=
00d0: 20 73 2e 63 68 6f 6d 70 2e 64 75 70 3b 0a 0a 09 s.chomp.dup;...
00e0: 09 69 6e 74 20 77 69 64 74 68 20 3d 20 30 3b 0a .int width = 0;.
00f0: 09 09 66 6f 72 65 61 63 68 28 73 3b 20 64 61 74 ..foreach(s; dat
0100: 61 29 0a 09 09 09 77 69 64 74 68 20 3d 20 6d 61 a)....width = ma
0110: 78 28 77 69 64 74 68 2c 20 73 2e 6c 65 6e 67 74 x(width, s.lengt
0120: 68 29 3b 0a 0a 09 09 2f 2f 20 73 70 61 63 65 20 h);....// space
0130: 70 61 64 64 69 6e 67 20 61 6e 64 20 73 65 6e 74 padding and sent
0140: 69 6e 65 6c 73 0a 09 09 66 6f 72 65 61 63 68 28 inels...foreach(
0150: 72 65 66 20 73 3b 20 64 61 74 61 29 20 7b 0a 09 ref s; data) {..
0160: 09 09 69 6e 74 20 70 20 3d 20 73 2e 6c 65 6e 67 ..int p = s.leng
0170: 74 68 3b 0a 09 09 09 73 2e 6c 65 6e 67 74 68 20 th;....s.length
0180: 3d 20 77 69 64 74 68 3b 0a 09 09 09 73 5b 70 2e = width;....s[p.
0190: 2e 24 5d 20 3d 20 27 20 27 3b 0a 09 09 09 73 20 .$] = ' ';....s
01a0: 3d 20 27 23 27 20 7e 20 73 20 7e 20 27 23 27 3b = '#' ~ s ~ '#';
01b0: 0a 09 09 7d 0a 0a 09 09 2f 2f 20 76 65 72 74 69 ...}....// verti
01c0: 63 61 6c 20 73 65 6e 74 69 6e 65 6c 0a 09 09 63 cal sentinel...c
01d0: 68 61 72 5b 5d 20 73 65 6e 20 3d 20 6e 65 77 20 har[] sen = new
01e0: 63 68 61 72 5b 77 69 64 74 68 2b 32 5d 3b 0a 09 char[width+2];..
01f0: 09 73 65 6e 5b 5d 20 3d 20 27 23 27 3b 0a 09 09 .sen[] = '#';...
0200: 64 61 74 61 20 3d 20 73 65 6e 2e 64 75 70 20 7e data = sen.dup ~
0210: 20 64 61 74 61 20 7e 20 73 65 6e 3b 0a 09 7d 0a data ~ sen;..}.
0220: 0a 09 40 70 72 6f 70 65 72 74 79 20 63 6f 6e 73 ..@property cons
0230: 74 0a 09 7b 0a 09 09 69 6e 74 20 57 28 29 20 7b t..{...int W() {
0240: 20 72 65 74 75 72 6e 20 64 61 74 61 5b 30 5d 2e return data[0].
0250: 6c 65 6e 67 74 68 3b 20 7d 0a 09 09 69 6e 74 20 length; }...int
0260: 48 28 29 20 7b 20 72 65 74 75 72 6e 20 64 61 74 H() { return dat
0270: 61 2e 6c 65 6e 67 74 68 3b 20 7d 0a 09 09 73 74 a.length; }...st
0280: 72 69 6e 67 20 74 6f 53 74 72 69 6e 67 28 29 20 ring toString()
0290: 7b 0a 09 09 09 73 74 72 69 6e 67 20 72 65 73 75 {....string resu
02a0: 6c 74 3b 0a 09 09 09 66 6f 72 65 61 63 68 28 69 lt;....foreach(i
02b0: 2c 73 3b 20 64 61 74 61 29 20 7b 0a 09 09 09 09 ,s; data) {.....
02c0: 69 66 28 69 29 20 72 65 73 75 6c 74 20 7e 3d 20 if(i) result ~=
02d0: 27 5c 6e 27 3b 0a 09 09 09 09 72 65 73 75 6c 74 '\n';.....result
02e0: 20 7e 3d 20 73 2e 69 64 75 70 3b 0a 09 09 09 7d ~= s.idup;....}
02f0: 0a 09 09 09 72 65 74 75 72 6e 20 72 65 73 75 6c ....return resul
0300: 74 3b 0a 09 09 7d 0a 09 7d 0a 0a 09 76 6f 69 64 t;...}..}...void
0310: 20 63 6f 6d 6d 61 6e 64 5f 52 28 29 20 7b 20 6d command_R() { m
0320: 6f 76 65 28 30 2c 20 2b 31 29 3b 20 7d 0a 09 76 ove(0, +1); }..v
0330: 6f 69 64 20 63 6f 6d 6d 61 6e 64 5f 4c 28 29 20 oid command_L()
0340: 7b 20 6d 6f 76 65 28 30 2c 20 2d 31 29 3b 20 7d { move(0, -1); }
0350: 0a 09 76 6f 69 64 20 63 6f 6d 6d 61 6e 64 5f 55 ..void command_U
0360: 28 29 20 7b 20 6d 6f 76 65 28 2d 31 2c 20 30 29 () { move(-1, 0)
0370: 3b 20 7d 0a 09 76 6f 69 64 20 63 6f 6d 6d 61 6e ; }..void comman
0380: 64 5f 44 28 29 20 7b 20 6d 6f 76 65 28 2b 31 2c d_D() { move(+1,
0390: 20 30 29 3b 20 7d 0a 09 76 6f 69 64 20 77 61 69 0); }..void wai
03a0: 74 28 29 20 7b 20 75 70 64 61 74 65 28 29 3b 20 t() { update();
03b0: 7d 0a 0a 09 76 6f 69 64 20 6d 6f 76 65 28 69 6e }...void move(in
03c0: 74 20 64 79 2c 20 69 6e 74 20 64 78 29 20 7b 0a t dy, int dx) {.
03d0: 09 09 66 6f 72 65 61 63 68 28 79 2c 73 3b 20 64 ..foreach(y,s; d
03e0: 61 74 61 29 0a 09 09 66 6f 72 65 61 63 68 28 78 ata)...foreach(x
03f0: 2c 63 3b 20 73 29 0a 09 09 09 69 66 28 63 20 3d ,c; s)....if(c =
0400: 3d 20 27 52 27 29 0a 09 09 09 09 72 65 74 75 72 = 'R').....retur
0410: 6e 20 6d 6f 76 65 28 64 79 2c 20 64 78 2c 20 79 n move(dy, dx, y
0420: 2c 20 78 29 3b 0a 09 7d 0a 0a 09 76 6f 69 64 20 , x);..}...void
0430: 6d 6f 76 65 28 69 6e 74 20 64 79 2c 20 69 6e 74 move(int dy, int
0440: 20 64 78 2c 20 69 6e 74 20 79 2c 20 69 6e 74 20 dx, int y, int
0450: 78 29 20 7b 0a 09 09 69 66 28 64 61 74 61 5b 79 x) {...if(data[y
0460: 2b 64 79 5d 5b 78 2b 64 78 5d 3d 3d 27 20 27 20 +dy][x+dx]==' '
0470: 7c 7c 20 64 61 74 61 5b 79 2b 64 79 5d 5b 78 2b || data[y+dy][x+
0480: 64 78 5d 3d 3d 27 2e 27 0a 09 09 20 20 20 7c 7c dx]=='.'... ||
0490: 20 64 61 74 61 5b 79 2b 64 79 5d 5b 78 2b 64 78 data[y+dy][x+dx
04a0: 5d 3d 3d 27 5c 5c 27 20 7c 7c 20 64 61 74 61 5b ]=='\\' || data[
04b0: 79 2b 64 79 5d 5b 78 2b 64 78 5d 3d 3d 27 4f 27 y+dy][x+dx]=='O'
04c0: 29 20 7b 0a 09 09 09 64 61 74 61 5b 79 5d 5b 78 ) {....data[y][x
04d0: 5d 3d 27 20 27 3b 0a 09 09 09 64 61 74 61 5b 79 ]=' ';....data[y
04e0: 2b 64 79 5d 5b 78 2b 64 78 5d 3d 27 52 27 3b 0a +dy][x+dx]='R';.
04f0: 09 09 7d 20 65 6c 73 65 20 69 66 28 64 79 3d 3d ..} else if(dy==
0500: 30 20 26 26 20 64 61 74 61 5b 79 2b 64 79 5d 5b 0 && data[y+dy][
0510: 78 2b 64 78 5d 3d 3d 27 2a 27 20 26 26 20 64 61 x+dx]=='*' && da
0520: 74 61 5b 79 2b 32 2a 64 79 5d 5b 78 2b 32 2a 64 ta[y+2*dy][x+2*d
0530: 78 5d 3d 3d 27 20 27 29 20 7b 0a 09 09 09 64 61 x]==' ') {....da
0540: 74 61 5b 79 5d 5b 78 5d 3d 27 20 27 3b 0a 09 09 ta[y][x]=' ';...
0550: 09 64 61 74 61 5b 79 2b 64 79 5d 5b 78 2b 64 78 .data[y+dy][x+dx
0560: 5d 3d 27 52 27 3b 0a 09 09 09 64 61 74 61 5b 79 ]='R';....data[y
0570: 2b 32 2a 64 79 5d 5b 78 2b 32 2a 64 78 5d 3d 27 +2*dy][x+2*dx]='
0580: 2a 27 3b 0a 09 09 7d 0a 09 09 75 70 64 61 74 65 *';...}...update
0590: 28 29 3b 0a 09 7d 0a 0a 09 76 6f 69 64 20 75 70 ();..}...void up
05a0: 64 61 74 65 28 29 20 7b 0a 09 09 63 68 61 72 5b date() {...char[
05b0: 5d 5b 5d 20 6e 65 78 74 3b 0a 09 09 66 6f 72 65 ][] next;...fore
05c0: 61 63 68 28 79 2c 73 3b 20 64 61 74 61 29 0a 09 ach(y,s; data)..
05d0: 09 09 6e 65 78 74 20 7e 3d 20 73 2e 64 75 70 3b ..next ~= s.dup;
05e0: 0a 0a 09 09 62 6f 6f 6c 20 6c 61 6d 62 64 61 20 ....bool lambda
05f0: 3d 20 66 61 6c 73 65 3b 0a 09 09 66 6f 72 28 69 = false;...for(i
0600: 6e 74 20 79 3d 31 3b 20 79 2b 31 3c 48 3b 20 2b nt y=1; y+1<H; +
0610: 2b 79 29 0a 09 09 66 6f 72 28 69 6e 74 20 78 3d +y)...for(int x=
0620: 31 3b 20 78 2b 31 3c 57 3b 20 2b 2b 78 29 0a 09 1; x+1<W; ++x)..
0630: 09 09 6c 61 6d 62 64 61 20 7c 3d 20 28 64 61 74 ..lambda |= (dat
0640: 61 5b 79 5d 5b 78 5d 20 3d 3d 20 27 5c 5c 27 29 a[y][x] == '\\')
0650: 3b 0a 0a 09 09 66 6f 72 28 69 6e 74 20 79 3d 31 ;....for(int y=1
0660: 3b 20 79 2b 31 3c 48 3b 20 2b 2b 79 29 0a 09 09 ; y+1<H; ++y)...
0670: 66 6f 72 28 69 6e 74 20 78 3d 31 3b 20 78 2b 31 for(int x=1; x+1
0680: 3c 57 3b 20 2b 2b 78 29 20 7b 0a 09 09 09 69 66 <W; ++x) {....if
0690: 28 64 61 74 61 5b 79 5d 5b 78 5d 3d 3d 27 2a 27 (data[y][x]=='*'
06a0: 29 20 7b 0a 09 09 09 09 69 66 28 64 61 74 61 5b ) {.....if(data[
06b0: 79 2b 31 5d 5b 78 5d 3d 3d 27 20 27 29 20 7b 0a y+1][x]==' ') {.
06c0: 09 09 09 09 09 6e 65 78 74 5b 79 5d 5b 78 5d 3d .....next[y][x]=
06d0: 27 20 27 3b 0a 09 09 09 09 09 6e 65 78 74 5b 79 ' ';......next[y
06e0: 2b 31 5d 5b 78 5d 3d 27 2a 27 3b 0a 09 09 09 09 +1][x]='*';.....
06f0: 7d 0a 09 09 09 09 65 6c 73 65 20 69 66 28 64 61 }.....else if(da
0700: 74 61 5b 79 2b 31 5d 5b 78 5d 3d 3d 27 2a 27 20 ta[y+1][x]=='*'
0710: 26 26 20 64 61 74 61 5b 79 5d 5b 78 2b 31 5d 3d && data[y][x+1]=
0720: 3d 27 20 27 20 26 26 20 64 61 74 61 5b 79 2b 31 =' ' && data[y+1
0730: 5d 5b 78 2b 31 5d 3d 3d 27 20 27 29 20 7b 0a 09 ][x+1]==' ') {..
0740: 09 09 09 09 6e 65 78 74 5b 79 5d 5b 78 5d 3d 27 ....next[y][x]='
0750: 20 27 3b 0a 09 09 09 09 09 6e 65 78 74 5b 79 2b ';......next[y+
0760: 31 5d 5b 78 2b 31 5d 3d 27 2a 27 3b 0a 09 09 09 1][x+1]='*';....
0770: 09 7d 0a 09 09 09 09 65 6c 73 65 20 69 66 28 64 .}.....else if(d
0780: 61 74 61 5b 79 2b 31 5d 5b 78 5d 3d 3d 27 2a 27 ata[y+1][x]=='*'
0790: 20 26 26 20 64 61 74 61 5b 79 5d 5b 78 2d 31 5d && data[y][x-1]
07a0: 3d 3d 27 20 27 20 26 26 20 64 61 74 61 5b 79 2b ==' ' && data[y+
07b0: 31 5d 5b 78 2d 31 5d 3d 3d 27 20 27 29 20 7b 0a 1][x-1]==' ') {.
07c0: 09 09 09 09 09 6e 65 78 74 5b 79 5d 5b 78 5d 3d .....next[y][x]=
07d0: 27 20 27 3b 0a 09 09 09 09 09 6e 65 78 74 5b 79 ' ';......next[y
07e0: 2b 31 5d 5b 78 2d 31 5d 3d 27 2a 27 3b 0a 09 09 +1][x-1]='*';...
07f0: 09 09 7d 0a 09 09 09 09 65 6c 73 65 20 69 66 28 ..}.....else if(
0800: 64 61 74 61 5b 79 2b 31 5d 5b 78 5d 3d 3d 27 5c data[y+1][x]=='\
0810: 5c 27 20 26 26 20 64 61 74 61 5b 79 5d 5b 78 2b \' && data[y][x+
0820: 31 5d 3d 3d 27 20 27 20 26 26 20 64 61 74 61 5b 1]==' ' && data[
0830: 79 2b 31 5d 5b 78 2b 31 5d 3d 3d 27 20 27 29 20 y+1][x+1]==' ')
0840: 7b 0a 09 09 09 09 09 6e 65 78 74 5b 79 5d 5b 78 {......next[y][x
0850: 5d 3d 27 20 27 3b 0a 09 09 09 09 09 6e 65 78 74 ]=' ';......next
0860: 5b 79 2b 31 5d 5b 78 2b 31 5d 3d 27 2a 27 3b 0a [y+1][x+1]='*';.
0870: 09 09 09 09 7d 0a 09 09 09 7d 0a 09 09 09 65 6c ....}....}....el
0880: 73 65 20 69 66 28 64 61 74 61 5b 79 5d 5b 78 5d se if(data[y][x]
0890: 3d 3d 27 4c 27 29 20 7b 0a 09 09 09 09 69 66 28 =='L') {.....if(
08a0: 21 6c 61 6d 62 64 61 29 0a 09 09 09 09 09 6e 65 !lambda)......ne
08b0: 78 74 5b 79 5d 5b 78 5d 20 3d 20 27 4f 27 3b 0a xt[y][x] = 'O';.
08c0: 09 09 09 7d 0a 09 09 7d 0a 09 09 64 61 74 61 20 ...}...}...data
08d0: 3d 20 6e 65 78 74 3b 0a 09 7d 0a 7d 0a 0a 63 6c = next;..}.}..cl
08e0: 61 73 73 20 4d 79 46 6f 72 6d 20 3a 20 46 6f 72 ass MyForm : For
08f0: 6d 0a 7b 0a 09 4d 61 70 20 6d 3b 0a 09 74 68 69 m.{..Map m;..thi
0900: 73 28 4d 61 70 20 6d 29 0a 09 7b 0a 09 09 6e 6f s(Map m)..{...no
0910: 4d 65 73 73 61 67 65 46 69 6c 74 65 72 28 29 3b MessageFilter();
0920: 0a 09 09 74 68 69 73 2e 6d 20 3d 20 6d 3b 0a 09 ...this.m = m;..
0930: 09 74 68 69 73 2e 74 65 78 74 20 3d 20 22 44 61 .this.text = "Da
0940: 72 6b 20 49 6e 74 65 67 65 72 73 22 3b 0a 09 09 rk Integers";...
0950: 74 68 69 73 2e 6b 65 79 44 6f 77 6e 20 7e 3d 20 this.keyDown ~=
0960: 26 6d 79 4b 65 79 3b 0a 09 7d 0a 09 6f 76 65 72 &myKey;..}..over
0970: 72 69 64 65 20 76 6f 69 64 20 6f 6e 52 65 73 69 ride void onResi
0980: 7a 65 28 45 76 65 6e 74 41 72 67 73 20 65 76 29 ze(EventArgs ev)
0990: 20 7b 0a 09 09 69 6e 76 61 6c 69 64 61 74 65 28 {...invalidate(
09a0: 29 3b 0a 09 7d 0a 09 6f 76 65 72 72 69 64 65 20 );..}..override
09b0: 76 6f 69 64 20 6f 6e 50 61 69 6e 74 28 50 61 69 void onPaint(Pai
09c0: 6e 74 45 76 65 6e 74 41 72 67 73 20 65 76 29 0a ntEventArgs ev).
09d0: 09 7b 0a 09 09 69 6e 74 20 5a 20 3d 20 6d 69 6e .{...int Z = min
09e0: 28 74 68 69 73 2e 63 6c 69 65 6e 74 53 69 7a 65 (this.clientSize
09f0: 2e 77 69 64 74 68 2c 20 74 68 69 73 2e 63 6c 69 .width, this.cli
0a00: 65 6e 74 53 69 7a 65 2e 68 65 69 67 68 74 29 20 entSize.height)
0a10: 2f 20 6d 61 78 28 6d 2e 57 2d 32 2c 20 6d 2e 48 / max(m.W-2, m.H
0a20: 2d 32 29 3b 0a 09 09 46 6f 6e 74 20 66 6f 6e 74 -2);...Font font
0a30: 20 3d 20 6e 65 77 20 46 6f 6e 74 28 22 4d 53 20 = new Font("MS
0a40: 47 6f 74 68 69 63 22 2c 20 5a 2d 34 29 3b 0a 09 Gothic", Z-4);..
0a50: 09 47 72 61 70 68 69 63 73 20 67 20 3d 20 65 76 .Graphics g = ev
0a60: 2e 67 72 61 70 68 69 63 73 3b 0a 09 09 66 6f 72 .graphics;...for
0a70: 28 69 6e 74 20 79 3d 31 3b 20 79 2b 31 3c 6d 2e (int y=1; y+1<m.
0a80: 48 3b 20 2b 2b 79 29 0a 09 09 66 6f 72 28 69 6e H; ++y)...for(in
0a90: 74 20 78 3d 31 3b 20 78 2b 31 3c 6d 2e 57 3b 20 t x=1; x+1<m.W;
0aa0: 2b 2b 78 29 20 7b 0a 09 09 09 69 66 28 6d 2e 64 ++x) {....if(m.d
0ab0: 61 74 61 5b 79 5d 5b 78 5d 3d 3d 27 2a 27 29 20 ata[y][x]=='*')
0ac0: 7b 0a 09 09 09 09 67 2e 64 72 61 77 54 65 78 74 {.....g.drawText
0ad0: 28 22 e5 b2 a9 22 2c 20 66 6f 6e 74 2c 20 43 6f ("...", font, Co
0ae0: 6c 6f 72 28 30 2c 30 2c 30 29 2c 20 52 65 63 74 lor(0,0,0), Rect
0af0: 28 28 78 2d 31 29 2a 5a 2c 20 28 79 2d 31 29 2a ((x-1)*Z, (y-1)*
0b00: 5a 2c 20 5a 2c 20 5a 29 29 3b 0a 09 09 09 7d 0a Z, Z, Z));....}.
0b10: 09 09 09 69 66 28 6d 2e 64 61 74 61 5b 79 5d 5b ...if(m.data[y][
0b20: 78 5d 3d 3d 27 5c 5c 27 29 20 7b 0a 09 09 09 09 x]=='\\') {.....
0b30: 67 2e 64 72 61 77 54 65 78 74 28 22 ce bb 22 2c g.drawText("..",
0b40: 20 66 6f 6e 74 2c 20 43 6f 6c 6f 72 28 30 2c 32 font, Color(0,2
0b50: 35 35 2c 30 29 2c 20 52 65 63 74 28 28 78 2d 31 55,0), Rect((x-1
0b60: 29 2a 5a 2c 20 28 79 2d 31 29 2a 5a 2c 20 5a 2c )*Z, (y-1)*Z, Z,
0b70: 20 5a 29 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66 Z));....}....if
0b80: 28 6d 2e 64 61 74 61 5b 79 5d 5b 78 5d 3d 3d 27 (m.data[y][x]=='
0b90: 52 27 29 20 7b 0a 09 09 09 09 67 2e 64 72 61 77 R') {.....g.draw
0ba0: 54 65 78 74 28 22 ef bc b2 22 2c 20 66 6f 6e 74 Text("...", font
0bb0: 2c 20 43 6f 6c 6f 72 28 31 32 38 2c 31 32 38 2c , Color(128,128,
0bc0: 30 29 2c 20 52 65 63 74 28 28 78 2d 31 29 2a 5a 0), Rect((x-1)*Z
0bd0: 2c 20 28 79 2d 31 29 2a 5a 2c 20 5a 2c 20 5a 29 , (y-1)*Z, Z, Z)
0be0: 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66 28 6d 2e );....}....if(m.
0bf0: 64 61 74 61 5b 79 5d 5b 78 5d 3d 3d 27 4c 27 29 data[y][x]=='L')
0c00: 20 7b 0a 09 09 09 09 67 2e 64 72 61 77 54 65 78 {.....g.drawTex
0c10: 74 28 22 ef bc ac 22 2c 20 66 6f 6e 74 2c 20 43 t("...", font, C
0c20: 6f 6c 6f 72 28 32 35 35 2c 32 35 35 2c 30 29 2c olor(255,255,0),
0c30: 20 52 65 63 74 28 28 78 2d 31 29 2a 5a 2c 20 28 Rect((x-1)*Z, (
0c40: 79 2d 31 29 2a 5a 2c 20 5a 2c 20 5a 29 29 3b 0a y-1)*Z, Z, Z));.
0c50: 09 09 09 7d 0a 09 09 09 69 66 28 6d 2e 64 61 74 ...}....if(m.dat
0c60: 61 5b 79 5d 5b 78 5d 3d 3d 27 4f 27 29 20 7b 0a a[y][x]=='O') {.
0c70: 09 09 09 09 67 2e 64 72 61 77 54 65 78 74 28 22 ....g.drawText("
0c80: ef bc af 22 2c 20 66 6f 6e 74 2c 20 43 6f 6c 6f ...", font, Colo
0c90: 72 28 32 35 35 2c 32 35 35 2c 30 29 2c 20 52 65 r(255,255,0), Re
0ca0: 63 74 28 28 78 2d 31 29 2a 5a 2c 20 28 79 2d 31 ct((x-1)*Z, (y-1
0cb0: 29 2a 5a 2c 20 5a 2c 20 5a 29 29 3b 0a 09 09 09 )*Z, Z, Z));....
0cc0: 7d 0a 09 09 09 69 66 28 6d 2e 64 61 74 61 5b 79 }....if(m.data[y
0cd0: 5d 5b 78 5d 3d 3d 27 23 27 29 20 7b 0a 09 09 09 ][x]=='#') {....
0ce0: 09 67 2e 64 72 61 77 54 65 78 74 28 22 ef bc 83 .g.drawText("...
0cf0: 22 2c 20 66 6f 6e 74 2c 20 43 6f 6c 6f 72 28 30 ", font, Color(0
0d00: 2c 30 2c 30 29 2c 20 52 65 63 74 28 28 78 2d 31 ,0,0), Rect((x-1
0d10: 29 2a 5a 2c 20 28 79 2d 31 29 2a 5a 2c 20 5a 2c )*Z, (y-1)*Z, Z,
0d20: 20 5a 29 29 3b 0a 09 09 09 7d 0a 09 09 09 69 66 Z));....}....if
0d30: 28 6d 2e 64 61 74 61 5b 79 5d 5b 78 5d 3d 3d 27 (m.data[y][x]=='
0d40: 2e 27 29 20 7b 0a 09 09 09 09 67 2e 64 72 61 77 .') {.....g.draw
0d50: 54 65 78 74 28 22 e3 83 bb 22 2c 20 66 6f 6e 74 Text("...", font
0d60: 2c 20 43 6f 6c 6f 72 28 31 32 38 2c 34 30 2c 30 , Color(128,40,0
0d70: 29 2c 20 52 65 63 74 28 28 78 2d 31 29 2a 5a 2c ), Rect((x-1)*Z,
0d80: 20 28 79 2d 31 29 2a 5a 2c 20 5a 2c 20 5a 29 29 (y-1)*Z, Z, Z))
0d90: 3b 0a 09 09 09 7d 0a 09 09 7d 0a 09 7d 0a 09 76 ;....}...}..}..v
0da0: 6f 69 64 20 6d 79 4b 65 79 28 43 6f 6e 74 72 6f oid myKey(Contro
0db0: 6c 20 63 2c 20 4b 65 79 45 76 65 6e 74 41 72 67 l c, KeyEventArg
0dc0: 73 20 65 76 29 0a 09 7b 0a 09 09 73 77 69 74 63 s ev)..{...switc
0dd0: 68 28 65 76 2e 6b 65 79 43 6f 64 65 29 0a 09 09 h(ev.keyCode)...
0de0: 7b 0a 09 09 63 61 73 65 20 4b 65 79 73 2e 44 4f {...case Keys.DO
0df0: 57 4e 3a 0a 09 09 09 6d 2e 63 6f 6d 6d 61 6e 64 WN:....m.command
0e00: 5f 44 28 29 3b 0a 09 09 09 62 72 65 61 6b 3b 0a _D();....break;.
0e10: 09 09 63 61 73 65 20 4b 65 79 73 2e 55 50 3a 0a ..case Keys.UP:.
0e20: 09 09 09 6d 2e 63 6f 6d 6d 61 6e 64 5f 55 28 29 ...m.command_U()
0e30: 3b 0a 09 09 09 62 72 65 61 6b 3b 0a 09 09 63 61 ;....break;...ca
0e40: 73 65 20 4b 65 79 73 2e 4c 45 46 54 3a 0a 09 09 se Keys.LEFT:...
0e50: 09 6d 2e 63 6f 6d 6d 61 6e 64 5f 4c 28 29 3b 0a .m.command_L();.
0e60: 09 09 09 09 62 72 65 61 6b 3b 0a 09 09 63 61 73 ....break;...cas
0e70: 65 20 4b 65 79 73 2e 52 49 47 48 54 3a 0a 09 09 e Keys.RIGHT:...
0e80: 09 6d 2e 63 6f 6d 6d 61 6e 64 5f 52 28 29 3b 0a .m.command_R();.
0e90: 09 09 09 62 72 65 61 6b 3b 0a 09 09 63 61 73 65 ...break;...case
0ea0: 20 4b 65 79 73 2e 57 3a 0a 09 09 09 6d 2e 77 61 Keys.W:....m.wa
0eb0: 69 74 28 29 3b 0a 09 09 09 62 72 65 61 6b 3b 0a it();....break;.
0ec0: 09 09 64 65 66 61 75 6c 74 3a 0a 09 09 09 62 72 ..default:....br
0ed0: 65 61 6b 3b 0a 09 09 7d 0a 09 09 69 6e 76 61 6c eak;...}...inval
0ee0: 69 64 61 74 65 28 29 3b 0a 09 7d 0a 7d 0a 0a 76 idate();..}.}..v
0ef0: 6f 69 64 20 6d 61 69 6e 28 73 74 72 69 6e 67 5b oid main(string[
0f00: 5d 20 61 72 67 73 29 0a 7b 0a 09 46 6f 72 6d 20 ] args).{..Form
0f10: 6d 79 46 6f 72 6d 20 3d 20 6e 65 77 20 4d 79 46 myForm = new MyF
0f20: 6f 72 6d 28 6e 65 77 20 4d 61 70 28 46 69 6c 65 orm(new Map(File
0f30: 28 61 72 67 73 5b 31 5d 29 29 29 3b 0a 09 41 70 (args[1])));..Ap
0f40: 70 6c 69 63 61 74 69 6f 6e 2e 72 75 6e 28 6d 79 plication.run(my
0f50: 46 6f 72 6d 29 3b 0a 7d 0a Form);.}.