- fixed bricktile
[supertux.git] / src / level.cpp
index d8c2085..eebecdf 100644 (file)
@@ -206,17 +206,35 @@ void level_default(st_level* plevel)
 
   for(i = 0; i < 15; ++i)
     {
-      plevel->tiles[i] = (unsigned int*) malloc((plevel->width+1)*sizeof(unsigned int));
-      plevel->tiles[i][plevel->width] = (unsigned int) '\0';
+      plevel->ia_tiles[i] = (unsigned int*) malloc((plevel->width+1)*sizeof(unsigned int));
+      plevel->ia_tiles[i][plevel->width] = (unsigned int) '\0';
       for(y = 0; y < plevel->width; ++y)
-        plevel->tiles[i][y] = (unsigned int) '.';
-      plevel->tiles[i][plevel->width] = (unsigned int) '\0';
+        plevel->ia_tiles[i][y] = (unsigned int) '.';
+      plevel->ia_tiles[i][plevel->width] = (unsigned int) '\0';
+
+      plevel->bg_tiles[i] = (unsigned int*) malloc((plevel->width+1)*sizeof(unsigned int));
+      plevel->bg_tiles[i][plevel->width] = (unsigned int) '\0';
+      for(y = 0; y < plevel->width; ++y)
+        plevel->bg_tiles[i][y] = (unsigned int) '.';
+      plevel->bg_tiles[i][plevel->width] = (unsigned int) '\0';
+
+      plevel->fg_tiles[i] = (unsigned int*) malloc((plevel->width+1)*sizeof(unsigned int));
+      plevel->fg_tiles[i][plevel->width] = (unsigned int) '\0';
+      for(y = 0; y < plevel->width; ++y)
+        plevel->fg_tiles[i][y] = (unsigned int) '.';
+      plevel->fg_tiles[i][plevel->width] = (unsigned int) '\0';
+
+      plevel->dn_tiles[i] = (unsigned int*) malloc((plevel->width+1)*sizeof(unsigned int));
+      plevel->dn_tiles[i][plevel->width] = (unsigned int) '\0';
+      for(y = 0; y < plevel->width; ++y)
+        plevel->dn_tiles[i][y] = (unsigned int) '.';
+      plevel->dn_tiles[i][plevel->width] = (unsigned int) '\0';
     }
 }
 
 /* Load data for this level: */
 /* Returns -1, if the loading of the level failed. */
-int level_load(st_level* plevel,const  char *subset, int level)
+int level_load(st_level* plevel, const  char *subset, int level)
 {
   char filename[1024];
 
@@ -231,7 +249,6 @@ int level_load(st_level* plevel,const  char *subset, int level)
 
 int level_load(st_level* plevel, const char* filename)
 {
-  int x, y;
   FILE * fi;
   lisp_object_t* root_obj = 0;
   fi = fopen(filename, "r");
@@ -250,12 +267,17 @@ int level_load(st_level* plevel, const char* filename)
       printf("World: Parse Error in file %s", filename);
     }
 
-  vector<int> vi;
+  vector<int> ia_tm;
+  vector<int> dn_tm;
+  vector<int> bg_tm;
+  vector<int> fg_tm;
 
+  int version = 0;
   if (strcmp(lisp_symbol(lisp_car(root_obj)), "supertux-level") == 0)
     {
       LispReader reader(lisp_cdr(root_obj));
-      
+
+      reader.read_int("version",  &version);
       reader.read_int("width",  &plevel->width);
       reader.read_int("time",  &plevel->time_left);
       reader.read_int("bkgd_red",  &plevel->bkgd_red);
@@ -266,20 +288,94 @@ int level_load(st_level* plevel, const char* filename)
       reader.read_string("theme",  &plevel->theme);
       reader.read_string("music",  &plevel->song_title);
       reader.read_string("background",  &plevel->bkgd_image);
-      reader.read_int_vector("tilemap",  &vi);
+      reader.read_string("particle_system", &plevel->particle_system);
+      reader.read_int_vector("background-tm",  &bg_tm);
+
+      if (!reader.read_int_vector("interactive-tm", &ia_tm))
+        reader.read_int_vector("tilemap", &ia_tm);
+
+      reader.read_int_vector("dynamic-tm",     &dn_tm);
+      reader.read_int_vector("foreground-tm",  &fg_tm);
+
+      // Convert old levels to the new tile numbers
+      if (version == 0)
+        {
+          int transtable[256];
+          transtable[(int)'.'] = 0;
+          transtable[(int)'0'] = 0;
+          transtable[(int)'1'] = 1;
+          transtable[(int)'2'] = 2;
+          transtable[(int)'x'] = 77;
+          transtable[(int)'X'] = 77;
+          transtable[(int)'y'] = 78;
+          transtable[(int)'Y'] = 78;
+          transtable[(int)'A'] = 83;
+          transtable[(int)'B'] = 102;
+          transtable[(int)'!'] = 103;
+          transtable[(int)'a'] = 84;
+          transtable[(int)'C'] = 85;
+          transtable[(int)'D'] = 86;
+          transtable[(int)'E'] = 87;
+          transtable[(int)'F'] = 88;
+          transtable[(int)'c'] = 89;
+          transtable[(int)'d'] = 90;
+          transtable[(int)'e'] = 91;
+          transtable[(int)'f'] = 92;
+
+          transtable[(int)'G'] = 93;
+          transtable[(int)'H'] = 94;
+          transtable[(int)'I'] = 95;
+          transtable[(int)'J'] = 96;
+
+          transtable[(int)'g'] = 97;
+          transtable[(int)'h'] = 98;
+          transtable[(int)'i'] = 99;
+          transtable[(int)'j'] = 100
+;
+          transtable[(int)'#'] = 11;
+          transtable[(int)'['] = 13; 
+          transtable[(int)'='] = 14;
+          transtable[(int)']'] = 15;
+          transtable[(int)'$'] = 82;
+          transtable[(int)'^'] = 76;
+          transtable[(int)'*'] = 80;
+          transtable[(int)'|'] = 79;
+          transtable[(int)'\\'] = 81;
+          transtable[(int)'&'] = 75;
+
+          for(std::vector<int>::iterator i = ia_tm.begin(); i != ia_tm.end(); ++i)
+            if (*i < 256)
+              *i = transtable[*i];
+            else
+              puts("Error: Value to high, conversion will fail");
+        }
+    }
+
+  for(int i = 0; i < 15; ++i)
+    {
+      plevel->dn_tiles[i] = (unsigned int*) calloc((plevel->width +1) , sizeof(unsigned int) );
+      plevel->ia_tiles[i] = (unsigned int*) calloc((plevel->width +1) , sizeof(unsigned int) );
+      plevel->bg_tiles[i] = (unsigned int*) calloc((plevel->width +1) , sizeof(unsigned int) );
+      plevel->fg_tiles[i] = (unsigned int*) calloc((plevel->width +1) , sizeof(unsigned int) );
     }
-    
-    
-  int i;
-  for( i = 0; i < 15; ++i)
-    plevel->tiles[i] = (unsigned int*) calloc((plevel->width +1) , sizeof(unsigned int) );
 
-  i = 0;
+  int i = 0;
   int j = 0;
-  for(vector<int>::iterator it = vi.begin(); it != vi.end(); ++it, ++i)
+  for(vector<int>::iterator it = ia_tm.begin(); it != ia_tm.end(); ++it, ++i)
+    {
+      plevel->ia_tiles[j][i] = (*it);
+      if(i == plevel->width - 1)
+        {
+          i = -1;
+          ++j;
+        }
+    }
+
+  i = j = 0;
+  for(vector<int>::iterator it = dn_tm.begin(); it != dn_tm.end(); ++it, ++i)
     {
 
-      plevel->tiles[j][i] = (*it);
+      plevel->dn_tiles[j][i] = (*it);
       if(i == plevel->width - 1)
         {
           i = -1;
@@ -287,23 +383,47 @@ int level_load(st_level* plevel, const char* filename)
         }
     }
 
-  /* Set the global gravity to the latest loaded level's gravity */
-  gravity = plevel->gravity;
+  i = j = 0;
+  for(vector<int>::iterator it = bg_tm.begin(); it != bg_tm.end(); ++it, ++i)
+    {
 
-  /*  Mark the end position of this level! - Is a bit wrong here thought */
+      plevel->bg_tiles[j][i] = (*it);
+      if(i == plevel->width - 1)
+        {
+          i = -1;
+          ++j;
+        }
+    }
 
-  for (y = 0; y < 15; ++y)
+  i = j = 0;
+  for(vector<int>::iterator it = fg_tm.begin(); it != fg_tm.end(); ++it, ++i)
     {
-      for (x = 0; x < plevel->width; ++x)
+
+      plevel->fg_tiles[j][i] = (*it);
+      if(i == plevel->width - 1)
         {
-          if(plevel->tiles[y][x] == '|')
-            {
-              if(x*32 > endpos)
-                endpos = x*32;
-            }
+          i = -1;
+          ++j;
         }
     }
 
+  /* Set the global gravity to the latest loaded level's gravity */
+  gravity = plevel->gravity;
+
+  /*  Mark the end position of this level! - Is a bit wrong here thought * /
+
+  for (y = 0; y < 15; ++y)
+  {
+  for (x = 0; x < plevel->width; ++x)
+  {
+  if(plevel->tiles[y][x] == '|')
+  {
+  if(x*32 > endpos)
+  endpos = x*32;
+  }
+  }
+  }*/
+
   fclose(fi);
   return 0;
 }
@@ -333,30 +453,59 @@ void level_save(st_level* plevel,const  char * subset, int level)
     }
 
 
-        /* Write header: */
-      fprintf(fi,";SuperTux-Level\n");
-      fprintf(fi,"(supertux-level\n");
-
-      fprintf(fi,"  (name \"%s\")\n", plevel->name.c_str());
-      fprintf(fi,"  (theme \"%s\")\n", plevel->theme.c_str());
-      fprintf(fi,"  (music \"%s\")\n", plevel->song_title.c_str());
-      fprintf(fi,"  (background \"%s\")\n", plevel->bkgd_image.c_str());
-      fprintf(fi,"  (bkgd_red %d)\n", plevel->bkgd_red);
-      fprintf(fi,"  (bkgd_green %d)\n", plevel->bkgd_green);
-      fprintf(fi,"  (bkgd_blue %d)\n", plevel->bkgd_blue);
-      fprintf(fi,"  (time %d)\n", plevel->time_left);
-      fprintf(fi,"  (width %d)\n", plevel->width);
-      fprintf(fi,"  (gravity %2.1f)\n", plevel->gravity);
-      fprintf(fi,"  (tilemap ");     
-       
+  /* Write header: */
+  fprintf(fi,";SuperTux-Level\n");
+  fprintf(fi,"(supertux-level\n");
+
+  fprintf(fi,"  (version %d)\n", 1);
+  fprintf(fi,"  (name \"%s\")\n", plevel->name.c_str());
+  fprintf(fi,"  (theme \"%s\")\n", plevel->theme.c_str());
+  fprintf(fi,"  (music \"%s\")\n", plevel->song_title.c_str());
+  fprintf(fi,"  (background \"%s\")\n", plevel->bkgd_image.c_str());
+  fprintf(fi,"  (particle_system \"%s\")\n", plevel->particle_system.c_str());
+  fprintf(fi,"  (bkgd_red %d)\n", plevel->bkgd_red);
+  fprintf(fi,"  (bkgd_green %d)\n", plevel->bkgd_green);
+  fprintf(fi,"  (bkgd_blue %d)\n", plevel->bkgd_blue);
+  fprintf(fi,"  (time %d)\n", plevel->time_left);
+  fprintf(fi,"  (width %d)\n", plevel->width);
+  fprintf(fi,"  (gravity %2.1f)\n", plevel->gravity);
+  fprintf(fi,"  (background-tm ");
+
+  for(y = 0; y < 15; ++y)
+    {
+      for(i = 0; i < plevel->width; ++i)
+        fprintf(fi," %d ", plevel->bg_tiles[y][i]);
+    }
+
+  fprintf( fi,")\n");
+  fprintf(fi,"  (interactive-tm ");
+
+  for(y = 0; y < 15; ++y)
+    {
+      for(i = 0; i < plevel->width; ++i)
+        fprintf(fi," %d ", plevel->ia_tiles[y][i]);
+    }
+
+  fprintf( fi,")\n");
+  fprintf(fi,"  (dynamic-tm ");
+
+  for(y = 0; y < 15; ++y)
+    {
+      for(i = 0; i < plevel->width; ++i)
+        fprintf(fi," %d ", plevel->dn_tiles[y][i]);
+    }
+
+  fprintf( fi,")\n");
+  fprintf(fi,"  (foreground-tm ");
+
   for(y = 0; y < 15; ++y)
     {
-    for(i = 0; i < plevel->width; ++i)
-    fprintf(fi," %d ", plevel->tiles[y][i]); 
+      for(i = 0; i < plevel->width; ++i)
+        fprintf(fi," %d ", plevel->fg_tiles[y][i]);
     }
-    
-      fprintf( fi,")");    
-      fprintf( fi,")\n");
+
+  fprintf( fi,")");
+  fprintf( fi,")\n");
 
   fclose(fi);
 }
@@ -368,7 +517,13 @@ void level_free(st_level* plevel)
 {
   int i;
   for(i=0; i < 15; ++i)
-    free(plevel->tiles[i]);
+    free(plevel->bg_tiles[i]);
+  for(i=0; i < 15; ++i)
+    free(plevel->ia_tiles[i]);
+  for(i=0; i < 15; ++i)
+    free(plevel->dn_tiles[i]);
+  for(i=0; i < 15; ++i)
+    free(plevel->fg_tiles[i]);
 
   plevel->name.clear();
   plevel->theme.clear();
@@ -446,9 +601,35 @@ void level_load_image(texture_type* ptexture, string theme,const  char * file, i
   texture_load(ptexture, fname, use_alpha);
 }
 
+void tilemap_change_size(unsigned int** tilemap[15], int w, int old_w)
+{
+  int j,y;
+  for(y = 0; y < 15; ++y)
+    {
+      *tilemap[y] = (unsigned int*) realloc(*tilemap[y],(w+1)*sizeof(unsigned int));
+      if(w > old_w)
+        for(j = 0; j < w - old_w; ++j)
+          *tilemap[y][old_w+j] = 0;
+      *tilemap[y][w] = 0;
+    }
+}
+
+/* Change the size of a level (width) */
+void level_change_size (st_level* plevel, int new_width)
+{
+  if(new_width < 21)
+    new_width = 21;
+  tilemap_change_size((unsigned int***)&plevel->ia_tiles,new_width,plevel->width);
+  tilemap_change_size((unsigned int***)&plevel->dn_tiles,new_width,plevel->width);
+  tilemap_change_size((unsigned int***)&plevel->bg_tiles,new_width,plevel->width);
+  tilemap_change_size((unsigned int***)&plevel->fg_tiles,new_width,plevel->width);
+  plevel->width = new_width;
+
+}
+
 /* Edit a piece of the map! */
 
-void level_change(st_level* plevel, float x, float y, unsigned char c)
+void level_change(st_level* plevel, float x, float y, int tm, unsigned int c)
 {
   int xx, yy;
 
@@ -456,7 +637,19 @@ void level_change(st_level* plevel, float x, float y, unsigned char c)
   xx = ((int)x / 32);
 
   if (yy >= 0 && yy < 15 && xx >= 0 && xx <= plevel->width)
-    plevel->tiles[yy][xx] = c;
+    {
+      switch(tm)
+        {
+        case 0:
+          plevel->bg_tiles[yy][xx] = c;
+        case 1:
+          plevel->ia_tiles[yy][xx] = c;
+        case 2:
+          plevel->dn_tiles[yy][xx] = c;
+        case 4:
+          plevel->fg_tiles[yy][xx] = c;
+        }
+    }
 }
 
 /* Free music data for this level: */