src/leveleditor.c

   1
   2 /***************************************************************************
   3  *                                                                         *
   4  *   This program is free software; you can redistribute it and/or modify  *
   5  *   it under the terms of the GNU General Public License as published by  *
   6  *   the Free Software Foundation; either version 2 of the License, or     *
   7  *   (at your option) any later version.                                   *
   8  *                                                                         *
   9  ***************************************************************************/
  10
  11 /*  December 28, 2003 - January 1st, 2004 */
  12
  13 /* leveleditor.c - A built-in level editor for SuperTux
  14  by Ricardo Cruz <rick2@aeiou.pt>                      */
  15
  16 #include <stdio.h>
  17 #include <stdlib.h>
  18 #include <string.h>
  19 #include <errno.h>
  20 #include <unistd.h>
  21 #include <SDL.h>
  22 #include <SDL_image.h>
  23 #include "leveleditor.h"
  24
  25 #include "screen.h"
  26 #include "defines.h"
  27 #include "globals.h"
  28 #include "setup.h"
  29 #include "menu.h"
  30 #include "level.h"
  31 #include "badguy.h"
  32 #include "gameloop.h"
  33 #include "scene.h"
  34
  35 /* definitions to aid development */
  36 #define DONE_LEVELEDITOR    1
  37 #define DONE_QUIT        2
  38 #define DONE_CHANGELEVEL  3
  39
  40 /* definitions that affect gameplay */
  41 #define KEY_CURSOR_SPEED 32
  42 #define KEY_CURSOR_FASTSPEED 64
  43
  44 #define CURSOR_LEFT_MARGIN 96
  45 #define CURSOR_RIGHT_MARGIN 512
  46 /* right_margin should noticed that the cursor is 32 pixels,
  47    so it should subtract that value */
  48
  49 #define MOUSE_LEFT_MARGIN 32
  50 #define MOUSE_RIGHT_MARGIN 608
  51 #define MOUSE_POS_SPEED 32
  52
  53 /* Level Intro: */
  54 /*
  55   clearscreen(0, 0, 0);
  56
  57   sprintf(str, "Editing Level %s", levelfilename);
  58   drawcenteredtext(str, 200, letters_red, NO_UPDATE, 1);
  59
  60   sprintf(str, "%s", levelname);
  61   drawcenteredtext(str, 224, letters_gold, NO_UPDATE, 1);
  62
  63   flipscreen();
  64
  65   SDL_Delay(1000);
  66 */
  67
  68 /* gameloop funcs declerations */
  69
  70 void loadshared(void);
  71 void unloadshared(void);
  72
  73 /* own declerations */
  74
  75 void savelevel();
  76 void le_change(float x, float y, unsigned char c);
  77 void showhelp();
  78 void le_set_defaults(void);
  79 void le_activate_bad_guys(void);
  80
  81 /* global variables (based on the gameloop ones) */
  82
  83 int level;
  84 st_level current_level;
  85 char level_subset[100];
  86
  87 int frame;
  88 texture_type selection;
  89 int last_time, now_time;
  90
  91 void le_activate_bad_guys(void)
  92 {
  93   int x,y;
  94
  95   /* Activate bad guys: */
  96
  97   /* as oposed to the gameloop.c func, this one doesn't remove
  98   the badguys from tiles                                    */
  99
 100   for (y = 0; y < 15; ++y)
 101     for (x = 0; x < current_level.width; ++x)
 102       if (current_level.tiles[y][x] >= '0' && current_level.tiles[y][x] <= '9')
 103         add_bad_guy(x * 32, y * 32, current_level.tiles[y][x] - '0');
 104 }
 105
 106 void le_set_defaults()
 107 {
 108   /* Set defaults: */
 109
 110   if(current_level.time_left == 0)
 111     current_level.time_left = 255;
 112 }
 113
 114 /* FIXME: Needs to be implemented. It should ask the user for the level(file)name and then let him create a new level based on this. */
 115 void newlevel()
 116 {}
 117
 118 /* FIXME: It should let select the user a level, which is in the leveldirectory and then load it. */
 119 void selectlevel()
 120 {}
 121
 122 int leveleditor()
 123 {
 124   char str[LEVEL_NAME_MAX];
 125   int done;
 126   int x, y, i;  /* for cicles */
 127   int pos_x, cursor_x, cursor_y, fire;
 128   SDL_Event event;
 129   SDLKey key;
 130   SDLMod keymod;
 131
 132   strcpy(level_subset,"default");
 133
 134   level = 1;
 135
 136   initmenu();
 137   menumenu = MENU_LEVELEDITOR;
 138   show_menu = YES;
 139
 140   frame = 0;    /* support for frames in some tiles, like waves and bad guys */
 141
 142   loadshared();
 143   set_defaults();
 144
 145   loadlevel(&current_level,"default",level);
 146   loadlevelgfx(&current_level);
 147
 148   le_activate_bad_guys();
 149   le_set_defaults();
 150
 151   texture_load(&selection,DATA_PREFIX "/images/leveleditor/select.png", USE_ALPHA);
 152
 153   done = 0;
 154   pos_x = 0;
 155   cursor_x = 3*32;
 156   cursor_y = 2*32;
 157   fire = DOWN;
 158
 159   SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
 160
 161   while(1)
 162     {
 163       clearscreen(current_level.bkgd_red, current_level.bkgd_green, current_level.bkgd_blue);
 164
 165       last_time = SDL_GetTicks();
 166       frame++;
 167
 168       keymod = SDL_GetModState();
 169
 170       while(SDL_PollEvent(&event))
 171         {
 172           // testing SDL_KEYDOWN, SDL_KEYUP and SDL_QUIT events
 173           switch(event.type)
 174             {
 175             case SDL_KEYDOWN:   // key pressed
 176               key = event.key.keysym.sym;
 177               if(show_menu)
 178                 {
 179                   menu_event(key);
 180                   break;
 181                 }
 182               switch(key)
 183                 {
 184                 case SDLK_LEFT:
 185                   if(fire == DOWN)
 186                     cursor_x -= KEY_CURSOR_SPEED;
 187                   else
 188                     cursor_x -= KEY_CURSOR_FASTSPEED;
 189
 190                   if(cursor_x < 0)
 191                     cursor_x = 0;
 192                   break;
 193                 case SDLK_RIGHT:
 194                   if(fire == DOWN)
 195                     cursor_x += KEY_CURSOR_SPEED;
 196                   else
 197                     cursor_x += KEY_CURSOR_FASTSPEED;
 198
 199                   if(cursor_x > (current_level.width*32) - 1)
 200                     cursor_x = (current_level.width*32) - 1;
 201                   break;
 202                 case SDLK_UP:
 203                   if(fire == DOWN)
 204                     cursor_y -= KEY_CURSOR_SPEED;
 205                   else
 206                     cursor_y -= KEY_CURSOR_FASTSPEED;
 207
 208                   if(cursor_y < 0)
 209                     cursor_y = 0;
 210                   break;
 211                 case SDLK_DOWN:
 212                   if(fire == DOWN)
 213                     cursor_y += KEY_CURSOR_SPEED;
 214                   else
 215                     cursor_y += KEY_CURSOR_FASTSPEED;
 216
 217                   if(cursor_y > screen->h-32)
 218                     cursor_y = screen->h-32;
 219                   break;
 220                 case SDLK_LCTRL:
 221                   fire =UP;
 222                   break;
 223                 case SDLK_F1:
 224                   showhelp();
 225                   break;
 226                 case SDLK_HOME:
 227                   cursor_x = 0;
 228                   break;
 229                 case SDLK_END:
 230                   cursor_x = (current_level.width * 32) - 32;
 231                   break;
 232                 case SDLK_PERIOD:
 233                   le_change(cursor_x, cursor_y, '.');
 234                   break;
 235                 case SDLK_a:
 236                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 237                     le_change(cursor_x, cursor_y, 'A');
 238                   else
 239                     le_change(cursor_x, cursor_y, 'a');
 240                   break;
 241                 case SDLK_b:
 242                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 243                     le_change(cursor_x, cursor_y, 'B');
 244                   break;
 245                 case SDLK_c:
 246                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 247                     le_change(cursor_x, cursor_y, 'C');
 248                   else
 249                     le_change(cursor_x, cursor_y, 'c');
 250                   break;
 251                 case SDLK_d:
 252                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 253                     le_change(cursor_x, cursor_y, 'D');
 254                   else
 255                     le_change(cursor_x, cursor_y, 'd');
 256                   break;
 257                 case SDLK_e:
 258                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 259                     le_change(cursor_x, cursor_y, 'E');
 260                   else
 261                     le_change(cursor_x, cursor_y, 'e');
 262                   break;
 263                 case SDLK_f:
 264                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 265                     le_change(cursor_x, cursor_y, 'F');
 266                   else
 267                     le_change(cursor_x, cursor_y, 'f');
 268                   break;
 269                 case SDLK_g:
 270                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 271                     le_change(cursor_x, cursor_y, 'G');
 272                   else
 273                     le_change(cursor_x, cursor_y, 'g');
 274                   break;
 275                 case SDLK_h:
 276                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 277                     le_change(cursor_x, cursor_y, 'H');
 278                   else
 279                     le_change(cursor_x, cursor_y, 'h');
 280                   break;
 281                 case SDLK_i:
 282                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 283                     le_change(cursor_x, cursor_y, 'I');
 284                   else
 285                     le_change(cursor_x, cursor_y, 'i');
 286                   break;
 287                 case SDLK_j:
 288                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 289                     le_change(cursor_x, cursor_y, 'J');
 290                   else
 291                     le_change(cursor_x, cursor_y, 'j');
 292                   break;
 293                 case SDLK_x:
 294                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 295                     le_change(cursor_x, cursor_y, 'X');
 296                   else
 297                     le_change(cursor_x, cursor_y, 'x');
 298                   break;
 299                 case SDLK_y:
 300                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 301                     le_change(cursor_x, cursor_y, 'Y');
 302                   else
 303                     le_change(cursor_x, cursor_y, 'y');
 304                   break;
 305                 case SDLK_LEFTBRACKET:
 306                   le_change(cursor_x, cursor_y, '[');
 307                   break;
 308                 case SDLK_RIGHTBRACKET:
 309                   le_change(cursor_x, cursor_y, ']');
 310                   break;
 311                 case SDLK_HASH:
 312                 case SDLK_3:
 313                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 314                     le_change(cursor_x, cursor_y, '#');
 315                   break;
 316                 case SDLK_DOLLAR:
 317                 case SDLK_4:
 318                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 319                     le_change(cursor_x, cursor_y, '$');
 320                   break;
 321                 case SDLK_BACKSLASH:
 322                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 323                     le_change(cursor_x, cursor_y, '|');
 324                   else
 325                     le_change(cursor_x, cursor_y, '\\');
 326                   break;
 327                 case SDLK_CARET:
 328                   le_change(cursor_x, cursor_y, '^');
 329                   break;
 330                 case SDLK_AMPERSAND:
 331                 case SDLK_6:
 332                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 333                     le_change(cursor_x, cursor_y, '&');
 334                   break;
 335                 case SDLK_EQUALS:
 336                 case SDLK_0:
 337                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 338                     le_change(cursor_x, cursor_y, '=');
 339                   else          /* let's add a bad guy */
 340                     le_change(cursor_x, cursor_y, '0');
 341
 342                   for(i = 0; i < NUM_BAD_GUYS; ++i)
 343                     if (bad_guys[i].alive == NO)
 344                       {
 345                         bad_guys[i].alive = YES;
 346                         bad_guys[i].kind = BAD_BSOD;
 347                         bad_guys[i].x = (((int)cursor_x/32)*32);
 348                         bad_guys[i].y = (((int)cursor_y/32)*32);
 349                         i = NUM_BAD_GUYS;
 350                       }
 351                   break;
 352                 case SDLK_1:
 353                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 354                     le_change(cursor_x, cursor_y, '!');
 355                   else          /* let's add a bad guy */
 356                     le_change(cursor_x, cursor_y, '1');
 357
 358                   for(i = 0; i < NUM_BAD_GUYS; ++i)
 359                     if (bad_guys[i].alive == NO)
 360                       {
 361                         bad_guys[i].alive = YES;
 362                         bad_guys[i].kind = BAD_LAPTOP;
 363                         bad_guys[i].x = (((int)cursor_x/32)*32);
 364                         bad_guys[i].y = (((int)cursor_y/32)*32);
 365                         i = NUM_BAD_GUYS;
 366                       }
 367                   break;
 368                 case SDLK_2:
 369                   le_change(cursor_x, cursor_y, '2');
 370
 371                   for(i = 0; i < NUM_BAD_GUYS; ++i)
 372                     if (bad_guys[i].alive == NO)
 373                       {
 374                         bad_guys[i].alive = YES;
 375                         bad_guys[i].kind = BAD_MONEY;
 376                         bad_guys[i].x = (((int)cursor_x/32)*32);
 377                         bad_guys[i].y = (((int)cursor_y/32)*32);
 378                         i = NUM_BAD_GUYS;
 379                       }
 380                   break;
 381                 case SDLK_PLUS:
 382                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 383                     le_change(cursor_x, cursor_y, '*');
 384                   break;
 385                 default:
 386                   break;
 387                 }
 388               break;
 389             case SDL_KEYUP:     // key released
 390               switch(event.key.keysym.sym)
 391                 {
 392                 case SDLK_LCTRL:
 393                   fire = DOWN;
 394                   break;
 395                 case SDLK_ESCAPE:
 396                   if(!show_menu)
 397                     show_menu = YES;
 398                   else
 399                     show_menu = NO;
 400                   break;
 401                 default:
 402                   break;
 403                 }
 404               break;
 405               /*            case SDL_MOUSEBUTTONDOWN:
 406                             if(event.button.button == SDL_BUTTON_LEFT)
 407                               {
 408               This will draw current tile in the cursor position, when the interface is done.
 409                               }
 410                             break;*/
 411             case SDL_MOUSEMOTION:
 412               if(!show_menu)
 413                 {
 414                   x = event.motion.x;
 415                   y = event.motion.y;
 416
 417                   cursor_x = ((int)(pos_x + x) / 32) * 32;
 418                   cursor_y = ((int) y / 32) * 32;
 419                 }
 420               break;
 421             case SDL_QUIT:      // window closed
 422               done = DONE_QUIT;
 423               break;
 424             default:
 425               break;
 426             }
 427         }
 428
 429       /* mouse movements */
 430       /*      x = event.motion.x;
 431             if(x < MOUSE_LEFT_MARGIN)
 432               pos_x -= MOUSE_POS_SPEED;
 433             else if(x > MOUSE_RIGHT_MARGIN)
 434               pos_x += MOUSE_POS_SPEED;*/
 435
 436
 437       if(cursor_x < pos_x + CURSOR_LEFT_MARGIN)
 438         pos_x = cursor_x - CURSOR_LEFT_MARGIN;
 439
 440       if(cursor_x > pos_x + CURSOR_RIGHT_MARGIN)
 441         pos_x = cursor_x - CURSOR_RIGHT_MARGIN;
 442
 443       if(pos_x < 0)
 444         pos_x = 0;
 445       if(pos_x > (current_level.width * 32) - screen->w)
 446         pos_x = (current_level.width * 32) - screen->w;
 447
 448       for (y = 0; y < 15; ++y)
 449         for (x = 0; x < 21; ++x)
 450           drawshape(x * 32, y * 32, current_level.tiles[y][x + (pos_x / 32)]);
 451
 452       /* Draw the Bad guys: */
 453       for (i = 0; i < NUM_BAD_GUYS; ++i)
 454         {
 455           /* printf("\nbad_guys[%i].alive = %i", i, bad_guys[i].alive); */
 456           if(bad_guys[i].alive == NO)
 457             continue;
 458           /* to support frames: img_bsod_left[(frame / 5) % 4] */
 459           if(bad_guys[i].kind == BAD_BSOD)
 460             texture_draw(&img_bsod_left[(frame / 5) % 4], ((int)(bad_guys[i].x - pos_x)/32)*32, bad_guys[i].y, NO_UPDATE);
 461           else if(bad_guys[i].kind == BAD_LAPTOP)
 462             texture_draw(&img_laptop_left[(frame / 5) % 3], ((int)(bad_guys[i].x - pos_x)/32)*32, bad_guys[i].y, NO_UPDATE);
 463           else if (bad_guys[i].kind == BAD_MONEY)
 464             texture_draw(&img_money_left[(frame / 5) % 2], ((int)(bad_guys[i].x - pos_x)/32)*32, bad_guys[i].y, NO_UPDATE);
 465         }
 466
 467
 468       texture_draw(&selection, ((int)(cursor_x - pos_x)/32)*32, cursor_y, NO_UPDATE);
 469
 470       sprintf(str, "%d", current_level.time_left);
 471       drawtext("TIME", 324, 0, letters_blue, NO_UPDATE, 1);
 472       drawtext(str, 404, 0, letters_gold, NO_UPDATE, 1);
 473
 474       sprintf(str, "%s", current_level.name);
 475       drawtext("NAME", 0, 0, letters_blue, NO_UPDATE, 1);
 476       drawtext(str, 80, 0, letters_gold, NO_UPDATE, 1);
 477
 478       drawtext("F1 for Help", 10, 430, letters_blue, NO_UPDATE, 1);
 479
 480       if(show_menu)
 481         {
 482           done = drawmenu();
 483           if(done)
 484             return 0;
 485         }
 486       if(done == DONE_QUIT)
 487         return 1;
 488
 489       SDL_Delay(50);
 490       now_time = SDL_GetTicks();
 491       if (now_time < last_time + FPS)
 492         SDL_Delay(last_time + FPS - now_time);  /* delay some time */
 493
 494       flipscreen();
 495     }
 496
 497   unloadlevelgfx();
 498   unloadshared();
 499
 500   texture_free(&selection);
 501
 502   return done;
 503 }
 504
 505 void le_change(float x, float y, unsigned char c)
 506 {
 507 int i;
 508 int xx, yy;
 509
 510   level_change(&current_level,x,y,c);
 511
 512   yy = (y / 32);
 513   xx = (x / 32);
 514
 515   /* if there is a bad guy over there, remove it */
 516   for(i = 0; i < NUM_BAD_GUYS; ++i)
 517     if (bad_guys[i].alive)
 518       if(xx == bad_guys[i].x/32 && yy == bad_guys[i].y/32)
 519         bad_guys[i].alive = NO;
 520 }
 521
 522 /* Save data for this level: */
 523 void savelevel(void)
 524 {
 525   FILE * fi;
 526   char * filename;
 527   int y;
 528   char str[80];
 529
 530   /* Save data file: */
 531
 532   filename = (char *) malloc(sizeof(char) * (strlen(DATA_PREFIX) + 20) + strlen(level_subset));
 533   sprintf(filename, "%s/levels/%s/level%d.dat", DATA_PREFIX, level_subset, level);
 534   fi = fopen(filename, "w");
 535   if (fi == NULL)
 536     {
 537       perror(filename);
 538       st_shutdown();
 539       free(filename);
 540       exit(-1);
 541     }
 542   free(filename);
 543
 544
 545   /* sptrinf("# Level created by SuperTux built-in editor", fi); */
 546
 547   fputs(current_level.name, fi);
 548   fputs("\n", fi);
 549   fputs(current_level.theme, fi);
 550   fputs("\n", fi);
 551   sprintf(str, "%d\n", current_level.time_left);        /* time */
 552   fputs(str, fi);
 553   fputs(current_level.song_title, fi);  /* song filename */
 554   sprintf(str, "\n%d\n", current_level.bkgd_red);       /* red background color */
 555   fputs(str, fi);
 556   sprintf(str, "%d\n", current_level.bkgd_green);       /* green background color */
 557   fputs(str, fi);
 558   sprintf(str, "%d\n", current_level.bkgd_blue);        /* blue background color */
 559   fputs(str, fi);
 560   sprintf(str, "%d\n", current_level.width);    /* level width */
 561   fputs(str, fi);
 562
 563   for(y = 0; y < 15; ++y)
 564     {
 565       fputs(current_level.tiles[y], fi);
 566       fputs("\n", fi);
 567     }
 568
 569   fclose(fi);
 570
 571   drawcenteredtext("SAVED!", 240, letters_gold, NO_UPDATE, 1);
 572   flipscreen();
 573   SDL_Delay(1000);
 574 }
 575
 576 void showhelp()
 577 {
 578   SDL_Event event;
 579   int done;
 580   char *text[] = {
 581                    "X/x - Brick0",
 582                    "Y/y - Brick1",
 583                    "A/B/! - Box full",
 584                    "a - Box empty",
 585                    "C-F - Cloud0",
 586                    "c-f - Cloud1",
 587                    "G-J - Bkgd0",
 588                    "g-j - Bkgd1",
 589                    "# - Solid0",
 590                    "[ - Solid1",
 591                    "= - Solid2",
 592                    "] - Solid3",
 593                    "$ - Distro",
 594                    "^ - Waves",
 595                    "* - Poletop",
 596                    "| - Pole",
 597                    "\\ - Flag",
 598                    "& - Water",
 599                    "0-2 - BadGuys",
 600                    "./Del - Remove tile",
 601                    "Esc - Menu"};
 602
 603
 604   drawcenteredtext("- Help -", 30, letters_red, NO_UPDATE, 2);
 605   drawtext("Keys:", 80, 60, letters_gold, NO_UPDATE, 1);
 606
 607   int i;
 608   for(i = 0; i < sizeof(text)/sizeof(char *); i++)
 609     drawtext(text[i], 40, 90+(i*16), letters_blue, NO_UPDATE, 1);
 610
 611   drawcenteredtext("Press Any Key to Continue", 460, letters_gold, NO_UPDATE, 1);
 612
 613   flipscreen();
 614
 615   done = 0;
 616
 617   while(done == 0)
 618     while(SDL_PollEvent(&event))
 619       switch(event.type)
 620         {
 621         case SDL_MOUSEBUTTONDOWN:               // mouse pressed
 622         case SDL_KEYDOWN:               // key pressed
 623           done = 1;
 624           break;
 625         default:
 626           break;
 627         }
 628 }