携程 决赛 第一题 Crossword

//真是郁闷的一晚上
//比赛时看到这题是就感觉会做，感觉思路清晰 就去准备找第二题 ，因为感觉第二题是个经典问题，（我不会计算几何），就去搜索了下，然后找到求最小面积的，改来改去，一直Wa
// 然后就只剩下一个小时了 ，我决定放弃它，去写第一题 就是这题，然后整栋楼离奇断网什么的、、还调试了好久、、

// 思路 :将K个字符串算出Hash值 保存，同时要记录串的长度
//     这样在搜索时候 就可以根据Hash和字符串长度来筛选出某一位置可以填哪些串 因为串的起始和结束位置也能判断可以填的串可以多长
//     这样就是暴力搜索了
//   我对M个串位置进行了排序，然后我发现排不排序都一样，无所谓的

#include<cstdio>

#include<cstdlib>

#include<cstring>

#include<string>

#include<iostream>

#include<algorithm>

#include<functional>

#include<cmath>

#include <vector>

using namespace std;

vector <string> Hs[1000];

vector <int > len[1000];

int Map[40][40];

int n,m;

struct node

{

    int x1,y1,x2,y2,k;

    bool operator <(const node&t) const

    {

        if(x1==t.x1) return x2<t.x2;

        return x1<t.x1;

    }

} st[120];

int K;

int flag;

char str[100];

int ar[40];

void dfs(int index)

{

    if(index==m)

    {

        flag=1;

        return ;

    }

    int x1=st[index].x1,x2=st[index].x2;

    int y1=st[index].y1,y2=st[index].y2;

    int k=st[index].k;

    int le=x1-x2+y1-y2;

    if(le<0) le=-le;

    le++;

    for(int i=0; i<Hs[k].size(); i++)

        if(le==len[k][i])

        {

            if(x1==x2)

            {

                int dir=y1<y2?1:-1;

                int j,id=0;

                for(j=y1; j!=y2; id++, j+=dir)

                    if(Map[x1][j]&&Map[x1][j]!=Hs[k][i][id])

                        break;

                if(j==y2)

                {



                    id=0;

                    for(j=y1; j!=y2; id++, j+=dir)

                        if(!Map[x1][j])

                        {

                            Map[x1][j]=Hs[k][i][id];

                            ar[j]=1;

                        }

                        else

                            ar[j]=0;

                      if(!Map[x1][j])

                        {

                            Map[x1][j]=Hs[k][i][id];

                            ar[j]=1;

                        }

                        else

                            ar[j]=0;

                    dfs(index+1);

                    if(flag) return;

                    for(j=y1; j!=y2; j+=dir)

                        if(ar[j])

                            Map[x1][j]=0;

                }

            }

            else if(y1==y2)

            {

                int dir=x1<x2?1:-1;

                int j,id=0;

                for(j=x1; j!=x2; id++, j+=dir)

                    if(Map[j][y1]&&Map[j][y1]!=Hs[k][i][id]) break;

                if(j==x2)

                {

                    id=0;

                    for(j=x1; j!=x2; id++,j+=dir)

                        if(!Map[j][y1])

                        {

                            Map[j][y1]=Hs[k][i][id];

                            ar[j]=1;

                        }

                        else

                            ar[j]=0;

                     if(!Map[j][y1])

                        {

                            Map[j][y1]=Hs[k][i][id];

                            ar[j]=1;

                        }

                        else

                            ar[j]=0;

                    dfs(index+1);

                    if(flag) return;

                    for(j=x1; j!=x2; j+=dir)

                        if(ar[j])

                            Map[j][y1]=0;

                }

            }

        }

}

int main()

{

    int i,j;

    int Case=1;

    while(scanf("%d %d",&n,&m),n|m)

    {

        if(Case++!=1) printf("\n");

        for(i=0; i<m; i++)

            scanf("%d %d %d %d %d",&st[i].x1,&st[i].y1,&st[i].x2,&st[i].y2,&st[i].k);

        sort(st,st+m);

        scanf("%d",&K);

        for(i=0; i<K; i++)

        {

            scanf("%s",str);

            int hs=0;

            for(j=0; str[j]!='\0'; j++)

                hs=(hs*33+str[j])%997;

            Hs[hs].push_back(str);

            len[hs].push_back(j);

        }

        memset(Map,0,sizeof(Map));

        flag=0;

        dfs(0);

        if(flag)

            for(i=1; i<=n; i++)

            {

                for(j=1; j<n; j++)

                    if(Map[i][j])

                        printf("%c",Map[i][j]);

                    else

                        printf(" ");



                if(Map[i][j])

                    printf("%c\n",Map[i][j]);

                else

                    printf(" \n");

            }

    }

    return 0;

}