src/leveleditor.c

   1 /***************************************************************************
   2  *                                                                         *
   3  *   This program is free software; you can redistribute it and/or modify  *
   4  *   it under the terms of the GNU General Public License as published by  *
   5  *   the Free Software Foundation; either version 2 of the License, or     *
   6  *   (at your option) any later version.                                   *
   7  *                                                                         *
   8  ***************************************************************************/
   9
  10 /*  December 28, 2003 - February 1st, 2004 */
  11
  12 /* leveleditor.c - A built-in level editor for SuperTux
  13  by Ricardo Cruz <rick2@aeiou.pt>                      */
  14
  15 #include <stdio.h>
  16 #include <stdlib.h>
  17 #include <string.h>
  18 #include <errno.h>
  19 #include <unistd.h>
  20 #include <SDL.h>
  21 #include <SDL_image.h>
  22 #include "leveleditor.h"
  23
  24 #include "screen.h"
  25 #include "defines.h"
  26 #include "globals.h"
  27 #include "setup.h"
  28 #include "menu.h"
  29 #include "level.h"
  30 #include "badguy.h"
  31 #include "scene.h"
  32 #include "button.h"
  33
  34 /* definitions to aid development */
  35 #define DONE_LEVELEDITOR 1
  36 #define DONE_QUIT        2
  37 #define DONE_CHANGELEVEL 3
  38
  39 /* definitions that affect gameplay */
  40 #define KEY_CURSOR_SPEED 32
  41 #define KEY_CURSOR_FASTSPEED 64
  42
  43 /* when pagedown/up pressed speed:*/
  44 #define PAGE_CURSOR_SPEED 13*32
  45
  46 #define MOUSE_LEFT_MARGIN 80
  47 #define MOUSE_RIGHT_MARGIN (560-32)
  48 /* right_margin should noticed that the cursor is 32 pixels,
  49    so it should subtract that value */
  50 #define MOUSE_POS_SPEED 20
  51
  52 /* look */
  53 #define SELECT_W 2 // size of the selections lines
  54 #define SELECT_CLR 0, 255, 0, 255  // lines color (R, G, B, A)
  55
  56 /* gameloop funcs declerations */
  57
  58 void loadshared(void);
  59 void unloadshared(void);
  60
  61 /* own declerations */
  62 /* crutial ones (main loop) */
  63 int le_init();
  64 void le_quit();
  65 void le_drawlevel();
  66 void le_drawinterface();
  67 void le_checkevents();
  68 void le_change(float x, float y, unsigned char c);
  69 void le_testlevel();
  70 void le_showhelp();
  71 void le_set_defaults(void);
  72 void le_activate_bad_guys(void);
  73 void le_new_subset(char *subset_name);
  74
  75 void le_highlight_selection();
  76
  77 void apply_level_settings_menu();
  78 void update_subset_settings_menu();
  79 void save_subset_settings_menu();
  80
  81 /* leveleditor internals */
  82 static string_list_type level_subsets;
  83 static int le_level_changed;  /* if changes, ask for saving, when quiting*/
  84 static int pos_x, cursor_x, cursor_y, cursor_tile, fire;
  85 static int le_level;
  86 static st_level* le_current_level;
  87 static st_subset le_level_subset;
  88 static int le_show_grid;
  89 static int le_frame;
  90 static texture_type le_selection;
  91 static int done;
  92 static char le_current_tile;
  93 static int le_mouse_pressed;
  94 static button_type le_save_level_bt;
  95 static button_type le_test_level_bt;
  96 static button_type le_next_level_bt;
  97 static button_type le_previous_level_bt;
  98 static button_type le_move_right_bt;
  99 static button_type le_move_left_bt;
 100 static button_type le_rubber_bt;
 101 static button_type le_select_mode_one_bt;
 102 static button_type le_select_mode_two_bt;
 103 static button_type le_bad_bsod_bt;
 104 static button_type le_settings_bt;
 105 static button_panel_type le_bt_panel;
 106 static menu_type leveleditor_menu;
 107 static menu_type subset_load_menu;
 108 static menu_type subset_new_menu;
 109 static menu_type subset_settings_menu;
 110 static menu_type level_settings_menu;
 111
 112 static square selection;
 113 static int le_selection_mode;
 114 static SDL_Event event;
 115
 116 void le_activate_bad_guys(void)
 117 {
 118   int x,y;
 119
 120   /* Activate bad guys: */
 121
 122   /* as oposed to the gameloop.c func, this one doesn't remove
 123   the badguys from tiles                                    */
 124
 125   for (y = 0; y < 15; ++y)
 126     for (x = 0; x < le_current_level->width; ++x)
 127       if (le_current_level->tiles[y][x] >= '0' && le_current_level->tiles[y][x] <= '9')
 128         add_bad_guy(x * 32, y * 32, le_current_level->tiles[y][x] - '0');
 129 }
 130
 131 void le_set_defaults()
 132 {
 133   if(le_current_level != NULL)
 134     {
 135       /* Set defaults: */
 136
 137       if(le_current_level->time_left == 0)
 138         le_current_level->time_left = 255;
 139     }
 140 }
 141
 142 /* 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. */
 143 void newlevel()
 144 {}
 145
 146 /* FIXME: It should let select the user a level, which is in the leveldirectory and then load it. */
 147 void selectlevel()
 148 {}
 149
 150 int leveleditor(int levelnb)
 151 {
 152   int last_time, now_time, i;
 153
 154   le_level = levelnb;
 155   if(le_init() != 0)
 156     return 1;
 157
 158   /* Clear screen: */
 159
 160   clearscreen(0, 0, 0);
 161   updatescreen();
 162
 163   while (SDL_PollEvent(&event))
 164   {}
 165
 166   while(YES)
 167     {
 168       last_time = SDL_GetTicks();
 169       le_frame++;
 170
 171       le_checkevents();
 172
 173       if(le_current_level != NULL)
 174         {
 175           /* making events results to be in order */
 176           if(pos_x < 0)
 177             pos_x = 0;
 178           if(pos_x > (le_current_level->width * 32) - screen->w)
 179             pos_x = (le_current_level->width * 32) - screen->w;
 180
 181           /* draw the level */
 182           le_drawlevel();
 183         }
 184       else
 185         clearscreen(0, 0, 0);
 186
 187       /* draw editor interface */
 188       le_drawinterface();
 189
 190       if(show_menu)
 191         {
 192           menu_process_current();
 193           if(current_menu == &leveleditor_menu)
 194             {
 195               switch (menu_check(&leveleditor_menu))
 196                 {
 197                 case 2:
 198                   show_menu = NO;
 199                   break;
 200                 case 3:
 201                   update_subset_settings_menu();
 202                   break;
 203                 case 7:
 204                   done = DONE_LEVELEDITOR;
 205                   break;
 206                 }
 207             }
 208           else if(current_menu == &level_settings_menu)
 209             {
 210               switch (menu_check(&level_settings_menu))
 211                 {
 212                 case 13:
 213                   apply_level_settings_menu();
 214                   menu_set_current(&leveleditor_menu);
 215                   break;
 216                 default:
 217                   show_menu = YES;
 218                   break;
 219                 }
 220             }
 221           else if(current_menu == &subset_load_menu)
 222             {
 223               switch (i = menu_check(&subset_load_menu))
 224                 {
 225                 case 0:
 226                   break;
 227                 default:
 228                   if(i != -1)
 229                     {
 230                       subset_load(&le_level_subset,level_subsets.item[i-2]);
 231                       leveleditor_menu.item[3].kind = MN_GOTO;
 232                       le_level = 1;
 233                       arrays_init();
 234                       loadshared();
 235                       le_current_level = (st_level*) malloc(sizeof(st_level));
 236                       if(level_load(le_current_level, le_level_subset.name, le_level) != 0)
 237                         {
 238                           le_quit();
 239                           return 1;
 240                         }
 241                       le_set_defaults();
 242                       level_load_gfx(le_current_level);
 243                       le_activate_bad_guys();
 244                       show_menu = YES;
 245                     }
 246                   break;
 247                 }
 248             }
 249           else if(current_menu == &subset_new_menu)
 250             {
 251               if(subset_new_menu.item[2].input[0] == '\0')
 252                 subset_new_menu.item[3].kind = MN_DEACTIVE;
 253               else
 254                 {
 255                   subset_new_menu.item[3].kind = MN_ACTION;
 256
 257                   switch (i = menu_check(&subset_new_menu))
 258                     {
 259                     case 3:
 260                       le_new_subset(subset_new_menu.item[2].input);
 261                       subset_load(&le_level_subset,subset_new_menu.item[2].input);
 262                       leveleditor_menu.item[3].kind = MN_GOTO;
 263                       le_level = 1;
 264                       arrays_init();
 265                       loadshared();
 266                       le_current_level = (st_level*) malloc(sizeof(st_level));
 267                       if(level_load(le_current_level, le_level_subset.name, le_level) != 0)
 268                         {
 269                           le_quit();
 270                           return 1;
 271                         }
 272                       le_set_defaults();
 273                       level_load_gfx(le_current_level);
 274                       le_activate_bad_guys();
 275                       menu_item_change_input(&subset_new_menu.item[2],"");
 276                       show_menu = YES;
 277                       break;
 278                     }
 279                 }
 280             }
 281           else if(current_menu == &subset_settings_menu)
 282             {
 283               if(strcmp(le_level_subset.title,subset_settings_menu.item[2].input) == 0 && strcmp(le_level_subset.description,subset_settings_menu.item[3].input) == 0  )
 284                 subset_settings_menu.item[5].kind = MN_DEACTIVE;
 285               else
 286                 subset_settings_menu.item[5].kind = MN_ACTION;
 287
 288               switch (i = menu_check(&subset_settings_menu))
 289                 {
 290                 case 5:
 291                   save_subset_settings_menu();
 292                   show_menu = YES;
 293                   break;
 294                 }
 295             }
 296         }
 297
 298       if(done)
 299         {
 300           le_quit();
 301           return 0;
 302         }
 303
 304       if(done == DONE_QUIT)
 305         {
 306           le_quit();
 307           return 1;
 308         }
 309
 310       SDL_Delay(25);
 311       now_time = SDL_GetTicks();
 312       if (now_time < last_time + FPS)
 313         SDL_Delay(last_time + FPS - now_time);  /* delay some time */
 314
 315       flipscreen();
 316     }
 317
 318   return done;
 319 }
 320
 321 void le_default_level(st_level* plevel)
 322 {
 323   int i,y;
 324   strcpy(plevel->name,"UnNamed");
 325   strcpy(plevel->theme,"antarctica");
 326   strcpy(plevel->song_title,"Mortimers_chipdisko.mod");
 327   strcpy(plevel->bkgd_image,"arctis.png");
 328   plevel->width = 21;
 329   plevel->time_left = 100;
 330   plevel->gravity = 10.;
 331   plevel->bkgd_red = 0;
 332   plevel->bkgd_green = 0;
 333   plevel->bkgd_blue = 0;
 334
 335   for(i = 0; i < 15; ++i)
 336     {
 337       plevel->tiles[i] = (unsigned char*) malloc((plevel->width+1)*sizeof(unsigned char));
 338       plevel->tiles[i][plevel->width] = (unsigned char) '\0';
 339       for(y = 0; y < plevel->width; ++y)
 340         plevel->tiles[i][y] = (unsigned char) '.';
 341       plevel->tiles[i][plevel->width] = (unsigned char) '\0';
 342     }
 343 }
 344
 345 void le_new_subset(char *subset_name)
 346 {
 347   st_level new_lev;
 348   st_subset new_subset;
 349   new_subset.name = (char*) malloc((strlen(subset_name)+1)*sizeof(char));
 350   strcpy(new_subset.name,subset_name);
 351   new_subset.title = (char*) malloc((strlen("Unknown Title")+1)*sizeof(char));
 352   strcpy(new_subset.title,"Unknown Title");
 353   new_subset.description = (char*) malloc((strlen("No description so far.")+1)*sizeof(char));
 354   strcpy(new_subset.description,"No description so far.");
 355   subset_save(&new_subset);
 356   le_default_level(&new_lev);
 357   level_save(&new_lev,subset_name,1);
 358 }
 359
 360 int le_init()
 361 {
 362   int i;
 363   char str[80];
 364   level_subsets = dsubdirs("/levels", "info");
 365
 366   le_show_grid = YES;
 367
 368   /*  level_changed = NO;*/
 369   fire = DOWN;
 370   done = 0;
 371   le_frame = 0; /* support for frames in some tiles, like waves and bad guys */
 372   le_level_changed = NO;
 373
 374   subset_init(&le_level_subset);
 375
 376   le_current_level = NULL;
 377
 378   le_current_tile = '.';
 379   le_mouse_pressed = NO;
 380
 381   texture_load(&le_selection,DATA_PREFIX "/images/leveleditor/select.png", USE_ALPHA);
 382
 383   /* Load buttons */
 384   button_load(&le_save_level_bt,"/images/icons/save.png","Save level", SDLK_F6,screen->w-64,32);
 385   button_load(&le_next_level_bt,"/images/icons/up.png","Next level", SDLK_PAGEUP,screen->w-64,0);
 386   button_load(&le_previous_level_bt,"/images/icons/down.png","Previous level",SDLK_PAGEDOWN,screen->w-32,0);
 387   button_load(&le_rubber_bt,"/images/icons/rubber.png","Rubber",SDLK_DELETE,screen->w-32,48);
 388   button_load(&le_select_mode_one_bt,"/images/icons/select-mode1.png","Select single tile",SDLK_F3,screen->w-64,48);
 389   button_load(&le_select_mode_two_bt,"/images/icons/select-mode2.png","Select multiple tiles",SDLK_F3,screen->w-64,64);
 390   button_load(&le_test_level_bt,"/images/icons/test-level.png","Test level",SDLK_F4,screen->w-64,screen->h - 64);
 391   button_load(&le_settings_bt,"/images/icons/settings.png","Level settings",SDLK_F5,screen->w-32,screen->h - 64);
 392   button_load(&le_move_left_bt,"/images/icons/left.png","Move left",SDLK_LEFT,0,0);
 393   button_load(&le_move_right_bt,"/images/icons/right.png","Move right",SDLK_RIGHT,screen->w-80,0);
 394   button_panel_init(&le_bt_panel, screen->w - 64,82, 64, 334);
 395
 396   menu_init(&leveleditor_menu);
 397   menu_additem(&leveleditor_menu,menu_item_create(MN_LABEL,"Level Editor Menu",0,0));
 398   menu_additem(&leveleditor_menu,menu_item_create(MN_HL,"",0,0));
 399   menu_additem(&leveleditor_menu,menu_item_create(MN_ACTION,"Return To Level Editor",0,0));
 400   menu_additem(&leveleditor_menu,menu_item_create(MN_DEACTIVE,"Level Subset Settings",0,&subset_settings_menu));
 401   menu_additem(&leveleditor_menu,menu_item_create(MN_GOTO,"Load Level Subset",0,&subset_load_menu));
 402   menu_additem(&leveleditor_menu,menu_item_create(MN_GOTO,"New Level Subset",0,&subset_new_menu));
 403   menu_additem(&leveleditor_menu,menu_item_create(MN_HL,"",0,0));
 404   menu_additem(&leveleditor_menu,menu_item_create(MN_ACTION,"Quit Level Editor",0,0));
 405
 406   menu_reset();
 407   menu_set_current(&leveleditor_menu);
 408   show_menu = YES;
 409
 410   menu_init(&subset_load_menu);
 411   menu_additem(&subset_load_menu,menu_item_create(MN_LABEL,"Load Level Subset",0,0));
 412   menu_additem(&subset_load_menu,menu_item_create(MN_HL,"",0,0));
 413   for(i = 0; i < level_subsets.num_items; ++i)
 414     {
 415       menu_additem(&subset_load_menu,menu_item_create(MN_ACTION,level_subsets.item[i],0,0));
 416     }
 417   menu_additem(&subset_load_menu,menu_item_create(MN_HL,"",0,0));
 418   menu_additem(&subset_load_menu,menu_item_create(MN_BACK,"Back",0,0));
 419
 420   menu_init(&subset_new_menu);
 421   menu_additem(&subset_new_menu,menu_item_create(MN_LABEL,"New Level Subset",0,0));
 422   menu_additem(&subset_new_menu,menu_item_create(MN_HL,"",0,0));
 423   menu_additem(&subset_new_menu,menu_item_create(MN_TEXTFIELD,"Enter Name",0,0));
 424   menu_additem(&subset_new_menu,menu_item_create(MN_ACTION,"Create",0,0));
 425   menu_additem(&subset_new_menu,menu_item_create(MN_HL,"",0,0));
 426   menu_additem(&subset_new_menu,menu_item_create(MN_BACK,"Back",0,0));
 427
 428   menu_init(&subset_settings_menu);
 429   menu_additem(&subset_settings_menu,menu_item_create(MN_LABEL,"Level Subset Settings",0,0));
 430   menu_additem(&subset_settings_menu,menu_item_create(MN_HL,"",0,0));
 431   menu_additem(&subset_settings_menu,menu_item_create(MN_TEXTFIELD,"Title",0,0));
 432   menu_additem(&subset_settings_menu,menu_item_create(MN_TEXTFIELD,"Description",0,0));
 433   menu_additem(&subset_settings_menu,menu_item_create(MN_HL,"",0,0));
 434   menu_additem(&subset_settings_menu,menu_item_create(MN_ACTION,"Save Changes",0,0));
 435   menu_additem(&subset_settings_menu,menu_item_create(MN_HL,"",0,0));
 436   menu_additem(&subset_settings_menu,menu_item_create(MN_BACK,"Back",0,0));
 437
 438   menu_init(&level_settings_menu);
 439   level_settings_menu.arrange_left = YES;
 440   menu_additem(&level_settings_menu,menu_item_create(MN_LABEL,"Level Settings",0,0));
 441   menu_additem(&level_settings_menu,menu_item_create(MN_HL,"",0,0));
 442   menu_additem(&level_settings_menu,menu_item_create(MN_TEXTFIELD,"Name:",0,0));
 443   menu_additem(&level_settings_menu,menu_item_create(MN_STRINGSELECT,"Theme:",0,0));
 444   menu_additem(&level_settings_menu,menu_item_create(MN_STRINGSELECT,"Song:",0,0));
 445   menu_additem(&level_settings_menu,menu_item_create(MN_STRINGSELECT,"Background:",0,0));
 446   menu_additem(&level_settings_menu,menu_item_create(MN_NUMFIELD,"Length: ",0,0));
 447   menu_additem(&level_settings_menu,menu_item_create(MN_NUMFIELD,"Time:   ",0,0));
 448   menu_additem(&level_settings_menu,menu_item_create(MN_NUMFIELD,"Gravity:",0,0));
 449   menu_additem(&level_settings_menu,menu_item_create(MN_NUMFIELD,"Red:    ",0,0));
 450   menu_additem(&level_settings_menu,menu_item_create(MN_NUMFIELD,"Green:  ",0,0));
 451   menu_additem(&level_settings_menu,menu_item_create(MN_NUMFIELD,"Blue:   ",0,0));
 452   menu_additem(&level_settings_menu,menu_item_create(MN_HL,"",0,0));
 453   menu_additem(&level_settings_menu,menu_item_create(MN_ACTION,"Apply Changes",0,0));
 454
 455   SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
 456
 457   return 0;
 458 }
 459
 460 void update_level_settings_menu()
 461 {
 462   char str[80];
 463   int i;
 464
 465   menu_item_change_input(&level_settings_menu.item[2], le_current_level->name);
 466   sprintf(str,"%d",le_current_level->width);
 467
 468   string_list_copy(level_settings_menu.item[3].list, dsubdirs("images/themes", "solid0.png"));
 469   string_list_copy(level_settings_menu.item[4].list, dfiles("music/", "-fast"));
 470   string_list_copy(level_settings_menu.item[5].list, dfiles("images/background", NULL));
 471   if((i = string_list_find(level_settings_menu.item[3].list,le_current_level->theme)) != -1)
 472     level_settings_menu.item[3].list->active_item = i;
 473   if((i = string_list_find(level_settings_menu.item[4].list,le_current_level->song_title)) != -1)
 474     level_settings_menu.item[4].list->active_item = i;
 475   if((i = string_list_find(level_settings_menu.item[5].list,le_current_level->bkgd_image)) != -1)
 476     level_settings_menu.item[5].list->active_item = i;
 477
 478   menu_item_change_input(&level_settings_menu.item[6], str);
 479   sprintf(str,"%d",le_current_level->time_left);
 480   menu_item_change_input(&level_settings_menu.item[7], str);
 481   sprintf(str,"%2.0f",le_current_level->gravity);
 482   menu_item_change_input(&level_settings_menu.item[8], str);
 483   sprintf(str,"%d",le_current_level->bkgd_red);
 484   menu_item_change_input(&level_settings_menu.item[9], str);
 485   sprintf(str,"%d",le_current_level->bkgd_green);
 486   menu_item_change_input(&level_settings_menu.item[10], str);
 487   sprintf(str,"%d",le_current_level->bkgd_blue);
 488   menu_item_change_input(&level_settings_menu.item[11], str);
 489 }
 490
 491 void update_subset_settings_menu()
 492 {
 493   menu_item_change_input(&subset_settings_menu.item[2], le_level_subset.title);
 494   menu_item_change_input(&subset_settings_menu.item[3], le_level_subset.description);
 495 }
 496
 497 void apply_level_settings_menu()
 498 {
 499   int i,y,j;
 500   i = NO;
 501
 502   strcpy(le_current_level->name,level_settings_menu.item[2].input);
 503
 504   if(strcmp(le_current_level->bkgd_image,string_list_active(level_settings_menu.item[5].list)) != 0)
 505     {
 506       strcpy(le_current_level->bkgd_image,string_list_active(level_settings_menu.item[5].list));
 507       i = YES;
 508     }
 509
 510   if(strcmp(le_current_level->theme,string_list_active(level_settings_menu.item[3].list)) != 0)
 511     {
 512       strcpy(le_current_level->theme,string_list_active(level_settings_menu.item[3].list));
 513       i = YES;
 514     }
 515
 516   if(i == YES)
 517     {
 518       level_free_gfx();
 519       level_load_gfx(le_current_level);
 520     }
 521
 522   strcpy(le_current_level->song_title,string_list_active(level_settings_menu.item[4].list));
 523
 524   i = le_current_level->width;
 525   le_current_level->width = atoi(level_settings_menu.item[6].input);
 526   if(le_current_level->width < i)
 527     {
 528       if(le_current_level->width < 21)
 529         le_current_level->width = 21;
 530       for(y = 0; y < 15; ++y)
 531         {
 532           le_current_level->tiles[y] = (unsigned char*) realloc(le_current_level->tiles[y],(le_current_level->width+1)*sizeof(unsigned char));
 533           le_current_level->tiles[y][le_current_level->width] = (unsigned char) '\0';
 534         }
 535     }
 536   else if(le_current_level->width > i)
 537     {
 538       for(y = 0; y < 15; ++y)
 539         {
 540           le_current_level->tiles[y] = (unsigned char*) realloc(le_current_level->tiles[y],(le_current_level->width+1)*sizeof(unsigned char));
 541           for(j = 0; j < le_current_level->width - i; ++j)
 542             le_current_level->tiles[y][i+j] = (unsigned char) '.';
 543           le_current_level->tiles[y][le_current_level->width] = (unsigned char) '\0';
 544         }
 545     }
 546   le_current_level->time_left = atoi(level_settings_menu.item[7].input);
 547   le_current_level->gravity = atof(level_settings_menu.item[8].input);
 548   le_current_level->bkgd_red = atoi(level_settings_menu.item[9].input);
 549   le_current_level->bkgd_green = atoi(level_settings_menu.item[10].input);
 550   le_current_level->bkgd_blue = atoi(level_settings_menu.item[11].input);
 551 }
 552
 553 void save_subset_settings_menu()
 554 {
 555   free(le_level_subset.title);
 556   le_level_subset.title = (char*) malloc(sizeof(char)*(strlen(subset_settings_menu.item[2].input)+1));
 557   strcpy(le_level_subset.title,subset_settings_menu.item[2].input);
 558   free(le_level_subset.description);
 559   le_level_subset.description = (char*) malloc(sizeof(char)*(strlen(subset_settings_menu.item[3].input)+1));
 560   strcpy(le_level_subset.description,subset_settings_menu.item[3].input);
 561   subset_save(&le_level_subset);
 562 }
 563
 564 void le_goto_level(int levelnb)
 565 {
 566   arrays_free();
 567   arrays_init();
 568
 569   level_free(le_current_level);
 570   if(level_load(le_current_level, le_level_subset.name, levelnb) != 0)
 571     {
 572       level_load(le_current_level, le_level_subset.name, le_level);
 573     }
 574   else
 575     {
 576       le_level = levelnb;
 577     }
 578
 579   le_set_defaults();
 580
 581   level_free_gfx();
 582   level_load_gfx(le_current_level);
 583
 584   le_activate_bad_guys();
 585 }
 586
 587 void le_quit(void)
 588 {
 589   /*if(level_changed == YES)
 590     if(askforsaving() == CANCEL)
 591       return;*/ //FIXME
 592
 593   SDL_EnableKeyRepeat(0, 0);    // disables key repeating
 594
 595   button_free(&le_test_level_bt);
 596   texture_free(&le_selection);
 597   menu_free(&leveleditor_menu);
 598
 599   if(le_current_level != NULL)
 600     {
 601       level_free_gfx();
 602       level_free(le_current_level);
 603       unloadshared();
 604       arrays_free();
 605     }
 606 }
 607
 608 void le_drawinterface()
 609 {
 610   int x,y;
 611   char str[80];
 612
 613   if(le_current_level != NULL)
 614     {
 615       /* draw a grid (if selected) */
 616       if(le_show_grid)
 617         {
 618           for(x = 0; x < 19; x++)
 619             fillrect(x*32 - ((int)pos_x % 32), 0, 1, screen->h, 225, 225, 225,255);
 620           for(y = 0; y < 15; y++)
 621             fillrect(0, y*32, screen->w - 32, 1, 225, 225, 225,255);
 622         }
 623     }
 624
 625   if(le_selection_mode == CURSOR)
 626     texture_draw(&le_selection, cursor_x - pos_x, cursor_y, NO_UPDATE);
 627   else if(le_selection_mode == SQUARE)
 628     {
 629       int w, h;
 630       le_highlight_selection();
 631       /* draw current selection */
 632       w = selection.x2 - selection.x1;
 633       h = selection.y2 - selection.y1;
 634       fillrect(selection.x1 - pos_x, selection.y1, w, SELECT_W, SELECT_CLR);
 635       fillrect(selection.x1 - pos_x + w, selection.y1, SELECT_W, h, SELECT_CLR);
 636       fillrect(selection.x1 - pos_x, selection.y1 + h, w, SELECT_W, SELECT_CLR);
 637       fillrect(selection.x1 - pos_x, selection.y1, SELECT_W, h, SELECT_CLR);
 638     }
 639
 640
 641   /* draw button bar */
 642   fillrect(screen->w - 64, 0, 64, screen->h, 50, 50, 50,255);
 643   drawshape(19 * 32, 14 * 32, le_current_tile);
 644
 645   if(le_current_level != NULL)
 646     {
 647       button_draw(&le_save_level_bt);
 648       button_draw(&le_test_level_bt);
 649       button_draw(&le_next_level_bt);
 650       button_draw(&le_previous_level_bt);
 651       button_draw(&le_rubber_bt);
 652       button_draw(&le_select_mode_one_bt);
 653       button_draw(&le_select_mode_two_bt);
 654       button_draw(&le_bad_bsod_bt);
 655       button_draw(&le_settings_bt);
 656       button_draw(&le_move_right_bt);
 657       button_draw(&le_move_left_bt);
 658       button_panel_draw(&le_bt_panel);
 659
 660       sprintf(str, "%d/%d", le_level,le_level_subset.levels);
 661       text_drawf(&white_text, str, -8, 16, A_RIGHT, A_NONE, 1, NO_UPDATE);
 662
 663       text_draw(&white_small_text, "F1 for Help", 10, 430, 1, NO_UPDATE);
 664     }
 665   else
 666     {
 667       if(show_menu == NO)
 668         text_draw(&white_small_text, "No Level Subset loaded - Press ESC and choose one in the menu", 10, 430, 1, NO_UPDATE);
 669       else
 670         text_draw(&white_small_text, "No Level Subset loaded", 10, 430, 1, NO_UPDATE);
 671     }
 672
 673 }
 674
 675 void le_drawlevel()
 676 {
 677   int y,x,i,s;
 678   static char str[LEVEL_NAME_MAX];
 679
 680   /* Draw the real background */
 681   if(le_current_level->bkgd_image[0] != '\0')
 682     {
 683       s = pos_x / 30;
 684       texture_draw_part(&img_bkgd,s,0,0,0,img_bkgd.w - s - 32, img_bkgd.h, NO_UPDATE);
 685       texture_draw_part(&img_bkgd,0,0,screen->w - s - 32 ,0,s,img_bkgd.h, NO_UPDATE);
 686     }
 687   else
 688     {
 689       clearscreen(le_current_level->bkgd_red, le_current_level->bkgd_green, le_current_level->bkgd_blue);
 690     }
 691
 692   /*       clearscreen(current_level.bkgd_red, current_level.bkgd_green, current_level.bkgd_blue); */
 693
 694   for (y = 0; y < 15; ++y)
 695     for (x = 0; x < 20; ++x)
 696       {
 697         drawshape(x * 32 - ((int)pos_x % 32), y * 32, le_current_level->tiles[y][x + (int)(pos_x / 32)]);
 698
 699         /* draw whats inside stuff when cursor is selecting those */
 700         /* (draw them all the time - is this the right behaviour?) */
 701         switch(le_current_level->tiles[y][x + (int)(pos_x/32)])
 702           {
 703           case 'B':
 704             texture_draw(&img_mints, x * 32 - ((int)pos_x % 32), y*32, NO_UPDATE);
 705             break;
 706           case '!':
 707             texture_draw(&img_golden_herring, x * 32 - ((int)pos_x % 32), y*32, NO_UPDATE);
 708             break;
 709           case 'x':
 710           case 'y':
 711           case 'A':
 712             texture_draw(&img_distro[(frame / 5) % 4], x * 32 - ((int)pos_x % 32), y*32, NO_UPDATE);
 713             break;
 714           default:
 715             break;
 716           }
 717       }
 718
 719   /* Draw the Bad guys: */
 720   for (i = 0; i < num_bad_guys; ++i)
 721     {
 722       if(bad_guys[i].base.alive == NO)
 723         continue;
 724       /* to support frames: img_bsod_left[(frame / 5) % 4] */
 725       if(bad_guys[i].kind == BAD_BSOD)
 726         texture_draw(&img_bsod_left[(le_frame / 5) % 4], bad_guys[i].base.x - pos_x, bad_guys[i].base.y, NO_UPDATE);
 727       else if(bad_guys[i].kind == BAD_LAPTOP)
 728         texture_draw(&img_laptop_left[(le_frame / 5) % 3], bad_guys[i].base.x - pos_x, bad_guys[i].base.y, NO_UPDATE);
 729       else if (bad_guys[i].kind == BAD_MONEY)
 730         texture_draw(&img_money_left[(le_frame / 5) % 2], bad_guys[i].base.x - pos_x, bad_guys[i].base.y, NO_UPDATE);
 731     }
 732
 733
 734   /* Draw the player: */
 735   /* for now, the position is fixed at (0, 240) */
 736   texture_draw(&tux_right[(frame / 5) % 3], 0 - pos_x, 240, NO_UPDATE);
 737 }
 738
 739 void le_checkevents()
 740 {
 741   SDLKey key;
 742   SDLMod keymod;
 743   int x,y;
 744
 745   keymod = SDL_GetModState();
 746
 747   while(SDL_PollEvent(&event))
 748     {
 749       /* testing SDL_KEYDOWN, SDL_KEYUP and SDL_QUIT events*/
 750       if(event.type == SDL_KEYDOWN || ((event.type == SDL_MOUSEBUTTONDOWN || SDL_MOUSEMOTION) && (event.motion.x > 0 && event.motion.x < screen->w - 64 &&
 751                                        event.motion.y > 0 && event.motion.y < screen->h)))
 752         {
 753
 754           switch(event.type)
 755             {
 756             case SDL_KEYDOWN:   // key pressed
 757               key = event.key.keysym.sym;
 758               if(show_menu)
 759                 {
 760                   menu_event(&event.key.keysym);
 761                   if(key == SDLK_ESCAPE)
 762                     {
 763                       show_menu = NO;
 764                       menu_set_current(&leveleditor_menu);
 765                     }
 766                   break;
 767                 }
 768               switch(key)
 769                 {
 770                 case SDLK_ESCAPE:
 771                   if(!show_menu)
 772                     show_menu = YES;
 773                   else
 774                     show_menu = NO;
 775                   break;
 776                 case SDLK_LEFT:
 777                   if(fire == DOWN)
 778                     cursor_x -= KEY_CURSOR_SPEED;
 779                   else
 780                     cursor_x -= KEY_CURSOR_FASTSPEED;
 781
 782                   if(cursor_x < pos_x + MOUSE_LEFT_MARGIN)
 783                     pos_x = cursor_x - MOUSE_LEFT_MARGIN;
 784
 785                   break;
 786                 case SDLK_RIGHT:
 787                   if(fire == DOWN)
 788                     cursor_x += KEY_CURSOR_SPEED;
 789                   else
 790                     cursor_x += KEY_CURSOR_FASTSPEED;
 791
 792                   if(cursor_x > pos_x + MOUSE_RIGHT_MARGIN-32)
 793                     pos_x = cursor_x - MOUSE_RIGHT_MARGIN+32;
 794
 795                   break;
 796                 case SDLK_UP:
 797                   if(fire == DOWN)
 798                     cursor_y -= KEY_CURSOR_SPEED;
 799                   else
 800                     cursor_y -= KEY_CURSOR_FASTSPEED;
 801
 802                   if(cursor_y < 0)
 803                     cursor_y = 0;
 804                   break;
 805                 case SDLK_DOWN:
 806                   if(fire == DOWN)
 807                     cursor_y += KEY_CURSOR_SPEED;
 808                   else
 809                     cursor_y += KEY_CURSOR_FASTSPEED;
 810
 811                   if(cursor_y > screen->h-32)
 812                     cursor_y = screen->h-32;
 813                   break;
 814                 case SDLK_LCTRL:
 815                   fire =UP;
 816                   break;
 817                 case SDLK_F1:
 818                   le_showhelp();
 819                   break;
 820                 case SDLK_HOME:
 821                   cursor_x = 0;
 822                   pos_x = cursor_x;
 823                   break;
 824                 case SDLK_END:
 825                   cursor_x = (le_current_level->width * 32) - 32;
 826                   pos_x = cursor_x;
 827                   break;
 828                 case SDLK_PAGEUP:
 829                   cursor_x -= PAGE_CURSOR_SPEED;
 830
 831                   if(cursor_x < pos_x + MOUSE_LEFT_MARGIN)
 832                     pos_x = cursor_x - MOUSE_LEFT_MARGIN;
 833
 834                   break;
 835                 case SDLK_PAGEDOWN:
 836                   cursor_x += PAGE_CURSOR_SPEED;
 837
 838                   if(cursor_x > pos_x + MOUSE_RIGHT_MARGIN-32)
 839                     pos_x = cursor_x - MOUSE_RIGHT_MARGIN+32;
 840
 841                   break;
 842                 case SDLK_F9:
 843                   le_show_grid = !le_show_grid;
 844                   break;
 845                 case SDLK_PERIOD:
 846                   le_change(cursor_x, cursor_y, '.');
 847                   break;
 848                 case SDLK_a:
 849                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 850                     le_current_tile = 'A';
 851                   else
 852                     le_current_tile = 'a';
 853                   break;
 854                 case SDLK_b:
 855                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 856                     le_change(cursor_x, cursor_y, 'B');
 857                   break;
 858                 case SDLK_c:
 859                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 860                     le_change(cursor_x, cursor_y, 'C');
 861                   else
 862                     le_change(cursor_x, cursor_y, 'c');
 863                   break;
 864                 case SDLK_d:
 865                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 866                     le_change(cursor_x, cursor_y, 'D');
 867                   else
 868                     le_change(cursor_x, cursor_y, 'd');
 869                   break;
 870                 case SDLK_e:
 871                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 872                     le_change(cursor_x, cursor_y, 'E');
 873                   else
 874                     le_change(cursor_x, cursor_y, 'e');
 875                   break;
 876                 case SDLK_f:
 877                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 878                     le_change(cursor_x, cursor_y, 'F');
 879                   else
 880                     le_change(cursor_x, cursor_y, 'f');
 881                   break;
 882                 case SDLK_g:
 883                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 884                     le_change(cursor_x, cursor_y, 'G');
 885                   else
 886                     le_change(cursor_x, cursor_y, 'g');
 887                   break;
 888                 case SDLK_h:
 889                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 890                     le_change(cursor_x, cursor_y, 'H');
 891                   else
 892                     le_change(cursor_x, cursor_y, 'h');
 893                   break;
 894                 case SDLK_i:
 895                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 896                     le_change(cursor_x, cursor_y, 'I');
 897                   else
 898                     le_change(cursor_x, cursor_y, 'i');
 899                   break;
 900                 case SDLK_j:
 901                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 902                     le_change(cursor_x, cursor_y, 'J');
 903                   else
 904                     le_change(cursor_x, cursor_y, 'j');
 905                   break;
 906                 case SDLK_x:
 907                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 908                     le_change(cursor_x, cursor_y, 'X');
 909                   else
 910                     le_change(cursor_x, cursor_y, 'x');
 911                   break;
 912                 case SDLK_y:
 913                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 914                     le_change(cursor_x, cursor_y, 'Y');
 915                   else
 916                     le_change(cursor_x, cursor_y, 'y');
 917                   break;
 918                 case SDLK_LEFTBRACKET:
 919                   le_change(cursor_x, cursor_y, '[');
 920                   break;
 921                 case SDLK_RIGHTBRACKET:
 922                   le_change(cursor_x, cursor_y, ']');
 923                   break;
 924                 case SDLK_HASH:
 925                 case SDLK_3:
 926                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 927                     le_change(cursor_x, cursor_y, '#');
 928                   break;
 929                 case SDLK_DOLLAR:
 930                 case SDLK_4:
 931                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 932                     le_change(cursor_x, cursor_y, '$');
 933                   break;
 934                 case SDLK_BACKSLASH:
 935                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 936                     le_change(cursor_x, cursor_y, '|');
 937                   else
 938                     le_change(cursor_x, cursor_y, '\\');
 939                   break;
 940                 case SDLK_CARET:
 941                   le_change(cursor_x, cursor_y, '^');
 942                   break;
 943                 case SDLK_AMPERSAND:
 944                 case SDLK_6:
 945                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 946                     le_change(cursor_x, cursor_y, '&');
 947                   break;
 948                 case SDLK_EQUALS:
 949                 case SDLK_0:
 950                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 951                     le_change(cursor_x, cursor_y, '=');
 952                   else          /* let's add a bad guy */
 953                     le_change(cursor_x, cursor_y, '0');
 954                   break;
 955                 case SDLK_1:
 956                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 957                     le_change(cursor_x, cursor_y, '!');
 958                   else          /* let's add a bad guy */
 959                     le_change(cursor_x, cursor_y, '1');
 960                   break;
 961                 case SDLK_2:
 962                   le_change(cursor_x, cursor_y, '2');
 963                   break;
 964                 case SDLK_PLUS:
 965                   if(keymod == KMOD_LSHIFT || keymod == KMOD_RSHIFT || keymod == KMOD_CAPS)
 966                     le_change(cursor_x, cursor_y, '*');
 967                   break;
 968                 default:
 969                   break;
 970                 }
 971               break;
 972             case SDL_KEYUP:     /* key released */
 973               switch(event.key.keysym.sym)
 974                 {
 975                 case SDLK_LCTRL:
 976                   fire = DOWN;
 977                   break;
 978                 default:
 979                   break;
 980                 }
 981               break;
 982             case SDL_MOUSEBUTTONDOWN:
 983               if(event.button.button == SDL_BUTTON_LEFT)
 984                 {
 985                   le_mouse_pressed = YES;
 986
 987                   selection.x1 = event.motion.x + pos_x;
 988                   selection.y1 = event.motion.y;
 989                   selection.x2 = event.motion.x + pos_x;
 990                   selection.y2 = event.motion.y;
 991                 }
 992               break;
 993             case SDL_MOUSEBUTTONUP:
 994               if(event.button.button == SDL_BUTTON_LEFT)
 995                 {
 996                   le_mouse_pressed = NO;
 997                 }
 998               break;
 999             case SDL_MOUSEMOTION:
1000               if(!show_menu)
1001                 {
1002                   x = event.motion.x;
1003                   y = event.motion.y;
1004
1005                   cursor_x = ((int)(pos_x + x) / 32) * 32;
1006                   cursor_y = ((int) y / 32) * 32;
1007
1008                   if(le_mouse_pressed == YES)
1009                     {
1010                       selection.x2 = x + pos_x;
1011                       selection.y2 = y;
1012                     }
1013                 }
1014               break;
1015             case SDL_QUIT:      // window closed
1016               done = DONE_QUIT;
1017               break;
1018             default:
1019               break;
1020             }
1021         }
1022
1023       if(le_current_level != NULL)
1024         {
1025           if(event.type == SDL_KEYDOWN || event.type == SDL_KEYUP || ((event.type == SDL_MOUSEBUTTONDOWN || SDL_MOUSEMOTION) && (event.motion.x > screen->w-64 && event.motion.x < screen->w &&
1026               event.motion.y > 0 && event.motion.y < screen->h)))
1027             {
1028               if(show_menu == NO)
1029                 {
1030                   /* Check for button events */
1031                   button_event(&le_test_level_bt,&event);
1032                   if(button_get_state(&le_test_level_bt) == BN_CLICKED)
1033                     le_testlevel();
1034                   button_event(&le_save_level_bt,&event);
1035                   if(button_get_state(&le_save_level_bt) == BN_CLICKED)
1036                     level_save(le_current_level,le_level_subset.name,le_level);
1037                   button_event(&le_next_level_bt,&event);
1038                   if(button_get_state(&le_next_level_bt) == BN_CLICKED)
1039                     {
1040                       if(le_level < le_level_subset.levels)
1041                         {
1042                           le_goto_level(++le_level);
1043                         }
1044                       else
1045                         {
1046                           st_level new_lev;
1047                           char str[1024];
1048                           int d = 0;
1049                           sprintf(str,"Level %d doesn't exist.",le_level+1);
1050                           text_drawf(&white_text,str,0,-18,A_HMIDDLE,A_VMIDDLE,2,NO_UPDATE);
1051                           text_drawf(&white_text,"Do you want to create it?",0,0,A_HMIDDLE,A_VMIDDLE,2,NO_UPDATE);
1052                           text_drawf(&red_text,"(Y)es/(N)o",0,20,A_HMIDDLE,A_VMIDDLE,2,NO_UPDATE);
1053                           flipscreen();
1054                           while(d == 0)
1055                             {
1056                               while(SDL_PollEvent(&event))
1057                                 switch(event.type)
1058                                   {
1059                                   case SDL_KEYDOWN:             // key pressed
1060                                     switch(event.key.keysym.sym)
1061                                       {
1062                                       case SDLK_y:
1063                                         le_default_level(&new_lev);
1064                                         level_save(&new_lev,le_level_subset.name,++le_level);
1065                                         le_level_subset.levels = le_level;
1066                                         le_goto_level(le_level);
1067                                         d = 1;
1068                                         break;
1069                                       case SDLK_n:
1070                                         d = 1;
1071                                         break;
1072                                       }
1073                                     break;
1074                                   default:
1075                                     break;
1076                                   }
1077                               SDL_Delay(50);
1078                             }
1079                         }
1080                     }
1081                   button_event(&le_previous_level_bt,&event);
1082                   if(button_get_state(&le_previous_level_bt) == BN_CLICKED)
1083                     {
1084                       if(le_level > 1)
1085                         le_goto_level(--le_level);
1086                     }
1087                   button_event(&le_rubber_bt,&event);
1088                   if(button_get_state(&le_rubber_bt) == BN_CLICKED)
1089                     le_current_tile = '.';
1090                   button_event(&le_select_mode_one_bt,&event);
1091                   if(button_get_state(&le_select_mode_one_bt) == BN_CLICKED)
1092                     le_selection_mode = CURSOR;
1093                   button_event(&le_select_mode_two_bt,&event);
1094                   if(button_get_state(&le_select_mode_two_bt) == BN_CLICKED)
1095                     le_selection_mode = SQUARE;
1096                   button_event(&le_bad_bsod_bt,&event);
1097                   if(button_get_state(&le_bad_bsod_bt) == BN_CLICKED)
1098                     le_current_tile = '0';
1099                   button_event(&le_settings_bt,&event);
1100                   if(button_get_state(&le_settings_bt) == BN_CLICKED)
1101                     {
1102                       if(show_menu == NO)
1103                         {
1104                           update_level_settings_menu();
1105                           menu_set_current(&level_settings_menu);
1106                           show_menu = YES;
1107                         }
1108                       else
1109                         {
1110                           menu_set_current(&leveleditor_menu);
1111                           show_menu = NO;
1112                         }
1113                     }
1114                 }
1115               else
1116                 {
1117                   button_event(&le_settings_bt,&event);
1118                   if(button_get_state(&le_settings_bt) == BN_CLICKED)
1119                     {
1120                       if(show_menu == NO)
1121                         {
1122                           update_level_settings_menu();
1123                           menu_set_current(&level_settings_menu);
1124                           show_menu = YES;
1125                         }
1126                       else
1127                         {
1128                           menu_set_current(&leveleditor_menu);
1129                           show_menu = NO;
1130                         }
1131                     }
1132                 }
1133             }
1134           if(show_menu == NO)
1135             {
1136               button_event(&le_move_left_bt,&event);
1137               button_event(&le_move_right_bt,&event);
1138
1139               if(le_mouse_pressed)
1140                 {
1141                   le_change(cursor_x, cursor_y, le_current_tile);
1142                 }
1143             }
1144         }
1145     }
1146   if(show_menu == NO)
1147     {
1148       if(button_get_state(&le_move_left_bt) == BN_PRESSED)
1149         {
1150           pos_x -= 192;
1151         }
1152       else if(button_get_state(&le_move_left_bt) == BN_HOVER)
1153         {
1154           pos_x -= 96;
1155         }
1156
1157       if(button_get_state(&le_move_right_bt) == BN_PRESSED)
1158         {
1159           pos_x += 192;
1160         }
1161       else if(button_get_state(&le_move_right_bt) == BN_HOVER)
1162         {
1163           pos_x += 96;
1164         }
1165     }
1166
1167 }
1168
1169 void le_highlight_selection()
1170 {
1171   int x,y,i;
1172   int x1, x2, y1, y2;
1173
1174   if(selection.x1 < selection.x2)
1175     {
1176       x1 = selection.x1;
1177       x2 = selection.x2;
1178     }
1179   else
1180     {
1181       x1 = selection.x2;
1182       x2 = selection.x1;
1183     }
1184   if(selection.y1 < selection.y2)
1185     {
1186       y1 = selection.y1;
1187       y2 = selection.y2;
1188     }
1189   else
1190     {
1191       y1 = selection.y2;
1192       y2 = selection.y1;
1193     }
1194
1195   x1 /= 32;
1196   x2 /= 32;
1197   y1 /= 32;
1198   y2 /= 32;
1199
1200   fillrect(x1*32-pos_x, y1*32,32* (x2 - x1 + 1),32 * (y2 - y1 + 1),173,234,177,103);
1201 }
1202
1203 void le_change(float x, float y, unsigned char c)
1204 {
1205   if(le_current_level != NULL)
1206     {
1207       int xx,yy,i;
1208       int x1, x2, y1, y2;
1209
1210       /*  level_changed = YES; */
1211
1212       switch(le_selection_mode)
1213         {
1214         case CURSOR:
1215           level_change(le_current_level,x,y,c);
1216
1217           yy = ((int)y / 32);
1218           xx = ((int)x / 32);
1219
1220           /* if there is a bad guy over there, remove it */
1221           for(i = 0; i < num_bad_guys; ++i)
1222             if (bad_guys[i].base.alive)
1223               if(xx == bad_guys[i].base.x/32 && yy == bad_guys[i].base.y/32)
1224                 bad_guys[i].base.alive = NO;
1225
1226           if(c == '0')  /* if it's a bad guy */
1227             add_bad_guy(xx*32, yy*32, BAD_BSOD);
1228           else if(c == '1')
1229             add_bad_guy(xx*32, yy*32, BAD_LAPTOP);
1230           else if(c == '2')
1231             add_bad_guy(xx*32, yy*32, BAD_MONEY);
1232
1233           break;
1234         case SQUARE:
1235           if(selection.x1 < selection.x2)
1236             {
1237               x1 = selection.x1;
1238               x2 = selection.x2;
1239             }
1240           else
1241             {
1242               x1 = selection.x2;
1243               x2 = selection.x1;
1244             }
1245           if(selection.y1 < selection.y2)
1246             {
1247               y1 = selection.y1;
1248               y2 = selection.y2;
1249             }
1250           else
1251             {
1252               y1 = selection.y2;
1253               y2 = selection.y1;
1254             }
1255
1256           x1 /= 32;
1257           x2 /= 32;
1258           y1 /= 32;
1259           y2 /= 32;
1260
1261           /* if there is a bad guy over there, remove it */
1262           for(i = 0; i < num_bad_guys; ++i)
1263             if(bad_guys[i].base.alive)
1264               if(bad_guys[i].base.x/32 >= x1 && bad_guys[i].base.x/32 <= x2
1265                   && bad_guys[i].base.y/32 >= y1 && bad_guys[i].base.y/32 <= y2)
1266                 bad_guys[i].base.alive = NO;
1267
1268           for(xx = x1; xx <= x2; xx++)
1269             for(yy = y1; yy <= y2; yy++)
1270               {
1271                 level_change(le_current_level, xx*32, yy*32, c);
1272
1273                 if(c == '0')  // if it's a bad guy
1274                   add_bad_guy(xx*32, yy*32, BAD_BSOD);
1275                 else if(c == '1')
1276                   add_bad_guy(xx*32, yy*32, BAD_LAPTOP);
1277                 else if(c == '2')
1278                   add_bad_guy(xx*32, yy*32, BAD_MONEY);
1279               }
1280           break;
1281         default:
1282           break;
1283         }
1284     }
1285 }
1286
1287 void le_testlevel()
1288 {
1289   level_save(le_current_level,"test",le_level);
1290   gameloop("test",le_level, ST_GL_TEST);
1291   menu_set_current(&leveleditor_menu);
1292   arrays_init();
1293   level_load_gfx(le_current_level);
1294   loadshared();
1295   le_activate_bad_guys();
1296 }
1297
1298 void le_showhelp()
1299 {
1300   SDL_Event event;
1301   int i, done;
1302   char *text[] = {
1303                    "X/x - Brick0",
1304                    "Y/y - Brick1",
1305                    "A/B/! - Box full",
1306                    "a - Box empty",
1307                    "C-F - Cloud0",
1308                    "c-f - Cloud1",
1309                    "G-J - Bkgd0",
1310                    "g-j - Bkgd1",
1311                    "# - Solid0",
1312                    "[ - Solid1",
1313                    "= - Solid2",
1314                    "] - Solid3",
1315                    "$ - Distro",
1316                    "^ - Waves",
1317                    "* - Poletop",
1318                    "| - Pole",
1319                    "\\ - Flag",
1320                    "& - Water",
1321                    "0-2 - BadGuys",
1322                    "./Del - Remove tile",
1323                    "F9 - Show/Hide Grid",
1324                    "F3 - Change Selection Mode",
1325                    "Esc - Menu"};
1326
1327
1328   text_drawf(&blue_text, "- Help -", 0, 30, A_HMIDDLE, A_TOP, 2, NO_UPDATE);
1329   text_draw(&gold_text, "Keys:", 80, 60, 1, NO_UPDATE);
1330
1331   for(i = 0; i < sizeof(text)/sizeof(char *); i++)
1332     text_draw(&white_text, text[i], 40, 90+(i*16), 1, NO_UPDATE);
1333
1334   text_drawf(&gold_text, "Press Any Key to Continue", 0, 460, A_HMIDDLE, A_TOP, 1, NO_UPDATE);
1335
1336   flipscreen();
1337
1338   done = 0;
1339
1340   while(done == 0)
1341     {
1342       while(SDL_PollEvent(&event))
1343         switch(event.type)
1344           {
1345           case SDL_MOUSEBUTTONDOWN:             // mouse pressed
1346           case SDL_KEYDOWN:             // key pressed
1347             done = 1;
1348             break;
1349           default:
1350             break;
1351           }
1352       SDL_Delay(50);
1353     }
1354 }