src/editor.c

   1 /***********************************************************
   2 *  Rocks'n'Diamonds -- McDuffin Strikes Back!              *
   3 *----------------------------------------------------------*
   4 *  (c) 1995-98 Artsoft Entertainment                       *
   5 *              Holger Schemel                              *
   6 *              Oststrasse 11a                              *
   7 *              33604 Bielefeld                             *
   8 *              phone: ++49 +521 290471                     *
   9 *              email: aeglos@valinor.owl.de                *
  10 *----------------------------------------------------------*
  11 *  editor.c                                                *
  12 ***********************************************************/
  13
  14 #include "editor.h"
  15 #include "screens.h"
  16 #include "tools.h"
  17 #include "misc.h"
  18 #include "buttons.h"
  19 #include "files.h"
  20
  21 #define CHOICE_DELAY_VALUE      100
  22
  23 static int level_xpos,level_ypos;
  24 static boolean edit_mode;
  25 static boolean name_typing;
  26 static int new_element1 = EL_MAUERWERK;
  27 static int new_element2 = EL_LEERRAUM;
  28 static int new_element3 = EL_ERDREICH;
  29
  30 int element_shift;
  31 int editor_element[] =
  32 {
  33   EL_CHAR_A + ('B' - 'A'),
  34   EL_CHAR_A + ('O' - 'A'),
  35   EL_CHAR_A + ('U' - 'A'),
  36   EL_CHAR_A + ('L' - 'A'),
  37
  38   EL_CHAR_MINUS,
  39   EL_CHAR_A + ('D' - 'A'),
  40   EL_CHAR_A + ('E' - 'A'),
  41   EL_CHAR_A + ('R' - 'A'),
  42
  43   EL_CHAR_A + ('D' - 'A'),
  44   EL_CHAR_A + ('A' - 'A'),
  45   EL_CHAR_A + ('S' - 'A'),
  46   EL_CHAR_A + ('H' - 'A'),
  47
  48   EL_SPIELFIGUR,
  49   EL_LEERRAUM,
  50   EL_ERDREICH,
  51   EL_BETON,
  52
  53   EL_FELSBODEN,
  54   EL_SIEB2_LEER,
  55   EL_AUSGANG_ZU,
  56   EL_AUSGANG_AUF,
  57
  58   EL_EDELSTEIN_BD,
  59   EL_BUTTERFLY_O,
  60   EL_FIREFLY_O,
  61   EL_FELSBROCKEN,
  62
  63   EL_BUTTERFLY_L,
  64   EL_FIREFLY_L,
  65   EL_BUTTERFLY_R,
  66   EL_FIREFLY_R,
  67
  68   EL_AMOEBE_BD,
  69   EL_BUTTERFLY_U,
  70   EL_FIREFLY_U,
  71   EL_LEERRAUM,
  72
  73   EL_CHAR_A + ('E' - 'A'),
  74   EL_CHAR_A + ('M' - 'A'),
  75   EL_CHAR_A + ('E' - 'A'),
  76   EL_CHAR_MINUS,
  77
  78   EL_CHAR_A + ('R' - 'A'),
  79   EL_CHAR_A + ('A' - 'A'),
  80   EL_CHAR_A + ('L' - 'A'),
  81   EL_CHAR_A + ('D' - 'A'),
  82
  83   EL_CHAR_A + ('M' - 'A'),
  84   EL_CHAR_A + ('I' - 'A'),
  85   EL_CHAR_A + ('N' - 'A'),
  86   EL_CHAR_A + ('E' - 'A'),
  87
  88   EL_SPIELER1,
  89   EL_SPIELER2,
  90   EL_SPIELER3,
  91   EL_SPIELER4,
  92
  93   EL_SPIELFIGUR,
  94   EL_LEERRAUM,
  95   EL_ERDREICH,
  96   EL_FELSBROCKEN,
  97
  98   EL_BETON,
  99   EL_MAUERWERK,
 100   EL_FELSBODEN,
 101   EL_SIEB_LEER,
 102
 103   EL_EDELSTEIN,
 104   EL_DIAMANT,
 105   EL_KOKOSNUSS,
 106   EL_BOMBE,
 107
 108   EL_ERZ_EDEL,
 109   EL_ERZ_DIAM,
 110   EL_MORAST_LEER,
 111   EL_MORAST_VOLL,
 112
 113   EL_DYNAMIT_AUS,
 114   EL_DYNAMIT,
 115   EL_AUSGANG_ZU,
 116   EL_AUSGANG_AUF,
 117
 118   EL_MAMPFER,
 119   EL_KAEFER_O,
 120   EL_FLIEGER_O,
 121   EL_ROBOT,
 122
 123   EL_KAEFER_L,
 124   EL_FLIEGER_L,
 125   EL_KAEFER_R,
 126   EL_FLIEGER_R,
 127
 128   EL_ABLENK_AUS,
 129   EL_KAEFER_U,
 130   EL_FLIEGER_U,
 131   EL_UNSICHTBAR,
 132
 133   EL_BADEWANNE1,
 134   EL_SALZSAEURE,
 135   EL_BADEWANNE2,
 136   EL_LEERRAUM,
 137
 138   EL_BADEWANNE3,
 139   EL_BADEWANNE4,
 140   EL_BADEWANNE5,
 141   EL_LEERRAUM,
 142
 143   EL_TROPFEN,
 144   EL_AMOEBE_TOT,
 145   EL_AMOEBE_NASS,
 146   EL_AMOEBE_NORM,
 147
 148   EL_SCHLUESSEL1,
 149   EL_SCHLUESSEL2,
 150   EL_SCHLUESSEL3,
 151   EL_SCHLUESSEL4,
 152
 153   EL_PFORTE1,
 154   EL_PFORTE2,
 155   EL_PFORTE3,
 156   EL_PFORTE4,
 157
 158   EL_PFORTE1X,
 159   EL_PFORTE2X,
 160   EL_PFORTE3X,
 161   EL_PFORTE4X,
 162
 163   EL_CHAR_A + ('M' - 'A'),
 164   EL_CHAR_A + ('O' - 'A'),
 165   EL_CHAR_A + ('R' - 'A'),
 166   EL_CHAR_A + ('E' - 'A'),
 167
 168   EL_PFEIL_L,
 169   EL_PFEIL_R,
 170   EL_PFEIL_O,
 171   EL_PFEIL_U,
 172
 173   EL_AMOEBE_VOLL,
 174   EL_EDELSTEIN_GELB,
 175   EL_EDELSTEIN_ROT,
 176   EL_EDELSTEIN_LILA,
 177
 178   EL_ERZ_EDEL_BD,
 179   EL_ERZ_EDEL_GELB,
 180   EL_ERZ_EDEL_ROT,
 181   EL_ERZ_EDEL_LILA,
 182
 183   EL_LIFE,
 184   EL_PACMAN_O,
 185   EL_ZEIT_VOLL,
 186   EL_ZEIT_LEER,
 187
 188   EL_PACMAN_L,
 189   EL_MAMPFER2,
 190   EL_PACMAN_R,
 191   EL_MAUER_LEBT,
 192
 193   EL_LIFE_ASYNC,
 194   EL_PACMAN_U,
 195   EL_BIRNE_AUS,
 196   EL_BIRNE_EIN,
 197
 198   EL_DYNABOMB_NR,
 199   EL_DYNABOMB_SZ,
 200   EL_DYNABOMB_XL,
 201   EL_BADEWANNE,
 202
 203   EL_MAULWURF,
 204   EL_PINGUIN,
 205   EL_SCHWEIN,
 206   EL_DRACHE,
 207
 208   EL_SONDE,
 209   EL_MAUER_X,
 210   EL_MAUER_Y,
 211   EL_MAUER_XY,
 212
 213   EL_CHAR_A + ('S' - 'A'),
 214   EL_CHAR_A + ('O' - 'A'),
 215   EL_CHAR_A + ('K' - 'A'),
 216   EL_CHAR_A + ('O' - 'A'),
 217
 218   EL_CHAR_MINUS,
 219   EL_CHAR_A + ('B' - 'A'),
 220   EL_CHAR_A + ('A' - 'A'),
 221   EL_CHAR_A + ('N' - 'A'),
 222
 223   EL_SOKOBAN_OBJEKT,
 224   EL_SOKOBAN_FELD_LEER,
 225   EL_SOKOBAN_FELD_VOLL,
 226   EL_BETON,
 227
 228 /*
 229   EL_CHAR_A + ('D' - 'A'),
 230   EL_CHAR_A + ('Y' - 'A'),
 231   EL_CHAR_A + ('N' - 'A'),
 232   EL_CHAR_A + ('A' - 'A'),
 233
 234   EL_CHAR_A + ('B' - 'A'),
 235   EL_CHAR_A + ('L' - 'A'),
 236   EL_CHAR_A + ('A' - 'A'),
 237   EL_CHAR_A + ('S' - 'A'),
 238
 239   EL_CHAR_MINUS,
 240   EL_CHAR_A + ('T' - 'A'),
 241   EL_CHAR_A + ('E' - 'A'),
 242   EL_CHAR_A + ('R' - 'A'),
 243 */
 244
 245   EL_LEERRAUM,
 246   EL_LEERRAUM,
 247   EL_LEERRAUM,
 248   EL_LEERRAUM,
 249
 250   EL_CHAR_AUSRUF,
 251   EL_CHAR_ZOLL,
 252   EL_CHAR_DOLLAR,
 253   EL_CHAR_PROZ,
 254
 255   EL_CHAR_APOSTR,
 256   EL_CHAR_KLAMM1,
 257   EL_CHAR_KLAMM2,
 258   EL_CHAR_PLUS,
 259
 260   EL_CHAR_KOMMA,
 261   EL_CHAR_MINUS,
 262   EL_CHAR_PUNKT,
 263   EL_CHAR_SLASH,
 264
 265   EL_CHAR_0 + 0,
 266   EL_CHAR_0 + 1,
 267   EL_CHAR_0 + 2,
 268   EL_CHAR_0 + 3,
 269
 270   EL_CHAR_0 + 4,
 271   EL_CHAR_0 + 5,
 272   EL_CHAR_0 + 6,
 273   EL_CHAR_0 + 7,
 274
 275   EL_CHAR_0 + 8,
 276   EL_CHAR_0 + 9,
 277   EL_CHAR_DOPPEL,
 278   EL_CHAR_SEMIKL,
 279
 280   EL_CHAR_LT,
 281   EL_CHAR_GLEICH,
 282   EL_CHAR_GT,
 283   EL_CHAR_FRAGE,
 284
 285   EL_CHAR_AT,
 286   EL_CHAR_A + 0,
 287   EL_CHAR_A + 1,
 288   EL_CHAR_A + 2,
 289
 290   EL_CHAR_A + 3,
 291   EL_CHAR_A + 4,
 292   EL_CHAR_A + 5,
 293   EL_CHAR_A + 6,
 294
 295   EL_CHAR_A + 7,
 296   EL_CHAR_A + 8,
 297   EL_CHAR_A + 9,
 298   EL_CHAR_A + 10,
 299
 300   EL_CHAR_A + 11,
 301   EL_CHAR_A + 12,
 302   EL_CHAR_A + 13,
 303   EL_CHAR_A + 14,
 304
 305   EL_CHAR_A + 15,
 306   EL_CHAR_A + 16,
 307   EL_CHAR_A + 17,
 308   EL_CHAR_A + 18,
 309
 310   EL_CHAR_A + 19,
 311   EL_CHAR_A + 20,
 312   EL_CHAR_A + 21,
 313   EL_CHAR_A + 22,
 314
 315   EL_CHAR_A + 23,
 316   EL_CHAR_A + 24,
 317   EL_CHAR_A + 25,
 318   EL_CHAR_AE,
 319
 320   EL_CHAR_OE,
 321   EL_CHAR_UE,
 322   EL_CHAR_COPY
 323 };
 324 int elements_in_list = sizeof(editor_element)/sizeof(int);
 325
 326 void DrawLevelEd()
 327 {
 328   int i, graphic;
 329
 330   level_xpos=-1;
 331   level_ypos=-1;
 332   edit_mode = TRUE;
 333   name_typing = FALSE;
 334   element_shift = 0;
 335
 336   CloseDoor(DOOR_CLOSE_2);
 337
 338   DrawMiniLevel(level_xpos,level_ypos);
 339   FadeToFront();
 340
 341   XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
 342             DOOR_GFX_PAGEX6,DOOR_GFX_PAGEY1,
 343             DXSIZE,DYSIZE,
 344             DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY1);
 345   XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
 346             DOOR_GFX_PAGEX6+ED_BUTTON_ELEM_XPOS,
 347             DOOR_GFX_PAGEY1+ED_BUTTON_ELEM_YPOS,
 348             4*ED_BUTTON_ELEM_XSIZE,5*ED_BUTTON_ELEM_YSIZE,
 349             DOOR_GFX_PAGEX1+ED_BUTTON_ELEM_XPOS,
 350             DOOR_GFX_PAGEY1+ED_BUTTON_EUP_Y2POS);
 351
 352   for(i=0;i<MAX_ELEM_X*MAX_ELEM_Y;i++)
 353   {
 354     if (i < elements_in_list)
 355       graphic = el2gfx(editor_element[i]);
 356     else
 357       graphic = GFX_LEERRAUM;
 358
 359     DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
 360                        DOOR_GFX_PAGEX1+ED_BUTTON_ELEM_XPOS+3 +
 361                        (i%MAX_ELEM_X)*ED_BUTTON_ELEM_XSIZE,
 362                        DOOR_GFX_PAGEY1+ED_BUTTON_ELEM_YPOS+3 +
 363                        (i/MAX_ELEM_X)*ED_BUTTON_ELEM_YSIZE,
 364                        graphic);
 365   }
 366
 367   DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
 368                      DOOR_GFX_PAGEX1+ED_WIN_MB_LEFT_XPOS,
 369                      DOOR_GFX_PAGEY1+ED_WIN_MB_LEFT_YPOS,
 370                      el2gfx(new_element1));
 371   DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
 372                      DOOR_GFX_PAGEX1+ED_WIN_MB_MIDDLE_XPOS,
 373                      DOOR_GFX_PAGEY1+ED_WIN_MB_MIDDLE_YPOS,
 374                      el2gfx(new_element2));
 375   DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
 376                      DOOR_GFX_PAGEX1+ED_WIN_MB_RIGHT_XPOS,
 377                      DOOR_GFX_PAGEY1+ED_WIN_MB_RIGHT_YPOS,
 378                      el2gfx(new_element3));
 379   DrawTextExt(pix[PIX_DB_DOOR],gc,
 380               DOOR_GFX_PAGEX2+ED_WIN_LEVELNR_XPOS,
 381               DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS,
 382               int2str(level_nr,2),FS_SMALL,FC_SPECIAL1);
 383   XCopyArea(display,pix[PIX_DB_DOOR],pix[PIX_DB_DOOR],gc,
 384             DOOR_GFX_PAGEX2+ED_WIN_LEVELNR_XPOS+3,
 385             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS,
 386             7,FONT3_YSIZE,
 387             DOOR_GFX_PAGEX1+ED_WIN_LEVELNR_XPOS,
 388             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS);
 389   XCopyArea(display,pix[PIX_DB_DOOR],pix[PIX_DB_DOOR],gc,
 390             DOOR_GFX_PAGEX2+ED_WIN_LEVELNR_XPOS+14,
 391             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS,
 392             7,FONT3_YSIZE,
 393             DOOR_GFX_PAGEX1+ED_WIN_LEVELNR_XPOS+9,
 394             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS);
 395
 396   XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
 397             DOOR_GFX_PAGEX6,DOOR_GFX_PAGEY2,
 398             VXSIZE,VYSIZE,
 399             DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
 400
 401   OpenDoor(DOOR_OPEN_1 | DOOR_OPEN_2);
 402 }
 403
 404 void DrawControlWindow()
 405 {
 406   int i,x,y;
 407
 408   ClearWindow();
 409
 410   /* Inhalt der Mampfer */
 411   DrawText(ED_COUNT_GADGET_XPOS+1,SY+6,
 412            "Contents of a smashed cruncher:",FS_SMALL,FC_YELLOW);
 413   for(i=0;i<4;i++) for(y=0;y<4;y++) for(x=0;x<4;x++)
 414   {
 415     DrawMiniElement(1+5*i+x,2+y,EL_ERDREICH);
 416     XFillRectangle(display,drawto,gc,
 417                    SX+(1+5*i)*MINI_TILEX+MINI_TILEX/2-1,
 418                    SY+(2)*MINI_TILEY+MINI_TILEY/2-1,
 419                    3*MINI_TILEX+2,3*MINI_TILEY+2);
 420   }
 421   XCopyArea(display,drawto,drawto,gc,
 422             SX+1*MINI_TILEX,SY+2*MINI_TILEY,
 423             4*5*MINI_TILEX,5*MINI_TILEY,
 424             SX+1*MINI_TILEX-MINI_TILEX/2,SY+2*MINI_TILEY-MINI_TILEY/2);
 425   for(i=0;i<4;i++)
 426   {
 427     for(y=0;y<3;y++) for(x=0;x<3;x++)
 428       DrawMiniElement(1+5*i+x,2+y,level.mampfer_inhalt[i][x][y]);
 429
 430     DrawText(SX+MINI_TILEX+(5*i+1)*MINI_TILEX+1,
 431              SY+2*MINI_TILEY+(4)*MINI_TILEY-4,
 432              int2str(i+1,1),FS_SMALL,FC_YELLOW);
 433   }
 434
 435   /* Inhalt der Amöbe */
 436   for(y=0;y<2;y++) for(x=0;x<2;x++)
 437   {
 438     DrawMiniElement(29+x,26+y,EL_ERDREICH);
 439     XFillRectangle(display,drawto,gc,
 440                    SX+29*MINI_TILEX+MINI_TILEX/2-1,
 441                    SY+26*MINI_TILEY+MINI_TILEY/2-1,
 442                    MINI_TILEX+2,MINI_TILEY+2);
 443   }
 444   XCopyArea(display,drawto,drawto,gc,
 445             SX+29*MINI_TILEX,SY+26*MINI_TILEY,
 446             3*MINI_TILEX,3*MINI_TILEY,
 447             SX+29*MINI_TILEX-MINI_TILEX/2,SY+26*MINI_TILEY-MINI_TILEY/2);
 448   DrawMiniElement(29,26,level.amoebe_inhalt);
 449
 450   for(i=0;i<11+3+2;i++)
 451   {
 452     XCopyArea(display,pix[PIX_DOOR],drawto,gc,
 453               DOOR_GFX_PAGEX4+ED_BUTTON_MINUS_XPOS,
 454               DOOR_GFX_PAGEY1+ED_BUTTON_MINUS_YPOS,
 455               DXSIZE-4,ED_BUTTON_MINUS_YSIZE,
 456               ED_COUNT_GADGET_XPOS,
 457               ED_COUNT_GADGET_YPOS+i*ED_COUNT_GADGET_YSIZE);
 458
 459     if (i<11)
 460       DrawText(ED_COUNT_VALUE_XPOS,
 461                ED_COUNT_VALUE_YPOS+i*ED_COUNT_GADGET_YSIZE,
 462                int2str(level.score[i],3),FS_SMALL,FC_YELLOW);
 463     else if (i==11)
 464       DrawText(ED_COUNT_VALUE_XPOS,
 465                ED_COUNT_VALUE_YPOS+11*ED_COUNT_GADGET_YSIZE,
 466                int2str(level.tempo_amoebe,3),FS_SMALL,FC_YELLOW);
 467     else if (i==12)
 468       DrawText(ED_COUNT_VALUE_XPOS,
 469                ED_COUNT_VALUE_YPOS+12*ED_COUNT_GADGET_YSIZE,
 470                int2str(level.dauer_sieb,3),FS_SMALL,FC_YELLOW);
 471     else if (i==13)
 472       DrawText(ED_COUNT_VALUE_XPOS,
 473                ED_COUNT_VALUE_YPOS+13*ED_COUNT_GADGET_YSIZE,
 474                int2str(level.dauer_ablenk,3),FS_SMALL,FC_YELLOW);
 475     else if (i==14)
 476       DrawText(ED_COUNT_VALUE_XPOS,
 477                ED_COUNT_VALUE_YPOS+14*ED_COUNT_GADGET_YSIZE,
 478                int2str(level.edelsteine,3),FS_SMALL,FC_YELLOW);
 479     else if (i==15)
 480       DrawText(ED_COUNT_VALUE_XPOS,
 481                ED_COUNT_VALUE_YPOS+15*ED_COUNT_GADGET_YSIZE,
 482                int2str(level.time,3),FS_SMALL,FC_YELLOW);
 483   }
 484
 485   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+0*ED_COUNT_TEXT_YSIZE,
 486            "Score for Emerald",FS_SMALL,FC_YELLOW);
 487   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+1*ED_COUNT_TEXT_YSIZE,
 488            "Score for Diamond",FS_SMALL,FC_YELLOW);
 489   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+2*ED_COUNT_TEXT_YSIZE,
 490            "Score for smashing a Bug",FS_SMALL,FC_YELLOW);
 491   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+3*ED_COUNT_TEXT_YSIZE,
 492            "Score for smashing a Spaceship",FS_SMALL,FC_YELLOW);
 493   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+4*ED_COUNT_TEXT_YSIZE,
 494            "Score for smashing a Cruncher",FS_SMALL,FC_YELLOW);
 495   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+5*ED_COUNT_TEXT_YSIZE,
 496            "Score for smashing an Alien",FS_SMALL,FC_YELLOW);
 497   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+6*ED_COUNT_TEXT_YSIZE,
 498            "Score for smashing a Pacman",FS_SMALL,FC_YELLOW);
 499   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+7*ED_COUNT_TEXT_YSIZE,
 500            "Score for cracking a nut",FS_SMALL,FC_YELLOW);
 501   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+8*ED_COUNT_TEXT_YSIZE,
 502            "Score for dynamite",FS_SMALL,FC_YELLOW);
 503   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+9*ED_COUNT_TEXT_YSIZE,
 504            "Score for key",FS_SMALL,FC_YELLOW);
 505   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+10*ED_COUNT_TEXT_YSIZE,
 506            "Score for each 10 seconds left",FS_SMALL,FC_YELLOW);
 507   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+11*ED_COUNT_TEXT_YSIZE,
 508            "Speed of the amoeba / Content",FS_SMALL,FC_YELLOW);
 509   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+12*ED_COUNT_TEXT_YSIZE,
 510            "Time for magic wall",FS_SMALL,FC_YELLOW);
 511   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+13*ED_COUNT_TEXT_YSIZE,
 512            "Time for wheel",FS_SMALL,FC_YELLOW);
 513   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+14*ED_COUNT_TEXT_YSIZE,
 514            "Emeralds needed in this level",FS_SMALL,FC_YELLOW);
 515   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+15*ED_COUNT_TEXT_YSIZE,
 516            "Time available for this level",FS_SMALL,FC_YELLOW);
 517
 518   XCopyArea(display,pix[PIX_DOOR],drawto,gc,
 519             DOOR_GFX_PAGEX4+ED_WIN_COUNT_XPOS,
 520             DOOR_GFX_PAGEY1+ED_WIN_COUNT_YPOS,
 521             ED_WIN_COUNT_XSIZE,ED_WIN_COUNT_YSIZE,
 522             ED_COUNT_GADGET_XPOS,
 523             ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE);
 524   for(i=1;i<31;i++)
 525     XCopyArea(display,pix[PIX_DOOR],drawto,gc,
 526               DOOR_GFX_PAGEX4+ED_WIN_COUNT_XPOS+3+2*FONT2_XSIZE,
 527               DOOR_GFX_PAGEY1+ED_WIN_COUNT_YPOS,
 528               ED_WIN_COUNT_XSIZE-3-2*FONT2_XSIZE,ED_WIN_COUNT_YSIZE,
 529               ED_COUNT_GADGET_XPOS+3+i*FONT2_XSIZE,
 530               ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE);
 531   DrawText(ED_COUNT_GADGET_XPOS+5,
 532            ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
 533            level.name,FS_SMALL,FC_YELLOW);
 534   DrawText(ED_COUNT_GADGET_XPOS+(30+3)*FONT2_XSIZE-5,
 535            ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
 536            "Title",FS_SMALL,FC_YELLOW);
 537
 538   DrawText(ED_SIZE_GADGET_XPOS,ED_SIZE_GADGET_YPOS-18,
 539            "Playfield size:",FS_SMALL,FC_YELLOW);
 540   XCopyArea(display,pix[PIX_DOOR],drawto,gc,
 541             DOOR_GFX_PAGEX4+ED_BUTTON_MINUS_XPOS,
 542             DOOR_GFX_PAGEY1+ED_BUTTON_MINUS_YPOS,
 543             DXSIZE-4,ED_BUTTON_MINUS_YSIZE,
 544             ED_SIZE_GADGET_XPOS,
 545             ED_SIZE_GADGET_YPOS+0*ED_COUNT_GADGET_YSIZE);
 546   XCopyArea(display,pix[PIX_DOOR],drawto,gc,
 547             DOOR_GFX_PAGEX4+ED_BUTTON_MINUS_XPOS,
 548             DOOR_GFX_PAGEY1+ED_BUTTON_MINUS_YPOS,
 549             DXSIZE-4,ED_BUTTON_MINUS_YSIZE,
 550             ED_SIZE_GADGET_XPOS,
 551             ED_SIZE_GADGET_YPOS+1*ED_COUNT_GADGET_YSIZE);
 552   DrawText(ED_SIZE_TEXT_XPOS,ED_SIZE_TEXT_YPOS+0*ED_SIZE_TEXT_YSIZE,
 553            "Width",FS_SMALL,FC_YELLOW);
 554   DrawText(ED_SIZE_TEXT_XPOS,ED_SIZE_TEXT_YPOS+1*ED_SIZE_TEXT_YSIZE,
 555            "Height",FS_SMALL,FC_YELLOW);
 556   DrawText(ED_SIZE_VALUE_XPOS,ED_SIZE_VALUE_YPOS+0*ED_SIZE_GADGET_YSIZE,
 557            int2str(level.fieldx,3),FS_SMALL,FC_YELLOW);
 558   DrawText(ED_SIZE_VALUE_XPOS,ED_SIZE_VALUE_YPOS+1*ED_SIZE_GADGET_YSIZE,
 559            int2str(level.fieldy,3),FS_SMALL,FC_YELLOW);
 560 }
 561
 562 void ScrollMiniLevel(int from_x, int from_y, int scroll)
 563 {
 564   int x,y;
 565   int dx = (scroll==ED_SCROLL_LEFT ? -1 : scroll==ED_SCROLL_RIGHT ? 1 : 0);
 566   int dy = (scroll==ED_SCROLL_UP   ? -1 : scroll==ED_SCROLL_DOWN  ? 1 : 0);
 567
 568   XCopyArea(display,drawto,drawto,gc,
 569             SX+MINI_TILEX*(dx==-1),SY+MINI_TILEY*(dy==-1),
 570             SXSIZE-MINI_TILEX*ABS(dx),SYSIZE-MINI_TILEY*ABS(dy),
 571             SX+MINI_TILEX*(dx==+1),SY+MINI_TILEY*(dy==+1));
 572   if (dx)
 573   {
 574     x = (dx==1 ? 0 : 2*SCR_FIELDX-1);
 575     for(y=0;y<2*SCR_FIELDY;y++)
 576       DrawMiniElementOrWall(x,y,from_x,from_y);
 577   }
 578   else if (dy)
 579   {
 580     y = (dy==1 ? 0 : 2*SCR_FIELDY-1);
 581     for(x=0;x<2*SCR_FIELDX;x++)
 582       DrawMiniElementOrWall(x,y,from_x,from_y);
 583   }
 584
 585   redraw_mask |= REDRAW_FIELD;
 586   BackToFront();
 587 }
 588
 589 void AdjustLevelScrollPosition()
 590 {
 591   if (level_xpos<-1)
 592     level_xpos = -1;
 593   if (level_xpos>lev_fieldx-2*SCR_FIELDX+1)
 594     level_xpos = lev_fieldx-2*SCR_FIELDX+1;
 595   if (lev_fieldx<2*SCR_FIELDX-2)
 596     level_xpos = -1;
 597
 598   if (level_ypos<-1)
 599     level_ypos = -1;
 600   if (level_ypos>lev_fieldy-2*SCR_FIELDY+1)
 601     level_ypos = lev_fieldy-2*SCR_FIELDY+1;
 602   if (lev_fieldy<2*SCR_FIELDY-2)
 603     level_ypos = -1;
 604 }
 605
 606 void FloodFill(int from_x, int from_y, int fill_element)
 607 {
 608   int i,x,y;
 609   int old_element;
 610   static int check[4][2] = { {-1,0}, {0,-1}, {1,0}, {0,1} };
 611   static int safety = 0;
 612
 613   /* check if starting field still has the desired content */
 614   if (Feld[from_x][from_y] == fill_element)
 615     return;
 616
 617   safety++;
 618
 619   if (safety > lev_fieldx*lev_fieldy)
 620     Error(ERR_EXIT, "Something went wrong in 'FloodFill()'. Please debug.");
 621
 622   old_element = Feld[from_x][from_y];
 623   Feld[from_x][from_y] = fill_element;
 624
 625   for(i=0;i<4;i++)
 626   {
 627     x = from_x + check[i][0];
 628     y = from_y + check[i][1];
 629
 630     if (IN_LEV_FIELD(x,y) && Feld[x][y] == old_element)
 631       FloodFill(x, y, fill_element);
 632   }
 633
 634   safety--;
 635 }
 636
 637 void LevelEd(int mx, int my, int button)
 638 {
 639   static int last_button = 0;
 640   static int in_field_pressed = FALSE;
 641   static boolean use_floodfill = FALSE;
 642   int x = (mx-SX)/MINI_TILEX;
 643   int y = (my-SY)/MINI_TILEY;
 644
 645   if (use_floodfill)            /********** FLOOD FILL **********/
 646   {
 647     if (button)
 648     {
 649       if (mx>=SX && mx<SX+SXSIZE && my>=SY && my<SY+SYSIZE)
 650       {
 651         int from_x, from_y;
 652         int fill_element;
 653
 654         if (x>lev_fieldx || y>lev_fieldy ||
 655             (x==0 && level_xpos<0) ||
 656             (x==2*SCR_FIELDX-1 && level_xpos>lev_fieldx-2*SCR_FIELDX) ||
 657             (y==0 && level_ypos<0) ||
 658             (y==2*SCR_FIELDY-1 && level_ypos>lev_fieldy-2*SCR_FIELDY))
 659           return;
 660
 661         from_x = x+level_xpos;
 662         from_y = y+level_ypos;
 663         fill_element = (button==1 ? new_element1 :
 664                         button==2 ? new_element2 :
 665                         button==3 ? new_element3 : 0);
 666
 667         FloodFill(from_x,from_y,fill_element);
 668         DrawMiniLevel(level_xpos,level_ypos);
 669       }
 670
 671       use_floodfill = FALSE;
 672       CloseDoor(DOOR_CLOSE_1);
 673       OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
 674     }
 675     return;
 676   }
 677   else                          /********** EDIT/CTRL-FENSTER **********/
 678   {
 679     static long choice_delay = 0;
 680     int choice = CheckElemButtons(mx,my,button);
 681     int elem_pos = choice-ED_BUTTON_ELEM;
 682
 683     if (((choice == ED_BUTTON_EUP && element_shift>0) ||
 684          (choice == ED_BUTTON_EDOWN &&
 685           element_shift<elements_in_list-MAX_ELEM_X*MAX_ELEM_Y)) &&
 686         DelayReached(&choice_delay, CHOICE_DELAY_VALUE))
 687     {
 688       int i, step;
 689
 690       step = (button==1 ? MAX_ELEM_X : button==2 ? 5*MAX_ELEM_X :
 691               elements_in_list);
 692       element_shift += (choice==ED_BUTTON_EUP ? -step : step);
 693       if (element_shift<0)
 694         element_shift = 0;
 695       if (element_shift>elements_in_list-MAX_ELEM_X*MAX_ELEM_Y)
 696         element_shift = elements_in_list-MAX_ELEM_X*MAX_ELEM_Y;
 697       if (element_shift % MAX_ELEM_X)
 698         element_shift += MAX_ELEM_X-(element_shift % MAX_ELEM_X);
 699
 700       for(i=0;i<MAX_ELEM_X*MAX_ELEM_Y;i++)
 701         DrawElemButton(i+2,ED_BUTTON_RELEASED);
 702     }
 703     else if (elem_pos>=0 && elem_pos<MAX_ELEM_X*MAX_ELEM_Y)
 704     {
 705       int new_element;
 706
 707       if (elem_pos+element_shift < elements_in_list)
 708         new_element = editor_element[elem_pos+element_shift];
 709       else
 710         new_element = EL_LEERRAUM;
 711
 712       if (last_button==1)
 713         new_element1 = new_element;
 714       else if (last_button==2)
 715         new_element2 = new_element;
 716       else if (last_button==3)
 717         new_element3 = new_element;
 718
 719       DrawMiniGraphicExt(drawto,gc,
 720                          DX+ED_WIN_MB_LEFT_XPOS,
 721                          DY+ED_WIN_MB_LEFT_YPOS,
 722                          el2gfx(new_element1));
 723       DrawMiniGraphicExt(drawto,gc,
 724                          DX+ED_WIN_MB_MIDDLE_XPOS,
 725                          DY+ED_WIN_MB_MIDDLE_YPOS,
 726                          el2gfx(new_element2));
 727       DrawMiniGraphicExt(drawto,gc,
 728                          DX+ED_WIN_MB_RIGHT_XPOS,
 729                          DY+ED_WIN_MB_RIGHT_YPOS,
 730                          el2gfx(new_element3));
 731       redraw_mask |= REDRAW_DOOR_1;
 732     }
 733
 734     if (edit_mode)              /********** EDIT-FENSTER **********/
 735     {
 736       switch(CheckEditButtons(mx,my,button))
 737       {
 738         case ED_BUTTON_CTRL:
 739           CloseDoor(DOOR_CLOSE_2);
 740           DrawControlWindow();
 741           XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
 742                     DOOR_GFX_PAGEX4,DOOR_GFX_PAGEY1+80,
 743                     VXSIZE,VYSIZE,
 744                     DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
 745           OpenDoor(DOOR_OPEN_2);
 746           edit_mode = FALSE;
 747           break;
 748         case ED_BUTTON_FILL:
 749           Request("Caution ! Flood fill mode ! Choose area !",REQ_OPEN);
 750           use_floodfill = TRUE;
 751           return;
 752           break;
 753         case ED_BUTTON_LEFT:
 754           if (level_xpos>=0)
 755           {
 756             if (!DelayReached(&choice_delay, CHOICE_DELAY_VALUE))
 757               break;
 758             if (lev_fieldx<2*SCR_FIELDX-2)
 759               break;
 760
 761             level_xpos -= (button==1 ? 1 : button==2 ? 5 : lev_fieldx);
 762             if (level_xpos<-1)
 763               level_xpos = -1;
 764             if (button==1)
 765               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_RIGHT);
 766             else
 767               DrawMiniLevel(level_xpos,level_ypos);
 768           }
 769           break;
 770         case ED_BUTTON_RIGHT:
 771           if (level_xpos<=lev_fieldx-2*SCR_FIELDX)
 772           {
 773             if (!DelayReached(&choice_delay, CHOICE_DELAY_VALUE))
 774               break;
 775             if (lev_fieldx<2*SCR_FIELDX-2)
 776               break;
 777
 778             level_xpos += (button==1 ? 1 : button==2 ? 5 : lev_fieldx);
 779             if (level_xpos>lev_fieldx-2*SCR_FIELDX+1)
 780               level_xpos = lev_fieldx-2*SCR_FIELDX+1;
 781             if (button==1)
 782               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_LEFT);
 783             else
 784               DrawMiniLevel(level_xpos,level_ypos);
 785           }
 786           break;
 787         case ED_BUTTON_UP:
 788           if (level_ypos>=0)
 789           {
 790             if (!DelayReached(&choice_delay, CHOICE_DELAY_VALUE))
 791               break;
 792             if (lev_fieldy<2*SCR_FIELDY-2)
 793               break;
 794
 795             level_ypos -= (button==1 ? 1 : button==2 ? 5 : lev_fieldy);
 796             if (level_ypos<-1)
 797               level_ypos = -1;
 798             if (button==1)
 799               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_DOWN);
 800             else
 801               DrawMiniLevel(level_xpos,level_ypos);
 802           }
 803           break;
 804         case ED_BUTTON_DOWN:
 805           if (level_ypos<=lev_fieldy-2*SCR_FIELDY)
 806           {
 807             if (!DelayReached(&choice_delay, CHOICE_DELAY_VALUE))
 808               break;
 809             if (lev_fieldy<2*SCR_FIELDY-2)
 810               break;
 811
 812             level_ypos += (button==1 ? 1 : button==2 ? 5 : lev_fieldy);
 813             if (level_ypos>lev_fieldy-2*SCR_FIELDY+1)
 814               level_ypos = lev_fieldy-2*SCR_FIELDY+1;
 815             if (button==1)
 816               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_UP);
 817             else
 818               DrawMiniLevel(level_xpos,level_ypos);
 819           }
 820           break;
 821         default:
 822           break;
 823       }
 824
 825       if (mx>=SX && mx<SX+SXSIZE && my>=SY && my<SY+SYSIZE)
 826       {
 827         int new_element;
 828
 829         if (button && !motion_status)
 830           in_field_pressed = TRUE;
 831
 832         if (!button || !in_field_pressed || button<1 || button>3 ||
 833             (y==0 && level_ypos<0) ||
 834             (y==2*SCR_FIELDY-1 && level_ypos>lev_fieldy-2*SCR_FIELDY) ||
 835             (x==0 && level_xpos<0) ||
 836             (x==2*SCR_FIELDX-1 && level_xpos>lev_fieldx-2*SCR_FIELDX) ||
 837             x>lev_fieldx || y>lev_fieldy)
 838           return;
 839
 840         new_element = (button==1 ? new_element1 :
 841                        button==2 ? new_element2 :
 842                        button==3 ? new_element3 : 0);
 843
 844         if (new_element != Feld[x+level_xpos][y+level_ypos])
 845         {
 846           if (new_element==EL_SPIELFIGUR) /* Jeder nur EINE Figur bitte... */
 847           {
 848             int x,y;
 849
 850             for(x=0;x<lev_fieldx;x++) for(y=0;y<lev_fieldy;y++)
 851             {
 852               if (Feld[x][y]==EL_SPIELFIGUR || Feld[x][y]==EL_SPIELER1)
 853               {
 854                 Feld[x][y] = EL_LEERRAUM;
 855                 if (x-level_xpos>=0 && x-level_xpos<2*SCR_FIELDX &&
 856                     y-level_ypos>=0 && y-level_ypos<2*SCR_FIELDY)
 857                   DrawMiniElement(x-level_xpos,y-level_ypos,EL_LEERRAUM);
 858               }
 859             }
 860           }
 861
 862           Feld[x+level_xpos][y+level_ypos] = new_element;
 863           DrawMiniElement(x,y,new_element);
 864         }
 865       }
 866       else if (!motion_status)  /* Mauszeiger nicht im Level-Feld */
 867         in_field_pressed = FALSE;
 868     }
 869     else                        /********** KONTROLL-FENSTER **********/
 870     {
 871       int choice = CheckCountButtons(mx,my,button);
 872       int step = (button==1 ? 1 : button==2 ? 5 : button==3 ? 10 : 0);
 873
 874       if (choice >= 0 && choice < 36 &&
 875           DelayReached(&choice_delay, CHOICE_DELAY_VALUE))
 876       {
 877         if (!(choice % 2))
 878           step = -step;
 879
 880         choice /= 2;
 881
 882         if (choice<11)
 883         {
 884           level.score[choice] += step;
 885           if (level.score[choice]<0)
 886             level.score[choice] = 0;
 887           else if (level.score[choice]>255)
 888             level.score[choice] = 255;
 889         }
 890         else if (choice==11)
 891         {
 892           level.tempo_amoebe += step;
 893           if (level.tempo_amoebe<0)
 894             level.tempo_amoebe = 0;
 895           else if (level.tempo_amoebe>255)
 896             level.tempo_amoebe = 255;
 897         }
 898         else if (choice==12)
 899         {
 900           level.dauer_sieb += step;
 901           if (level.dauer_sieb<0)
 902             level.dauer_sieb = 0;
 903           else if (level.dauer_sieb>255)
 904             level.dauer_sieb = 255;
 905         }
 906         else if (choice==13)
 907         {
 908           level.dauer_ablenk += step;
 909           if (level.dauer_ablenk<0)
 910             level.dauer_ablenk = 0;
 911           else if (level.dauer_ablenk>255)
 912             level.dauer_ablenk = 255;
 913         }
 914         else if (choice==14)
 915         {
 916           level.edelsteine += step;
 917           if (level.edelsteine<0)
 918             level.edelsteine = 0;
 919           else if (level.edelsteine>999)
 920             level.edelsteine = 999;
 921         }
 922         else if (choice==15)
 923         {
 924           level.time += step;
 925           if (level.time<0)
 926             level.time = 0;
 927           else if (level.time>999)
 928             level.time = 999;
 929         }
 930         else if (choice==16)
 931         {
 932           lev_fieldx += step;
 933           if (lev_fieldx<MIN_LEV_FIELDX)
 934             lev_fieldx = MIN_LEV_FIELDX;
 935           else if (lev_fieldx>MAX_LEV_FIELDX)
 936             lev_fieldx = MAX_LEV_FIELDX;
 937           level.fieldx = lev_fieldx;
 938         }
 939         else if (choice==17)
 940         {
 941           lev_fieldy += step;
 942           if (lev_fieldy<MIN_LEV_FIELDY)
 943             lev_fieldy = MIN_LEV_FIELDY;
 944           else if (lev_fieldy>MAX_LEV_FIELDY)
 945             lev_fieldy = MAX_LEV_FIELDY;
 946           level.fieldy = lev_fieldy;
 947         }
 948
 949         if (choice<11)
 950           DrawText(ED_COUNT_VALUE_XPOS,
 951                    ED_COUNT_VALUE_YPOS+choice*ED_COUNT_GADGET_YSIZE,
 952                    int2str(level.score[choice],3),FS_SMALL,FC_YELLOW);
 953         else if (choice==11)
 954           DrawText(ED_COUNT_VALUE_XPOS,
 955                    ED_COUNT_VALUE_YPOS+11*ED_COUNT_GADGET_YSIZE,
 956                    int2str(level.tempo_amoebe,3),FS_SMALL,FC_YELLOW);
 957         else if (choice==12)
 958           DrawText(ED_COUNT_VALUE_XPOS,
 959                    ED_COUNT_VALUE_YPOS+12*ED_COUNT_GADGET_YSIZE,
 960                    int2str(level.dauer_sieb,3),FS_SMALL,FC_YELLOW);
 961         else if (choice==13)
 962           DrawText(ED_COUNT_VALUE_XPOS,
 963                    ED_COUNT_VALUE_YPOS+13*ED_COUNT_GADGET_YSIZE,
 964                    int2str(level.dauer_ablenk,3),FS_SMALL,FC_YELLOW);
 965         else if (choice==14)
 966           DrawText(ED_COUNT_VALUE_XPOS,
 967                    ED_COUNT_VALUE_YPOS+14*ED_COUNT_GADGET_YSIZE,
 968                    int2str(level.edelsteine,3),FS_SMALL,FC_YELLOW);
 969         else if (choice==15)
 970           DrawText(ED_COUNT_VALUE_XPOS,
 971                    ED_COUNT_VALUE_YPOS+15*ED_COUNT_GADGET_YSIZE,
 972                    int2str(level.time,3),FS_SMALL,FC_YELLOW);
 973         else if (choice==16)
 974           DrawText(ED_SIZE_VALUE_XPOS,
 975                    ED_SIZE_VALUE_YPOS+0*ED_SIZE_GADGET_YSIZE,
 976                    int2str(level.fieldx,3),FS_SMALL,FC_YELLOW);
 977         else if (choice==17)
 978           DrawText(ED_SIZE_VALUE_XPOS,
 979                    ED_SIZE_VALUE_YPOS+1*ED_SIZE_GADGET_YSIZE,
 980                    int2str(level.fieldy,3),FS_SMALL,FC_YELLOW);
 981
 982         redraw_mask &= ~REDRAW_FIELD;
 983         if (choice<16)
 984           XCopyArea(display,drawto,window,gc,
 985                     ED_COUNT_VALUE_XPOS,
 986                     ED_COUNT_VALUE_YPOS+choice*ED_COUNT_GADGET_YSIZE,
 987                     3*FONT2_XSIZE,FONT2_YSIZE,
 988                     ED_COUNT_VALUE_XPOS,
 989                     ED_COUNT_VALUE_YPOS+choice*ED_COUNT_GADGET_YSIZE);
 990         else
 991           XCopyArea(display,drawto,window,gc,
 992                     ED_SIZE_VALUE_XPOS,
 993                     ED_SIZE_VALUE_YPOS+(choice-16)*ED_SIZE_GADGET_YSIZE,
 994                     3*FONT2_XSIZE,FONT2_YSIZE,
 995                     ED_SIZE_VALUE_XPOS,
 996                     ED_SIZE_VALUE_YPOS+(choice-16)*ED_SIZE_GADGET_YSIZE);
 997         XFlush(display);
 998       }
 999
1000       switch(CheckCtrlButtons(mx,my,button))
1001       {
1002         case ED_BUTTON_EDIT:
1003           CloseDoor(DOOR_CLOSE_2);
1004           AdjustLevelScrollPosition();
1005           DrawMiniLevel(level_xpos,level_ypos);
1006           XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
1007                     DOOR_GFX_PAGEX6,DOOR_GFX_PAGEY2,
1008                     VXSIZE,VYSIZE,
1009                     DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
1010           OpenDoor(DOOR_OPEN_2);
1011           edit_mode = TRUE;
1012           break;
1013         case ED_BUTTON_CLEAR:
1014           if (Request("Are you sure to clear this level ?",REQ_ASK))
1015           {
1016             for(x=0;x<MAX_LEV_FIELDX;x++)
1017               for(y=0;y<MAX_LEV_FIELDY;y++)
1018                 Feld[x][y] = EL_ERDREICH;
1019             DrawMiniLevel(level_xpos,level_ypos);
1020           }
1021           break;
1022         case ED_BUTTON_UNDO:
1023           if (leveldir[leveldir_nr].readonly ||
1024               Request("Exit without saving ?",REQ_ASK | REQ_STAY_OPEN))
1025           {
1026             CloseDoor(DOOR_CLOSE_BOTH);
1027             game_status=MAINMENU;
1028             DrawMainMenu();
1029           }
1030           else
1031           {
1032             CloseDoor(DOOR_CLOSE_1);
1033             OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
1034           }
1035           break;
1036         case ED_BUTTON_EXIT:
1037           {
1038             int figur_vorhanden = FALSE;
1039
1040             if (leveldir[leveldir_nr].readonly)
1041             {
1042               Request("This level is read only !",REQ_CONFIRM);
1043               break;
1044             }
1045
1046             for(y=0;y<lev_fieldy;y++)
1047               for(x=0;x<lev_fieldx;x++)
1048                 if (Feld[x][y]==EL_SPIELFIGUR || Feld[x][y]==EL_SPIELER1)
1049                   figur_vorhanden = TRUE;
1050
1051             if (!figur_vorhanden)
1052               Request("No Level without Gregor Mc Duffin please !",
1053                          REQ_CONFIRM);
1054             else
1055             {
1056               if (Request("Save this level and kill the old ?",
1057                              REQ_ASK | REQ_STAY_OPEN))
1058               {
1059                 for(x=0;x<lev_fieldx;x++)
1060                   for(y=0;y<lev_fieldy;y++)
1061                     Ur[x][y]=Feld[x][y];
1062                 SaveLevel(level_nr);
1063               }
1064               CloseDoor(DOOR_CLOSE_BOTH);
1065               game_status=MAINMENU;
1066               DrawMainMenu();
1067             }
1068           }
1069           break;
1070         default:
1071           break;
1072       }
1073
1074       if (mx>=ED_COUNT_GADGET_XPOS &&
1075           mx<ED_COUNT_GADGET_XPOS+31*FONT2_XSIZE+10 &&
1076           my>=ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE &&
1077           my<ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE+ED_WIN_COUNT_YSIZE)
1078       {
1079         if (!name_typing)
1080         {
1081           name_typing = TRUE;
1082           DrawText(ED_COUNT_GADGET_XPOS+5,
1083                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1084                    level.name,FS_SMALL,FC_GREEN);
1085           DrawText(ED_COUNT_GADGET_XPOS+5+strlen(level.name)*FONT2_XSIZE,
1086                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1087                    "<",FS_SMALL,FC_RED);
1088         }
1089       }
1090       else
1091       {
1092         if (name_typing)
1093         {
1094           name_typing = FALSE;
1095           DrawText(ED_COUNT_GADGET_XPOS+5,
1096                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1097                    level.name,FS_SMALL,FC_YELLOW);
1098           DrawText(ED_COUNT_GADGET_XPOS+5+strlen(level.name)*FONT2_XSIZE,
1099                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1100                    " ",FS_SMALL,FC_RED);
1101         }
1102       }
1103
1104       if (mx>=SX+29*MINI_TILEX && mx<SX+30*MINI_TILEX &&
1105           my>=SY+26*MINI_TILEY && my<SY+27*MINI_TILEY)
1106       {
1107         int new_element;
1108
1109         if (!button || button<1 || button>3)
1110           return;
1111
1112         new_element = (button==1 ? new_element1 :
1113                        button==2 ? new_element2 :
1114                        button==3 ? new_element3 : 0);
1115
1116         if (new_element != level.amoebe_inhalt)
1117         {
1118           level.amoebe_inhalt = new_element;
1119           DrawMiniElement(29,26,new_element);
1120         }
1121       }
1122
1123       if (mx>=SX+1*MINI_TILEX && mx<SX+(1+4*5)*MINI_TILEX &&
1124           my>=SY+2*MINI_TILEY && my<SY+(2+3)*MINI_TILEY)
1125       {
1126         int x = (mx-SX-1*MINI_TILEX)/MINI_TILEX;
1127         int y = (my-SY-2*MINI_TILEY)/MINI_TILEY;
1128         int i = x/5;
1129         int new_element;
1130
1131         x = x-i*5;
1132         if (i>=0 && i<43 && x>=0 && x<3 && y>=0 && y<3)
1133         {
1134           if (button && !motion_status)
1135             in_field_pressed = TRUE;
1136
1137           if (!button || !in_field_pressed || button<1 || button>3)
1138             return;
1139
1140           new_element = (button==1 ? new_element1 :
1141                          button==2 ? new_element2 :
1142                          button==3 ? new_element3 : 0);
1143
1144           if (new_element != level.mampfer_inhalt[i][x][y])
1145           {
1146             level.mampfer_inhalt[i][x][y] = new_element;
1147             DrawMiniElement(1+5*i+x,2+y,new_element);
1148           }
1149         }
1150         else if (!motion_status)/* Mauszeiger nicht im Cruncher-Feld */
1151           in_field_pressed = FALSE;
1152       }
1153       else if (!motion_status)  /* Mauszeiger nicht im Cruncher-Feld */
1154         in_field_pressed = FALSE;
1155     }
1156   }
1157
1158   last_button = button;
1159
1160   BackToFront();
1161 }
1162
1163 void LevelNameTyping(KeySym key)
1164 {
1165   unsigned char ascii = 0;
1166   int len = strlen(level.name);
1167
1168   if (!name_typing)
1169     return;
1170
1171   if (key>=XK_A && key<=XK_Z)
1172     ascii = 'A'+(char)(key-XK_A);
1173   else if (key>=XK_a && key<=XK_z)
1174     ascii = 'a'+(char)(key-XK_a);
1175   else if (key>=XK_0 && key<=XK_9)
1176     ascii = '0'+(char)(key-XK_0);
1177 #ifdef XK_LATIN1
1178   else if (key>=XK_space && key<=XK_at)
1179     ascii = ' '+(char)(key-XK_space);
1180   else if (key==XK_Adiaeresis)
1181     ascii = 'Ä';
1182   else if (key==XK_Odiaeresis)
1183     ascii = 'Ö';
1184   else if (key==XK_Udiaeresis)
1185     ascii = 'Ü';
1186   else if (key==XK_adiaeresis)
1187     ascii = 'ä';
1188   else if (key==XK_odiaeresis)
1189     ascii = 'ö';
1190   else if (key==XK_udiaeresis)
1191     ascii = 'ü';
1192   else if (key==XK_underscore)
1193     ascii = '_';
1194 #endif
1195
1196   if (ascii && len<MAX_LEVNAMLEN-2)
1197   {
1198     level.name[len] = ascii;
1199     level.name[len+1] = 0;
1200     len++;
1201
1202     DrawTextExt(drawto,gc,
1203                 ED_COUNT_GADGET_XPOS+5,
1204                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1205                 level.name,FS_SMALL,FC_GREEN);
1206     DrawTextExt(window,gc,
1207                 ED_COUNT_GADGET_XPOS+5,
1208                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1209                 level.name,FS_SMALL,FC_GREEN);
1210     DrawTextExt(drawto,gc,
1211                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1212                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1213                 "<",FS_SMALL,FC_RED);
1214     DrawTextExt(window,gc,
1215                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1216                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1217                 "<",FS_SMALL,FC_RED);
1218   }
1219   else if ((key==XK_Delete || key==XK_BackSpace) && len>0)
1220   {
1221     level.name[len-1] = 0;
1222     len--;
1223
1224     DrawTextExt(drawto,gc,
1225                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1226                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1227                 "< ",FS_SMALL,FC_GREEN);
1228     DrawTextExt(window,gc,
1229                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1230                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1231                 "< ",FS_SMALL,FC_GREEN);
1232   }
1233   else if (key==XK_Return)
1234   {
1235     DrawTextExt(drawto,gc,
1236                 ED_COUNT_GADGET_XPOS+5,
1237                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1238                 level.name,FS_SMALL,FC_YELLOW);
1239     DrawTextExt(window,gc,
1240                 ED_COUNT_GADGET_XPOS+5,
1241                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1242                 level.name,FS_SMALL,FC_YELLOW);
1243     DrawTextExt(drawto,gc,
1244                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1245                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1246                 " ",FS_SMALL,FC_YELLOW);
1247     DrawTextExt(window,gc,
1248                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1249                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1250                 " ",FS_SMALL,FC_YELLOW);
1251
1252     name_typing = FALSE;
1253   }
1254 }