DELETED src/test.d
Index: src/test.d
==================================================================
--- src/test.d
+++ src/test.d
@@ -1,395 +0,0 @@
-import std.algorithm;
-import std.array;
-import std.conv;
-import std.stdio;
-import std.string;
-import std.typecons;
-import core.stdc.signal;
-import core.stdc.stdlib;
-import dfl.all;
-
-class Map
-{
-	private char[][] data;
-	bool dead = false;
-	bool cleared = false;
-	int water = 0;
-	int flooding = 0;
-	int water_proof = 10;
-	int underwater = 0;
-	int flooding_counter = 0;
-
-	this(File input)
-	{
-		string line;
-		while( (line=input.readln().chomp()).length )
-			data ~= line.dup;
-
-		int width = 0;
-		foreach(s; data)
-			width = max(width, s.length);
-
-		// space padding and sentinels
-		foreach(ref s; data) {
-			int p = s.length;
-			s.length = width;
-			s[p..$] = ' ';
-			s = '#' ~ s ~ '#';
-		}
-
-		// vertical sentinel
-		char[] sen = new char[width+2];
-		sen[] = '#';
-		data = sen.dup ~ data ~ sen;
-
-		// flooding
-		water = H-1;
-		while( (line=input.readln()).length ) {
-			string[] ss = line.split();
-			if(ss.length==2 && ss[0]=="Water")
-				water = H-1 - ss[1].to!int();
-			else if(ss.length==2 && ss[0]=="Flooding")
-				flooding = ss[1].to!int();
-			else if(ss.length==2 && ss[0]=="Waterproof")
-				water_proof = ss[1].to!int();
-		}
-	}
-
-	@property const
-	{
-		int W() { return data[0].length; }
-		int H() { return data.length; }
-		string toString() {
-			string result;
-			foreach(i,s; data) {
-				if(i) result ~= '\n';
-				result ~= s.idup;
-			}
-			return result;
-		}
-	}
-
-	int command_R() { if(dead)return 0; write("R"); return move(0, +1); }
-	int command_L() { if(dead)return 0; write("L"); return move(0, -1); }
-	int command_U() { if(dead)return 0; write("U"); return move(-1, 0); }
-	int command_D() { if(dead)return 0; write("D"); return move(+1, 0); }
-	int wait() { if(dead)return 0; update(); write("W"); return -1; }
-	int abort() { if(dead)return 0; cleared=true; write("A"); return gained*25; }
-
-	int move(int dy, int dx) {
-		foreach(y,s; data)
-		foreach(x,c; s)
-			if(c == 'R')
-				return move(dy, dx, y, x);
-		assert(false);
-	}
-
-	int gained = 0; // TODO: atode naosu
-	int move(int dy, int dx, int y, int x) {
-		if(dead)
-			return 0;
-		int score = 0;
-		if(data[y+dy][x+dx]=='\\') {
-			score += 25;
-			++gained;
-		}
-		if(data[y+dy][x+dx]=='O') {
-			score += gained*50;
-			cleared = true;
-		}
-
-		if(data[y+dy][x+dx]==' ' || data[y+dy][x+dx]=='.'
-		   || data[y+dy][x+dx]=='\\' || data[y+dy][x+dx]=='O') {
-			data[y][x]=' ';
-			data[y+dy][x+dx]='R';
-		} else if(dy==0 && data[y+dy][x+dx]=='*' && data[y+2*dy][x+2*dx]==' ') {
-			data[y][x]=' ';
-			data[y+dy][x+dx]='R';
-			data[y+2*dy][x+2*dx]='*';
-		}
-		update();
-		return score-1;
-	}
-
-	void update() {
-		char[][] next;
-		foreach(y,s; data)
-			next ~= s.dup;
-
-		bool lambda = false;
-		for(int y=1; y+1<H; ++y)
-		for(int x=1; x+1<W; ++x)
-			lambda |= (data[y][x] == '\\');
-
-		for(int y=H-2; y>=1; --y)
-		for(int x=1; x+1<W; ++x) {
-			if(data[y][x]=='*') {
-				if(data[y+1][x]==' ') {
-					next[y][x]=' ';
-					next[y+1][x]='*';
-					if(next[y+2][x]=='R')
-						dead=true;
-				}
-				else if(data[y+1][x]=='*' && data[y][x+1]==' ' && data[y+1][x+1]==' ') {
-					next[y][x]=' ';
-					next[y+1][x+1]='*';
-					if(next[y+2][x+1]=='R')
-						dead=true;
-				}
-				else if(data[y+1][x]=='*' && data[y][x-1]==' ' && data[y+1][x-1]==' ') {
-					next[y][x]=' ';
-					next[y+1][x-1]='*';
-					if(next[y+2][x-1]=='R')
-						dead=true;
-				}
-				else if(data[y+1][x]=='\\' && data[y][x+1]==' ' && data[y+1][x+1]==' ') {
-					next[y][x]=' ';
-					next[y+1][x+1]='*';
-					if(next[y+2][x+1]=='R')
-						dead=true;
-				}
-			}
-			else if(data[y][x]=='L') {
-				if(!lambda)
-					next[y][x] = 'O';
-			}
-		}
-		data = next;
-
-		if(flooding) {
-			bool wa = false;
-			for(int y=water; y+1<H; ++y)
-			for(int x=1; x+1<W; ++x)
-				if(data[y][x]=='R') {
-					wa = true;
-					underwater++;
-					if(underwater > water_proof)
-						dead = true;
-				}
-			flooding_counter ++;
-			if(flooding_counter == flooding) {
-				flooding_counter = 0;
-				water --;
-			}
-		}
-	}
-
-	int clever()
-	{
-		if(dead)
-			return 0;
-		int sy,sx;
-		int[] ly,lx;
-		int oy,ox;
-		for(int y=0; y<H; ++y)
-		for(int x=0; x<W; ++x)
-			if(data[y][x]=='R')
-				sy=y, sx=x;
-			else if(data[y][x]=='\\')
-				ly~=y, lx~=x;
-			else if(data[y][x]=='O')
-				oy=y, ox=x;
-		if(ly.length==0) {
-			auto r = search(sy,sx,oy,ox);
-			switch(r[0]) {
-			case 'D': return command_D();
-			case 'U': return command_U();
-			case 'L': return command_L();
-			case 'R': return command_R();
-			case 'A': return abort();
-			default: return wait();
-			}
-		} else {
-			Tuple!(char,int)[] cand;
-			for(int i=0; i<ly.length; ++i) {
-				auto r = search(sy,sx,ly[i],lx[i]);
-				cand ~= r;
-			}
-			sort!((Tuple!(char,int) c1, Tuple!(char,int) c2){
-				if(c1[1] != c2[1])
-					return c1[1] < c2[1];
-				return c1[0] < c2[0];
-			})(cand);
-			switch(cand[0][0]) {
-			case 'D': return command_D();
-			case 'U': return command_U();
-			case 'L': return command_L();
-			case 'R': return command_R();
-			case 'A': return abort();
-			default: return wait();
-			}
-		}
-		return wait();
-	}
-	Tuple!(char,int) search(int sy, int sx, int oy, int ox)
-	{
-		alias Tuple!(int,"y",int,"x") Pt;
-		Pt[] q = [Pt(oy,ox)];
-		bool[][] v = new bool[][](H,W);
-		for(int step=1; q.length; ++step) {
-			Pt[] q2;
-			foreach(p; q) {
-				int[] dy=[-1,+1,0,0];
-				int[] dx=[0,0,-1,+1];
-				for(int i=0; i<4; ++i) {
-					int y = p.y+dy[i];
-					int x = p.x+dx[i];
-					if(v[y][x]) continue;
-					if(y==sy && x==sx) {
-						if(i==0) return tuple('D',step);
-						if(i==1) return tuple('U',step);
-						if(i==2) return tuple('R',step);
-						if(i==3) return tuple('L',step);
-					} else if(data[y][x]==' '||data[y][x]=='\\') {
-						q2 ~= Pt(y,x);
-						v[y][x]=true;
-					} else if(data[y][x]=='.' && data[y-1][x]!='*') {
-						q2 ~= Pt(y,x);
-						v[y][x]=true;
-					}
-				}
-			}
-			q = q2;
-		}
-		q = [Pt(oy,ox)];
-		v = new bool[][](H,W);
-		for(int step=1<<10; q.length; ++step) {
-			Pt[] q2;
-			foreach(p; q) {
-
-				int[] dy=[-1,+1,0,0];
-				int[] dx=[0,0,-1,+1];
-				for(int i=0; i<4; ++i) {
-					int y = p.y+dy[i];
-					int x = p.x+dx[i];
-					if(v[y][x]) continue;
-					if(y==sy && x==sx) {
-						if(i==0) return tuple('D',step);
-						if(i==1) return tuple('U',step);
-						if(i==2) return tuple('R',step);
-						if(i==3) return tuple('L',step);
-					} else if(data[y][x]==' '||data[y][x]=='\\') {
-						q2 ~= Pt(y,x);
-						v[y][x]=true;
-					} else if(data[y][x]=='.'/* && data[y-1][x]!='*'*/) {
-						q2 ~= Pt(y,x);
-						v[y][x]=true;
-					}
-				}
-			}
-			q = q2;
-		}
-		return tuple('A',int.max);
-	}
-}
-
-class MyForm : Form
-{
-	Map m;
-	int score;
-
-	this(Map m)
-	{
-		noMessageFilter();
-		this.m = m;
-		this.text = .text("Score: ", score, "  air[",m.water_proof-m.underwater,"]");
-		this.keyDown ~= &myKey;
-		this.score = 0;
-	}
-	override void onResize(EventArgs ev) {
-		invalidate();
-	}
-	override void onPaint(PaintEventArgs ev)
-	{
-		int Z = min(this.clientSize.width/(m.W-2), this.clientSize.height/(m.H-2));
-		Font font = new Font("MS Gothic", Z-4);
-		Graphics g = ev.graphics;
-		g.fillRectangle(Color(0,233,255), Rect(0,Z*(m.water-1),this.clientSize.width,this.clientSize.height-(Z*(m.water-1))));
-		for(int y=1; y+1<m.H; ++y)
-		for(int x=1; x+1<m.W; ++x) {
-			if(m.data[y][x]=='*') {
-				g.drawText("岩", font, Color(0,0,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-			if(m.data[y][x]=='\\') {
-				g.drawText("λ", font, Color(0,255,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-			if(m.data[y][x]=='R') {
-				if(m.dead)
-					g.drawText("Я", font, Color(255,0,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-				else
-					g.drawText("Ｒ", font, Color(128,128,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-			if(m.data[y][x]=='L') {
-				g.drawText("扉", font, Color(255,255,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-			if(m.data[y][x]=='O') {
-				g.drawText("外", font, Color(255,255,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-			if(m.data[y][x]=='#') {
-				g.drawText("＃", font, Color(0,0,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-			if(m.data[y][x]=='.') {
-				g.drawText("・", font, Color(128,40,0), Rect((x-1)*Z, (y-1)*Z, Z, Z));
-			}
-		}
-	}
-	void myKey(Control c, KeyEventArgs ev)
-	{
-		switch(ev.keyCode)
-		{
-		case Keys.DOWN:
-			score += m.command_D();
-			stdout.flush();
-			break;
-		case Keys.UP:
-			score += m.command_U();
-			stdout.flush();
-			break;
-		case Keys.LEFT:
-			score += m.command_L();
-			stdout.flush();
-			break;
-		case Keys.RIGHT:
-			score += m.command_R();
-			stdout.flush();
-			break;
-		case Keys.W:
-			score += m.wait();
-			stdout.flush();
-			break;
-		case Keys.A:
-			score += m.abort();
-			stdout.flush();
-			break;
-		case Keys.G:
-			score += m.clever();
-			stdout.flush();
-			break;
-		default:
-			break;
-		}
-		if(m.cleared) {
-			writeln();
-			writeln("Score: ", score);
-			Application.exit();
-		}
-		this.text = .text("Score: ", score, "  air[",m.water_proof-m.underwater,"]");
-		invalidate();
-	}
-}
-
-extern(C) {
-	void sigint(int) {
-		write("A");
-		stdout.flush();
-		exit(0);
-	}
-}
-
-void main(string[] args)
-{
-	signal(SIGINT, &sigint);
-
-	Form myForm = new MyForm(new Map(File(args[1])));
-	Application.run(myForm);
-}