#include <stdio.h>
#include <string.h>

#define HEIGHT       10003
#define WIDTH        ((HEIGHT/5) * 5)

#define STEPS   1187640925


char board[WIDTH*HEIGHT];

typedef enum { left, right, up, down } dir_t;


void run(int pos, dir_t dir)
{
  int i;
  for (i=0; i<STEPS; i++)
    {
      switch (dir)
        {
        case left:
          pos -= HEIGHT;
          if (board[pos] == 0) { board[pos] = 2; dir = up; }
          else { board[pos]--; dir = down; }
          break;
        case right:
          pos += HEIGHT;
          if (board[pos] == 0) { board[pos] = 2; dir = down; }
          else { board[pos]--; dir = up; }
          break;
        case up:
          pos--;
          if (board[pos] == 0) { board[pos] = 2; dir = right; }
          else { board[pos]--; dir = left; }
          break;
        case down:
          pos++;
          if (board[pos] == 0) { board[pos] = 2; dir = left; }
          else { board[pos]--; dir = right; }
          break;
        }
    }
}

typedef int int32;
typedef struct {
  int32 width, height;
  int32 next_x, next_y;
} header_t;

void dump()
{
  FILE *f = fopen("Simple.Areas", "wb");
  int col;
  for (col=0; col<WIDTH/5; col++)
    {
      unsigned char column[HEIGHT];
      char *start = board + 5*col*HEIGHT;
      int y;
      for (y=0; y<HEIGHT; y++)
        {
          unsigned char byte = 0;
          byte += start[4 * HEIGHT + y] * 1;
          byte += start[3 * HEIGHT + y] * 3;
          byte += start[2 * HEIGHT + y] * 9;
          byte += start[1 * HEIGHT + y] * 27;
          byte += start[0 * HEIGHT + y] * 81;
          column[y] = byte;
        }
      fwrite(column, HEIGHT, 1, f);
    }

  header_t header;
  header.width = WIDTH / 5;
  header.height = HEIGHT;
  header.next_x = -1;
  header.next_y = -1;
  fseek(f, 0, SEEK_SET);
  fwrite(&header, sizeof(header), 1, f);
  fclose(f);
}

int main()
{
  memset(board, 0, sizeof(board));
  run((WIDTH/2)*HEIGHT + (HEIGHT/2), left);
  dump();
}