UVa 177 折纸痕（Paper Folding）

题意：
你喜欢折纸吗？给你一张很大的纸，对折对折再对折……，每次对折都是从右往左折，因此在折了很多次之后，原先的大纸会变成一个窄窄的纸条。现在把这个纸条沿着着折纸的痕迹打开，每次都只打开“一半”，即把每个痕迹做成一个直角，那么从纸的一端沿着纸面平行方向看过去，会看到一个美妙的曲线。（建议自己折一下）
绘出这个美妙的曲线。

分析：
可以发现实际上是一个递归的过程，比如只有四个折痕的时候假设为 a b c d 那么c = rev（a） d = b 这里的abcd都是方向 这样无限递归下去，就可以得到从起点开始的痕迹方向，存在一个数组中，在根据这个数组，求出边界，然后初始化好起点的位置，再根据方向绘制，就可以了。有很多细节要处理，代码比较长，但是非常好理解，且代码中有复用的部分，和测试的部分，实际上没那么长。

代码：

#include<bits/stdc++.h>
#define LL long long
#define ms(s) memset(s, 0, sizeof(s))
using namespace std;
const int maxn = 1e4 + 10; // 2^13 = 8192 will be enough
int a[14][maxn]; // (1 - 13) dir 
char pic[maxn][maxn];

// 0 -> right  
// 3 -> left 
// 1 -> top
// 2 -> bot
int getRev(int i) {
    return 3 - i; 
}

char change(int i) {
    if(i == 0) return 'r';
    if(i == 1) return 't';
    if(i == 2) return 'b';
    if(i == 3) return 'l';
}

//[l, r]
void dfs(int l, int r, int n) {
    if(r == l + 1) {
        a[n][l] = 0;
        a[n][r] = 1;
        return;
    }
    int mid = l + (r - l) / 2;
    dfs(l, mid, n);
    int m = (mid + 1 + r) / 2;
    for(int i = mid + 1; i <= m; i++) {
        a[n][i] = getRev(a[n][i - mid]);
    }
    for(int i = m + 1; i <= r; i++) {
        a[n][i] = a[n][i - mid];
    }
}

int main() {
    // freopen("in.txt", "r", stdin);
    // freopen("out.txt", "w", stdout);
    ios::sync_with_stdio(false);
    cin.tie(0);
    int n;
    while(cin >> n && n) {
        // 0 -> right  
        // 3 -> left 
        // 1 -> top
        // 2 -> bot
        dfs(1, pow(2, n), n);
        bool dir[4]; 
        ms(dir);
        dir[a[n][1]] = true;
        int dxR = 0;
        int dxL = 0;
        int dyT = 0;
        int dyB = 0;
        int x = 0;
        int y = 0;
        for(int i = 2; i <= pow(2, n); i++) {
            if(a[n][i] == 0) {
                if(dir[1]) x--;
                y++;
            }
            if(a[n][i] == 1) {
                if(dir[1]) x--;
                else if(dir[0]) y++;
                else if(dir[3]) y--;
            }
            if(a[n][i] == 2) {
                x++;
                if(dir[0]) y++;
                else if(dir[3]) y--;
            }
            if(a[n][i] == 3) {
                if(dir[1]) x--;
                y--;
            }
            //cout << "x: " << x << " y: " << y <<endl;
            ms(dir);
            dir[a[n][i]] = true;
            dxR = max(x, dxR);
            dxL = min(x, dxL);
            dyT = max(y, dyT);
            dyB = min(y, dyB);
        }
        ms(pic);
        x = abs(dxL);
        y = abs(dyB);
        //cout << x << " " << y << endl;
        pic[x][y] = a[n][1] == 0 || a[n][1] == 3 ? '_' : '|';
        ms(dir);
        dir[a[n][1]] = true;
        for(int i = 2; i <= pow(2, n); i++) {
            if(a[n][i] == 0) {
                if(dir[1]) x--;
                y++;
            }
            if(a[n][i] == 1) {
                if(dir[1]) x--;
                else if(dir[0]) y++;
                else if(dir[3]) y--;
            }
            if(a[n][i] == 2) {
                x++;
                if(dir[0]) y++;
                else if(dir[3]) y--;
            }
            if(a[n][i] == 3) {
                if(dir[1]) x--;
                y--;
            }
            ms(dir);
            dir[a[n][i]] = true;
            pic[x][y] = a[n][i] == 0 || a[n][i] == 3 ? '_' : '|';
            //cout << "x :" << x << " y : " << y;
            //cout << pic[x][y] << " " << endl;
        }
        //cout << endl;
        int len[maxn];
        ms(len);
        for(int i = 0; i <= abs(dxL) + abs(dxR); i++) {
            for(int j = 0; j <= abs(dyB) + abs(dyT); j++) {
                if(pic[i][j]) len[i] = j;
            }
        }
        for(int i = 0; i <= abs(dxL) + abs(dxR); i++) {
            for(int j = 0; j <= len[i]; j++) {
                if(pic[i][j]) cout << pic[i][j];
                else cout << " ";
            }
            cout << endl;
        }
        cout << "^" << endl;
    }
    return 0;
}