UVALive 4997 ABCD Tiles --DFS

题意： NxN的地图，上面有A颜色的瓷砖以及一些空格点，要用B,C,D颜色去填充这些空格，只能十字形的填充，还要保证共角或共边的格子不能是相同颜色，求一种字典序最小的填充方法，如果不能，输出"Not Possible"。

解法： 从上往下扫，如果有空格，那么一定是以它下面那个格子为中心填十字瓷砖才能填到这个空格，所以这个我们将这个空格标个号，并且把下面的三个和下下面的一个空格赋一下别的值，不让以后扫描扫到，那些不是空格的话，直接跳出即可。这样我们可以找到所有需要填的十字形瓷砖个数，并且知道格子的位置，那么接下来只要考虑染什么色的事情了，因为只有三种颜色，所以dfs去填即可，如果到某一状态发现哪种颜色都不能填，那么回溯。这样一直到成功找到染色方案位置。

代码：

#include <iostream>
#include <cstdio>
#include <cstring>
#include <cstdlib>
#include <cmath>
#include <algorithm>
using namespace std;

char mp[][];
int n,tot;
int col[];
bool OK(int x,int y) { return x >=  && x < n && y >=  && y < n; }
bool findcolor(int i,int j,char ch) {
    memset(col,,sizeof(col));
    if(OK(i+,j+) && mp[i+][j+] != '.') col[mp[i+][j+]-'A']++;
    if(OK(i+,j-) && mp[i+][j-] != '.') col[mp[i+][j-]-'A']++;
    if(OK(i-,j-) && mp[i-][j-] != '.') col[mp[i-][j-]-'A']++;
    if(OK(i-,j+) && mp[i-][j+] != '.') col[mp[i-][j+]-'A']++;
    for(int k=j-;k<=j+;k++) if(OK(i+,k) && mp[i+][k] != '.') col[mp[i+][k]-'A']++;
    for(int k=i-;k<=i+;k++) if(OK(k,j+) && mp[k][j+] != '.') col[mp[k][j+]-'A']++;
    for(int k=j-;k<=j+;k++) if(OK(i-,k) && mp[i-][k] != '.') col[mp[i-][k]-'A']++;
    for(int k=i-;k<=i+;k++) if(OK(k,j-) && mp[k][j-] != '.') col[mp[k][j-]-'A']++;
    if(col[ch-'A']) return true;
    return false;
}
void color(int i,int j,char ch) {
    mp[i][j] = mp[i-][j] = mp[i][j+] = mp[i+][j] = mp[i][j-] = ch;
}
struct node {
    int x,y;
    node(int _x,int _y):x(_x),y(_y){}
    node(){}
}p[];

bool dfs(int c) {
    if(c == tot) return true;
    c++;
    int x = p[c].x, y = p[c].y;
    for(int i=;i<=;i++) {   //B,C,D
        if(!findcolor(x,y,'A'+i)) {    //周边有没有'A'+i这种颜色
            color(x,y,'A'+i);
            if(dfs(c)) return true;
            color(x,y,'.');
        }
    }
    return false;
}

int main()
{
    int t,cs = ,i,j,k,h;
    scanf("%d",&t);
    while(t--)
    {
        scanf("%d",&n);
        int space = ;
        for(i=;i<n;i++)
            scanf("%s",mp[i]);
        int flag = ;
        tot = ;
        for(i=;i<n;i++) {
            for(j=;j<n;j++) {
                if(mp[i][j] == '.') {
                    for(k=j-;k<=j+;k++) {
                        if(!OK(i+,k) || mp[i+][k] != '.') { flag = ; break; }
                        else mp[i+][k] = '#';
                    }
                    if(!OK(i+,j) || mp[i+][j] != '.') { flag = ; break; }
                    else mp[i+][j] = '#';
                    p[++tot] = node(i+,j);   //着色中心点
                }
            }
        }
        printf("Case %d:",cs++);
        if(!flag) { puts(" Not Possible!"); continue; }
        if(dfs()) {
            puts("");
            for(i=;i<n;i++)
            {
                for(j=;j<n;j++)
                    printf("%c",mp[i][j]);
                puts("");
            }
        }
        else puts(" Not Possible!");
    }
    return ;
}