rnd-19981219-1
[rocksndiamonds.git] / 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 #include "game.h"
21
22 /* positions in the level editor */
23 #define ED_WIN_MB_LEFT_XPOS     7
24 #define ED_WIN_MB_LEFT_YPOS     6
25 #define ED_WIN_LEVELNR_XPOS     77
26 #define ED_WIN_LEVELNR_YPOS     7
27 #define ED_WIN_MB_MIDDLE_XPOS   7
28 #define ED_WIN_MB_MIDDLE_YPOS   258
29 #define ED_WIN_MB_RIGHT_XPOS    77
30 #define ED_WIN_MB_RIGHT_YPOS    258
31
32 /* other constants for the editor */
33 #define ED_SCROLL_NO            0
34 #define ED_SCROLL_LEFT          1
35 #define ED_SCROLL_RIGHT         2
36 #define ED_SCROLL_UP            4
37 #define ED_SCROLL_DOWN          8
38
39 /* screens in the level editor */
40 #define ED_MODE_DRAWING         0
41 #define ED_MODE_INFO            1
42 #define ED_MODE_PROPERTIES      2
43
44 /* how many steps can be cancelled */
45 #define NUM_UNDO_STEPS          (10 + 1)
46
47 /* values for random placement */
48 #define RANDOM_USE_PERCENTAGE   0
49 #define RANDOM_USE_NUM_OBJECTS  1
50
51 /* values for the control window */
52 #define ED_CTRL_BUTTONS_GFX_YPOS 236
53 #define ED_CTRL1_BUTTONS_HORIZ  4
54 #define ED_CTRL1_BUTTONS_VERT   4
55 #define ED_CTRL1_BUTTON_XSIZE   22
56 #define ED_CTRL1_BUTTON_YSIZE   22
57 #define ED_CTRL1_BUTTONS_XPOS   6
58 #define ED_CTRL1_BUTTONS_YPOS   6
59 #define ED_CTRL2_BUTTONS_HORIZ  3
60 #define ED_CTRL2_BUTTONS_VERT   2
61 #define ED_CTRL2_BUTTON_XSIZE   30
62 #define ED_CTRL2_BUTTON_YSIZE   20
63 #define ED_CTRL2_BUTTONS_XPOS   5
64 #define ED_CTRL2_BUTTONS_YPOS   100
65 #define ED_NUM_CTRL1_BUTTONS   (ED_CTRL1_BUTTONS_HORIZ * ED_CTRL1_BUTTONS_VERT)
66 #define ED_NUM_CTRL2_BUTTONS   (ED_CTRL2_BUTTONS_HORIZ * ED_CTRL2_BUTTONS_VERT)
67 #define ED_NUM_CTRL_BUTTONS    (ED_NUM_CTRL1_BUTTONS + ED_NUM_CTRL2_BUTTONS)
68
69 /* values for other gadgets */
70 #define ED_SCORE_XPOS           TILEX
71 #define ED_SCORE_YPOS           (7 * TILEY)
72 #define ED_COUNT_VALUE_XOFFSET  5
73 #define ED_COUNT_VALUE_YOFFSET  3
74
75 /* control button identifiers */
76 #define ED_CTRL_ID_SINGLE_ITEMS         0
77 #define ED_CTRL_ID_CONNECTED_ITEMS      1
78 #define ED_CTRL_ID_LINE                 2
79 #define ED_CTRL_ID_TEXT                 3
80 #define ED_CTRL_ID_RECTANGLE            4
81 #define ED_CTRL_ID_FILLED_BOX           5
82 #define ED_CTRL_ID_WRAP_UP              6
83 #define ED_CTRL_ID_PROPERTIES           7
84 #define ED_CTRL_ID_FLOOD_FILL           8
85 #define ED_CTRL_ID_WRAP_LEFT            9
86 #define ED_CTRL_ID_WRAP_RIGHT           11
87 #define ED_CTRL_ID_RANDOM_PLACEMENT     12
88 #define ED_CTRL_ID_BRUSH                13
89 #define ED_CTRL_ID_WRAP_DOWN            14
90 #define ED_CTRL_ID_UNDO                 16
91 #define ED_CTRL_ID_INFO                 17
92 #define ED_CTRL_ID_SAVE                 18
93 #define ED_CTRL_ID_CLEAR                19
94 #define ED_CTRL_ID_TEST                 20
95 #define ED_CTRL_ID_EXIT                 21
96
97 /* counter button identifiers */
98 #define ED_CTRL_ID_SCORE_DOWN           22
99 #define ED_CTRL_ID_SCORE_UP             23
100
101 /* drawing area identifiers */
102 #define ED_CTRL_ID_DRAWING_LEVEL        24
103
104 #define ED_NUM_GADGETS                  25
105
106 /* values for counter gadgets */
107 #define ED_COUNTER_SCORE                0
108
109 #define ED_NUM_COUNTERS                 1
110
111 static struct
112 {
113   int x, y;
114   int gadget_id;
115 } counter_info[ED_NUM_COUNTERS] =
116 {
117   { ED_SCORE_XPOS,      ED_SCORE_YPOS,          ED_CTRL_ID_SCORE_DOWN }
118 };
119
120 /* forward declaration for internal use */
121 static void DrawDrawingWindow();
122 static void DrawPropertiesWindow(int);
123 static void CopyLevelToUndoBuffer();
124 static void HandleDrawingAreas(struct GadgetInfo *);
125 static void HandleCounterButtons(struct GadgetInfo *);
126 static void HandleControlButtons(struct GadgetInfo *);
127
128 static struct GadgetInfo *level_editor_gadget[ED_NUM_GADGETS];
129 static boolean level_editor_gadgets_created = FALSE;
130
131 static int drawing_function = ED_CTRL_ID_SINGLE_ITEMS;
132
133 static short OrigBackup[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
134 static short UndoBuffer[NUM_UNDO_STEPS][MAX_LEV_FIELDX][MAX_LEV_FIELDY];
135 static int undo_buffer_position = 0;
136 static int undo_buffer_steps = 0;
137
138 static int random_placement_percentage = 10;
139 static int random_placement_num_objects = 10;
140 #if 0
141 static int random_placement_method = RANDOM_USE_PERCENTAGE;
142 #else
143 static int random_placement_method = RANDOM_USE_NUM_OBJECTS;
144 #endif
145
146 /* pointer to score value */
147 static int *gadget_score_value;
148
149 static int level_xpos,level_ypos;
150 static int edit_mode;
151 static boolean name_typing;
152 static int new_element1 = EL_MAUERWERK;
153 static int new_element2 = EL_LEERRAUM;
154 static int new_element3 = EL_ERDREICH;
155
156 int element_shift;
157 int editor_element[] =
158 {
159   EL_CHAR_A + ('B' - 'A'),
160   EL_CHAR_A + ('O' - 'A'),
161   EL_CHAR_A + ('U' - 'A'),
162   EL_CHAR_A + ('L' - 'A'),
163
164   EL_CHAR_MINUS,
165   EL_CHAR_A + ('D' - 'A'),
166   EL_CHAR_A + ('E' - 'A'),
167   EL_CHAR_A + ('R' - 'A'),
168
169   EL_CHAR_A + ('D' - 'A'),
170   EL_CHAR_A + ('A' - 'A'),
171   EL_CHAR_A + ('S' - 'A'),
172   EL_CHAR_A + ('H' - 'A'),
173
174   EL_SPIELFIGUR,
175   EL_LEERRAUM,
176   EL_ERDREICH,
177   EL_BETON,
178
179   EL_FELSBODEN,
180   EL_SIEB2_LEER,
181   EL_AUSGANG_ZU,
182   EL_AUSGANG_AUF,
183
184   EL_EDELSTEIN_BD,
185   EL_BUTTERFLY_O,
186   EL_FIREFLY_O,
187   EL_FELSBROCKEN,
188
189   EL_BUTTERFLY_L,
190   EL_FIREFLY_L,
191   EL_BUTTERFLY_R,
192   EL_FIREFLY_R,
193
194   EL_AMOEBE_BD,
195   EL_BUTTERFLY_U,
196   EL_FIREFLY_U,
197   EL_LEERRAUM,
198
199   EL_CHAR_A + ('E' - 'A'),
200   EL_CHAR_A + ('M' - 'A'),
201   EL_CHAR_A + ('E' - 'A'),
202   EL_CHAR_MINUS,
203
204   EL_CHAR_A + ('R' - 'A'),
205   EL_CHAR_A + ('A' - 'A'),
206   EL_CHAR_A + ('L' - 'A'),
207   EL_CHAR_A + ('D' - 'A'),
208
209   EL_CHAR_A + ('M' - 'A'),
210   EL_CHAR_A + ('I' - 'A'),
211   EL_CHAR_A + ('N' - 'A'),
212   EL_CHAR_A + ('E' - 'A'),
213
214   EL_SPIELER1,
215   EL_SPIELER2,
216   EL_SPIELER3,
217   EL_SPIELER4,
218
219   EL_SPIELFIGUR,
220   EL_LEERRAUM,
221   EL_ERDREICH,
222   EL_FELSBROCKEN,
223
224   EL_BETON,
225   EL_MAUERWERK,
226   EL_FELSBODEN,
227   EL_SIEB_LEER,
228
229   EL_EDELSTEIN,
230   EL_DIAMANT,
231   EL_KOKOSNUSS,
232   EL_BOMBE,
233
234   EL_ERZ_EDEL,
235   EL_ERZ_DIAM,
236   EL_MORAST_LEER,
237   EL_MORAST_VOLL,
238
239   EL_DYNAMIT_AUS,
240   EL_DYNAMIT,
241   EL_AUSGANG_ZU,
242   EL_AUSGANG_AUF,
243
244   EL_MAMPFER,
245   EL_KAEFER_O,
246   EL_FLIEGER_O,
247   EL_ROBOT,
248
249   EL_KAEFER_L,
250   EL_FLIEGER_L,
251   EL_KAEFER_R,
252   EL_FLIEGER_R,
253
254   EL_ABLENK_AUS,
255   EL_KAEFER_U,
256   EL_FLIEGER_U,
257   EL_UNSICHTBAR,
258
259   EL_BADEWANNE1,
260   EL_SALZSAEURE,
261   EL_BADEWANNE2,
262   EL_LEERRAUM,
263
264   EL_BADEWANNE3,
265   EL_BADEWANNE4,
266   EL_BADEWANNE5,
267   EL_LEERRAUM,
268
269   EL_TROPFEN,
270   EL_AMOEBE_TOT,
271   EL_AMOEBE_NASS,
272   EL_AMOEBE_NORM,
273
274   EL_SCHLUESSEL1,
275   EL_SCHLUESSEL2,
276   EL_SCHLUESSEL3,
277   EL_SCHLUESSEL4,
278
279   EL_PFORTE1,
280   EL_PFORTE2,
281   EL_PFORTE3,
282   EL_PFORTE4,
283
284   EL_PFORTE1X,
285   EL_PFORTE2X,
286   EL_PFORTE3X,
287   EL_PFORTE4X,
288
289   EL_CHAR_A + ('M' - 'A'),
290   EL_CHAR_A + ('O' - 'A'),
291   EL_CHAR_A + ('R' - 'A'),
292   EL_CHAR_A + ('E' - 'A'),
293
294   EL_PFEIL_L,
295   EL_PFEIL_R,
296   EL_PFEIL_O,
297   EL_PFEIL_U,
298
299   EL_AMOEBE_VOLL,
300   EL_EDELSTEIN_GELB,
301   EL_EDELSTEIN_ROT,
302   EL_EDELSTEIN_LILA,
303
304   EL_ERZ_EDEL_BD,
305   EL_ERZ_EDEL_GELB,
306   EL_ERZ_EDEL_ROT,
307   EL_ERZ_EDEL_LILA,
308
309   EL_LIFE,
310   EL_PACMAN_O,
311   EL_ZEIT_VOLL,
312   EL_ZEIT_LEER,
313
314   EL_PACMAN_L,
315   EL_MAMPFER2,
316   EL_PACMAN_R,
317   EL_MAUER_LEBT,
318
319   EL_LIFE_ASYNC,
320   EL_PACMAN_U,
321   EL_BIRNE_AUS,
322   EL_BIRNE_EIN,
323
324   EL_DYNABOMB_NR,
325   EL_DYNABOMB_SZ,
326   EL_DYNABOMB_XL,
327   EL_BADEWANNE,
328
329   EL_MAULWURF,
330   EL_PINGUIN,
331   EL_SCHWEIN,
332   EL_DRACHE,
333
334   EL_SONDE,
335   EL_MAUER_X,
336   EL_MAUER_Y,
337   EL_MAUER_XY,
338
339   EL_CHAR_A + ('S' - 'A'),
340   EL_CHAR_A + ('O' - 'A'),
341   EL_CHAR_A + ('K' - 'A'),
342   EL_CHAR_A + ('O' - 'A'),
343
344   EL_CHAR_MINUS,
345   EL_CHAR_A + ('B' - 'A'),
346   EL_CHAR_A + ('A' - 'A'),
347   EL_CHAR_A + ('N' - 'A'),
348
349   EL_SOKOBAN_OBJEKT,
350   EL_SOKOBAN_FELD_LEER,
351   EL_SOKOBAN_FELD_VOLL,
352   EL_BETON,
353
354 /*
355   EL_CHAR_A + ('D' - 'A'),
356   EL_CHAR_A + ('Y' - 'A'),
357   EL_CHAR_A + ('N' - 'A'),
358   EL_CHAR_A + ('A' - 'A'),
359
360   EL_CHAR_A + ('B' - 'A'),
361   EL_CHAR_A + ('L' - 'A'),
362   EL_CHAR_A + ('A' - 'A'),
363   EL_CHAR_A + ('S' - 'A'),
364
365   EL_CHAR_MINUS,
366   EL_CHAR_A + ('T' - 'A'),
367   EL_CHAR_A + ('E' - 'A'),
368   EL_CHAR_A + ('R' - 'A'),
369 */
370
371   EL_LEERRAUM,
372   EL_LEERRAUM,
373   EL_LEERRAUM,
374   EL_LEERRAUM,
375
376   EL_CHAR_AUSRUF,
377   EL_CHAR_ZOLL,
378   EL_CHAR_DOLLAR,
379   EL_CHAR_PROZ,
380
381   EL_CHAR_APOSTR,
382   EL_CHAR_KLAMM1,
383   EL_CHAR_KLAMM2,
384   EL_CHAR_PLUS,
385
386   EL_CHAR_KOMMA,
387   EL_CHAR_MINUS,
388   EL_CHAR_PUNKT,
389   EL_CHAR_SLASH,
390
391   EL_CHAR_0 + 0,
392   EL_CHAR_0 + 1,
393   EL_CHAR_0 + 2,
394   EL_CHAR_0 + 3,
395
396   EL_CHAR_0 + 4,
397   EL_CHAR_0 + 5,
398   EL_CHAR_0 + 6,
399   EL_CHAR_0 + 7,
400
401   EL_CHAR_0 + 8,
402   EL_CHAR_0 + 9,
403   EL_CHAR_DOPPEL,
404   EL_CHAR_SEMIKL,
405
406   EL_CHAR_LT,
407   EL_CHAR_GLEICH,
408   EL_CHAR_GT,
409   EL_CHAR_FRAGE,
410
411   EL_CHAR_AT,
412   EL_CHAR_A + 0,
413   EL_CHAR_A + 1,
414   EL_CHAR_A + 2,
415
416   EL_CHAR_A + 3,
417   EL_CHAR_A + 4,
418   EL_CHAR_A + 5,
419   EL_CHAR_A + 6,
420
421   EL_CHAR_A + 7,
422   EL_CHAR_A + 8,
423   EL_CHAR_A + 9,
424   EL_CHAR_A + 10,
425
426   EL_CHAR_A + 11,
427   EL_CHAR_A + 12,
428   EL_CHAR_A + 13,
429   EL_CHAR_A + 14,
430
431   EL_CHAR_A + 15,
432   EL_CHAR_A + 16,
433   EL_CHAR_A + 17,
434   EL_CHAR_A + 18,
435
436   EL_CHAR_A + 19,
437   EL_CHAR_A + 20,
438   EL_CHAR_A + 21,
439   EL_CHAR_A + 22,
440
441   EL_CHAR_A + 23,
442   EL_CHAR_A + 24,
443   EL_CHAR_A + 25,
444   EL_CHAR_AE,
445
446   EL_CHAR_OE,
447   EL_CHAR_UE,
448   EL_CHAR_COPY
449 };
450 int elements_in_list = sizeof(editor_element)/sizeof(int);
451
452 static void ScrollMiniLevel(int from_x, int from_y, int scroll)
453 {
454   int x,y;
455   int dx = (scroll==ED_SCROLL_LEFT ? -1 : scroll==ED_SCROLL_RIGHT ? 1 : 0);
456   int dy = (scroll==ED_SCROLL_UP   ? -1 : scroll==ED_SCROLL_DOWN  ? 1 : 0);
457
458   XCopyArea(display,drawto,drawto,gc,
459             SX+MINI_TILEX*(dx==-1),SY+MINI_TILEY*(dy==-1),
460             SXSIZE-MINI_TILEX*ABS(dx),SYSIZE-MINI_TILEY*ABS(dy),
461             SX+MINI_TILEX*(dx==+1),SY+MINI_TILEY*(dy==+1));
462   if (dx)
463   {
464     x = (dx==1 ? 0 : 2*SCR_FIELDX-1);
465     for(y=0;y<2*SCR_FIELDY;y++)
466       DrawMiniElementOrWall(x,y,from_x,from_y);
467   }
468   else if (dy)
469   {
470     y = (dy==1 ? 0 : 2*SCR_FIELDY-1);
471     for(x=0;x<2*SCR_FIELDX;x++)
472       DrawMiniElementOrWall(x,y,from_x,from_y);
473   }
474
475   redraw_mask |= REDRAW_FIELD;
476   BackToFront();
477 }
478
479 void InitLevelEditorGadgets()
480 {
481   int i;
482
483   for (i=0; i<ED_NUM_GADGETS; i++)
484     level_editor_gadget[i] = NULL;
485 }
486
487 static void CreateControlButtons()
488 {
489   int i;
490
491   for (i=0; i<ED_NUM_CTRL_BUTTONS; i++)
492   {
493     Pixmap gd_pixmap = pix[PIX_DOOR];
494     struct GadgetInfo *gi;
495     int gd_xoffset, gd_yoffset;
496     int gd_x1, gd_x2, gd_y;
497     int width, height;
498     unsigned long event_mask;
499     int id = i;
500
501     if (i < ED_NUM_CTRL1_BUTTONS)
502     {
503       int x = i % ED_CTRL1_BUTTONS_HORIZ;
504       int y = i / ED_CTRL1_BUTTONS_HORIZ;
505
506       gd_xoffset = ED_CTRL1_BUTTONS_XPOS + x * ED_CTRL1_BUTTON_XSIZE;
507       gd_yoffset = ED_CTRL1_BUTTONS_YPOS + y * ED_CTRL1_BUTTON_YSIZE;
508       width = ED_CTRL1_BUTTON_XSIZE;
509       height = ED_CTRL1_BUTTON_YSIZE;
510     }
511     else
512     {
513       int x = (i - ED_NUM_CTRL1_BUTTONS) % ED_CTRL2_BUTTONS_HORIZ;
514       int y = (i - ED_NUM_CTRL1_BUTTONS) / ED_CTRL2_BUTTONS_HORIZ;
515
516       gd_xoffset = ED_CTRL2_BUTTONS_XPOS + x * ED_CTRL2_BUTTON_XSIZE;
517       gd_yoffset = ED_CTRL2_BUTTONS_YPOS + y * ED_CTRL2_BUTTON_YSIZE;
518       width = ED_CTRL2_BUTTON_XSIZE;
519       height = ED_CTRL2_BUTTON_YSIZE;
520     }
521
522     gd_x1 = DOOR_GFX_PAGEX8 + gd_xoffset;
523     gd_x2 = DOOR_GFX_PAGEX7 + gd_xoffset;
524     gd_y  = DOOR_GFX_PAGEY1 + ED_CTRL_BUTTONS_GFX_YPOS + gd_yoffset;
525
526     if (i == ED_CTRL_ID_WRAP_LEFT ||
527         i == ED_CTRL_ID_WRAP_RIGHT ||
528         i == ED_CTRL_ID_WRAP_UP ||
529         i == ED_CTRL_ID_WRAP_DOWN)
530       event_mask = GD_EVENT_PRESSED | GD_EVENT_REPEATED;
531     else
532       event_mask = GD_EVENT_RELEASED;
533
534     gi = CreateGadget(GDI_CUSTOM_ID, id,
535                       GDI_X, EX + gd_xoffset,
536                       GDI_Y, EY + gd_yoffset,
537                       GDI_WIDTH, width,
538                       GDI_HEIGHT, height,
539                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
540                       GDI_STATE, GD_BUTTON_UNPRESSED,
541                       GDI_DESIGN_UNPRESSED, gd_pixmap, gd_x1, gd_y,
542                       GDI_DESIGN_PRESSED, gd_pixmap, gd_x2, gd_y,
543                       GDI_EVENT_MASK, event_mask,
544                       GDI_CALLBACK, HandleControlButtons,
545                       GDI_END);
546
547     if (gi == NULL)
548       Error(ERR_EXIT, "cannot create gadget");
549
550     level_editor_gadget[id] = gi;
551   }
552 }
553
554 static void CreateCounterButtons(int counter_id)
555 {
556   int i;
557
558   for (i=0; i<2; i++)
559   {
560     Pixmap gd_pixmap = pix[PIX_DOOR];
561     struct GadgetInfo *gi;
562     int gd_xoffset;
563     int gd_x1, gd_x2, gd_y;
564     int id = counter_info[counter_id].gadget_id + i;
565     unsigned long event_mask;
566
567     event_mask = GD_EVENT_PRESSED | GD_EVENT_REPEATED;
568
569     gd_xoffset = (i == 0 ? ED_BUTTON_MINUS_XPOS : ED_BUTTON_PLUS_XPOS);
570     gd_x1 = DOOR_GFX_PAGEX4 + gd_xoffset;
571     gd_x2 = DOOR_GFX_PAGEX3 + gd_xoffset;
572     gd_y  = DOOR_GFX_PAGEY1 + ED_BUTTON_COUNT_YPOS;
573
574     gi = CreateGadget(GDI_CUSTOM_ID, id,
575                       GDI_X, SX + counter_info[counter_id].x + gd_xoffset,
576                       GDI_Y, SY + counter_info[counter_id].y,
577                       GDI_WIDTH, ED_BUTTON_COUNT_XSIZE,
578                       GDI_HEIGHT, ED_BUTTON_COUNT_YSIZE,
579                       GDI_TYPE, GD_TYPE_NORMAL_BUTTON,
580                       GDI_STATE, GD_BUTTON_UNPRESSED,
581                       GDI_DESIGN_UNPRESSED, gd_pixmap, gd_x1, gd_y,
582                       GDI_DESIGN_PRESSED, gd_pixmap, gd_x2, gd_y,
583                       GDI_EVENT_MASK, event_mask,
584                       GDI_CALLBACK, HandleCounterButtons,
585                       GDI_END);
586
587     if (gi == NULL)
588       Error(ERR_EXIT, "cannot create gadget");
589
590     level_editor_gadget[id] = gi;
591   }
592 }
593
594 static void CreateDrawingAreas()
595 {
596   struct GadgetInfo *gi;
597   unsigned long event_mask;
598
599   event_mask =
600     GD_EVENT_PRESSED | GD_EVENT_RELEASED | GD_EVENT_MOVING |
601     GD_EVENT_OFF_BORDERS;
602
603   gi = CreateGadget(GDI_CUSTOM_ID, ED_CTRL_ID_DRAWING_LEVEL,
604                     GDI_X, SX,
605                     GDI_Y, SY,
606                     GDI_WIDTH, SXSIZE,
607                     GDI_HEIGHT, SYSIZE,
608                     GDI_TYPE, GD_TYPE_DRAWING_AREA,
609                     GDI_ITEM_SIZE, MINI_TILEX, MINI_TILEY,
610                     GDI_EVENT_MASK, event_mask,
611                     GDI_CALLBACK, HandleDrawingAreas,
612                     GDI_END);
613
614   if (gi == NULL)
615     Error(ERR_EXIT, "cannot create gadget");
616
617   level_editor_gadget[ED_CTRL_ID_DRAWING_LEVEL] = gi;
618 }
619
620 static void CreateLevelEditorGadgets()
621 {
622   if (level_editor_gadgets_created)
623     return;
624
625   CreateControlButtons();
626   CreateCounterButtons(ED_COUNTER_SCORE);
627   CreateDrawingAreas();
628
629   level_editor_gadgets_created = TRUE;
630 }
631
632 static void MapControlButtons()
633 {
634   int i;
635
636   for (i=0; i<ED_NUM_CTRL_BUTTONS; i++)
637     MapGadget(level_editor_gadget[i]);
638 }
639
640 static void MapCounterButtons(int counter_id)
641 {
642   int i;
643
644   for (i=0; i<2; i++)
645     MapGadget(level_editor_gadget[counter_info[counter_id].gadget_id + i]);
646 }
647
648 static void MapMainDrawingArea()
649 {
650   MapGadget(level_editor_gadget[ED_CTRL_ID_DRAWING_LEVEL]);
651 }
652
653 void UnmapLevelEditorWindowGadgets()
654 {
655   int i;
656
657   for (i=ED_NUM_CTRL_BUTTONS; i<ED_NUM_GADGETS; i++)
658     UnmapGadget(level_editor_gadget[i]);
659 }
660
661 void UnmapLevelEditorGadgets()
662 {
663   int i;
664
665   for (i=0; i<ED_NUM_GADGETS; i++)
666     UnmapGadget(level_editor_gadget[i]);
667 }
668
669 void DrawLevelEd()
670 {
671   int i, x, y, graphic;
672
673   level_xpos=-1;
674   level_ypos=-1;
675   edit_mode = ED_MODE_DRAWING;
676   name_typing = FALSE;
677   element_shift = 0;
678
679   CloseDoor(DOOR_CLOSE_ALL);
680
681   if (level_editor_test_game)
682   {
683     for(x=0; x<lev_fieldx; x++)
684       for(y=0; y<lev_fieldy; y++)
685         Feld[x][y] = Ur[x][y];
686
687     for(x=0; x<lev_fieldx; x++)
688       for(y=0; y<lev_fieldy; y++)
689         Ur[x][y] = OrigBackup[x][y];
690
691     level_editor_test_game = FALSE;
692   }
693   else
694   {
695     undo_buffer_position = -1;
696     undo_buffer_steps = -1;
697     CopyLevelToUndoBuffer();
698   }
699
700   DrawMiniLevel(level_xpos,level_ypos);
701   FadeToFront();
702
703   XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
704             DOOR_GFX_PAGEX6,DOOR_GFX_PAGEY1,
705             DXSIZE,DYSIZE,
706             DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY1);
707   XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
708             DOOR_GFX_PAGEX6+ED_BUTTON_ELEM_XPOS,
709             DOOR_GFX_PAGEY1+ED_BUTTON_ELEM_YPOS,
710             4*ED_BUTTON_ELEM_XSIZE,5*ED_BUTTON_ELEM_YSIZE,
711             DOOR_GFX_PAGEX1+ED_BUTTON_ELEM_XPOS,
712             DOOR_GFX_PAGEY1+ED_BUTTON_EUP_Y2POS);
713
714   for(i=0;i<MAX_ELEM_X*MAX_ELEM_Y;i++)
715   {
716     if (i < elements_in_list)
717       graphic = el2gfx(editor_element[i]);
718     else
719       graphic = GFX_LEERRAUM;
720
721     DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
722                        DOOR_GFX_PAGEX1+ED_BUTTON_ELEM_XPOS+3 + 
723                        (i%MAX_ELEM_X)*ED_BUTTON_ELEM_XSIZE,
724                        DOOR_GFX_PAGEY1+ED_BUTTON_ELEM_YPOS+3 +
725                        (i/MAX_ELEM_X)*ED_BUTTON_ELEM_YSIZE,
726                        graphic);
727   }
728
729   DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
730                      DOOR_GFX_PAGEX1+ED_WIN_MB_LEFT_XPOS,
731                      DOOR_GFX_PAGEY1+ED_WIN_MB_LEFT_YPOS,
732                      el2gfx(new_element1));
733   DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
734                      DOOR_GFX_PAGEX1+ED_WIN_MB_MIDDLE_XPOS,
735                      DOOR_GFX_PAGEY1+ED_WIN_MB_MIDDLE_YPOS,
736                      el2gfx(new_element2));
737   DrawMiniGraphicExt(pix[PIX_DB_DOOR],gc,
738                      DOOR_GFX_PAGEX1+ED_WIN_MB_RIGHT_XPOS,
739                      DOOR_GFX_PAGEY1+ED_WIN_MB_RIGHT_YPOS,
740                      el2gfx(new_element3));
741   DrawTextExt(pix[PIX_DB_DOOR],gc,
742               DOOR_GFX_PAGEX2+ED_WIN_LEVELNR_XPOS,
743               DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS,
744               int2str(level_nr,2),FS_SMALL,FC_SPECIAL1);
745   XCopyArea(display,pix[PIX_DB_DOOR],pix[PIX_DB_DOOR],gc,
746             DOOR_GFX_PAGEX2+ED_WIN_LEVELNR_XPOS+3,
747             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS,
748             7,FONT3_YSIZE,
749             DOOR_GFX_PAGEX1+ED_WIN_LEVELNR_XPOS,
750             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS);
751   XCopyArea(display,pix[PIX_DB_DOOR],pix[PIX_DB_DOOR],gc,
752             DOOR_GFX_PAGEX2+ED_WIN_LEVELNR_XPOS+14,
753             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS,
754             7,FONT3_YSIZE,
755             DOOR_GFX_PAGEX1+ED_WIN_LEVELNR_XPOS+9,
756             DOOR_GFX_PAGEY1+ED_WIN_LEVELNR_YPOS);
757
758   XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
759             DOOR_GFX_PAGEX6,DOOR_GFX_PAGEY2,
760             VXSIZE,VYSIZE,
761             DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
762
763   /* draw bigger door */
764   XCopyArea(display, pix[PIX_DOOR], drawto, gc,
765             DOOR_GFX_PAGEX7, 0,
766             108, 64,
767             EX - 4, EY - 12);
768
769   /* draw new control window */
770   XCopyArea(display, pix[PIX_DOOR], drawto, gc,
771             DOOR_GFX_PAGEX8, 236,
772             EXSIZE, EYSIZE,
773             EX, EY);
774
775   redraw_mask |= REDRAW_ALL;
776
777   OpenDoor(DOOR_OPEN_1);
778
779   if (!level_editor_gadgets_created)
780     CreateLevelEditorGadgets();
781
782   MapControlButtons();
783   MapMainDrawingArea();
784
785   /*
786   OpenDoor(DOOR_OPEN_1 | DOOR_OPEN_2);
787   */
788 }
789
790 void DrawControlWindow()
791 {
792   int i,x,y;
793
794   ClearWindow();
795   UnmapLevelEditorWindowGadgets();
796
797   /* Inhalt der Mampfer */
798   DrawText(ED_COUNT_GADGET_XPOS+1,SY+6,
799            "Contents of a smashed cruncher:",FS_SMALL,FC_YELLOW);
800   for(i=0;i<4;i++) for(y=0;y<4;y++) for(x=0;x<4;x++)
801   {
802     DrawMiniElement(1+5*i+x,2+y,EL_ERDREICH);
803     XFillRectangle(display,drawto,gc,
804                    SX+(1+5*i)*MINI_TILEX+MINI_TILEX/2-1,
805                    SY+(2)*MINI_TILEY+MINI_TILEY/2-1,
806                    3*MINI_TILEX+2,3*MINI_TILEY+2);
807   }
808   XCopyArea(display,drawto,drawto,gc,
809             SX+1*MINI_TILEX,SY+2*MINI_TILEY,
810             4*5*MINI_TILEX,5*MINI_TILEY,
811             SX+1*MINI_TILEX-MINI_TILEX/2,SY+2*MINI_TILEY-MINI_TILEY/2);
812   for(i=0;i<4;i++)
813   {
814     for(y=0;y<3;y++) for(x=0;x<3;x++)
815       DrawMiniElement(1+5*i+x,2+y,level.mampfer_inhalt[i][x][y]);
816
817     DrawText(SX+MINI_TILEX+(5*i+1)*MINI_TILEX+1,
818              SY+2*MINI_TILEY+(4)*MINI_TILEY-4,
819              int2str(i+1,1),FS_SMALL,FC_YELLOW);
820   }
821
822   /* Inhalt der Amöbe */
823   for(y=0;y<2;y++) for(x=0;x<2;x++)
824   {
825     DrawMiniElement(29+x,26+y,EL_ERDREICH);
826     XFillRectangle(display,drawto,gc,
827                    SX+29*MINI_TILEX+MINI_TILEX/2-1,
828                    SY+26*MINI_TILEY+MINI_TILEY/2-1,
829                    MINI_TILEX+2,MINI_TILEY+2);
830   }
831   XCopyArea(display,drawto,drawto,gc,
832             SX+29*MINI_TILEX,SY+26*MINI_TILEY,
833             3*MINI_TILEX,3*MINI_TILEY,
834             SX+29*MINI_TILEX-MINI_TILEX/2,SY+26*MINI_TILEY-MINI_TILEY/2);
835   DrawMiniElement(29,26,level.amoebe_inhalt);
836
837   for(i=0;i<11+3+2;i++)
838   {
839     XCopyArea(display,pix[PIX_DOOR],drawto,gc,
840               DOOR_GFX_PAGEX4+ED_BUTTON_MINUS_XPOS,
841               DOOR_GFX_PAGEY1+ED_BUTTON_MINUS_YPOS,
842               DXSIZE-4,ED_BUTTON_MINUS_YSIZE,
843               ED_COUNT_GADGET_XPOS,
844               ED_COUNT_GADGET_YPOS+i*ED_COUNT_GADGET_YSIZE);
845
846     if (i<11)
847       DrawText(ED_COUNT_VALUE_XPOS,
848                ED_COUNT_VALUE_YPOS+i*ED_COUNT_GADGET_YSIZE,
849                int2str(level.score[i],3),FS_SMALL,FC_YELLOW);
850     else if (i==11)
851       DrawText(ED_COUNT_VALUE_XPOS,
852                ED_COUNT_VALUE_YPOS+11*ED_COUNT_GADGET_YSIZE,
853                int2str(level.tempo_amoebe,3),FS_SMALL,FC_YELLOW);
854     else if (i==12)
855       DrawText(ED_COUNT_VALUE_XPOS,
856                ED_COUNT_VALUE_YPOS+12*ED_COUNT_GADGET_YSIZE,
857                int2str(level.dauer_sieb,3),FS_SMALL,FC_YELLOW);
858     else if (i==13)
859       DrawText(ED_COUNT_VALUE_XPOS,
860                ED_COUNT_VALUE_YPOS+13*ED_COUNT_GADGET_YSIZE,
861                int2str(level.dauer_ablenk,3),FS_SMALL,FC_YELLOW);
862     else if (i==14)
863       DrawText(ED_COUNT_VALUE_XPOS,
864                ED_COUNT_VALUE_YPOS+14*ED_COUNT_GADGET_YSIZE,
865                int2str(level.edelsteine,3),FS_SMALL,FC_YELLOW);
866     else if (i==15)
867       DrawText(ED_COUNT_VALUE_XPOS,
868                ED_COUNT_VALUE_YPOS+15*ED_COUNT_GADGET_YSIZE,
869                int2str(level.time,3),FS_SMALL,FC_YELLOW);
870   }
871
872   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+0*ED_COUNT_TEXT_YSIZE,
873            "Score for Emerald",FS_SMALL,FC_YELLOW);
874   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+1*ED_COUNT_TEXT_YSIZE,
875            "Score for Diamond",FS_SMALL,FC_YELLOW);
876   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+2*ED_COUNT_TEXT_YSIZE,
877            "Score for smashing a Bug",FS_SMALL,FC_YELLOW);
878   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+3*ED_COUNT_TEXT_YSIZE,
879            "Score for smashing a Spaceship",FS_SMALL,FC_YELLOW);
880   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+4*ED_COUNT_TEXT_YSIZE,
881            "Score for smashing a Cruncher",FS_SMALL,FC_YELLOW);
882   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+5*ED_COUNT_TEXT_YSIZE,
883            "Score for smashing an Alien",FS_SMALL,FC_YELLOW);
884   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+6*ED_COUNT_TEXT_YSIZE,
885            "Score for smashing a Pacman",FS_SMALL,FC_YELLOW);
886   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+7*ED_COUNT_TEXT_YSIZE,
887            "Score for cracking a nut",FS_SMALL,FC_YELLOW);
888   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+8*ED_COUNT_TEXT_YSIZE,
889            "Score for dynamite",FS_SMALL,FC_YELLOW);
890   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+9*ED_COUNT_TEXT_YSIZE,
891            "Score for key",FS_SMALL,FC_YELLOW);
892   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+10*ED_COUNT_TEXT_YSIZE,
893            "Score for each 10 seconds left",FS_SMALL,FC_YELLOW);
894   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+11*ED_COUNT_TEXT_YSIZE,
895            "Speed of the amoeba / Content",FS_SMALL,FC_YELLOW);
896   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+12*ED_COUNT_TEXT_YSIZE,
897            "Time for magic wall",FS_SMALL,FC_YELLOW);
898   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+13*ED_COUNT_TEXT_YSIZE,
899            "Time for wheel",FS_SMALL,FC_YELLOW);
900   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+14*ED_COUNT_TEXT_YSIZE,
901            "Emeralds needed in this level",FS_SMALL,FC_YELLOW);
902   DrawText(ED_COUNT_TEXT_XPOS,ED_COUNT_TEXT_YPOS+15*ED_COUNT_TEXT_YSIZE,
903            "Time available for this level",FS_SMALL,FC_YELLOW);
904
905   XCopyArea(display,pix[PIX_DOOR],drawto,gc,
906             DOOR_GFX_PAGEX4+ED_WIN_COUNT_XPOS,
907             DOOR_GFX_PAGEY1+ED_WIN_COUNT_YPOS,
908             ED_WIN_COUNT_XSIZE,ED_WIN_COUNT_YSIZE,
909             ED_COUNT_GADGET_XPOS,
910             ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE);
911   for(i=1;i<31;i++)
912     XCopyArea(display,pix[PIX_DOOR],drawto,gc,
913               DOOR_GFX_PAGEX4+ED_WIN_COUNT_XPOS+3+2*FONT2_XSIZE,
914               DOOR_GFX_PAGEY1+ED_WIN_COUNT_YPOS,
915               ED_WIN_COUNT_XSIZE-3-2*FONT2_XSIZE,ED_WIN_COUNT_YSIZE,
916               ED_COUNT_GADGET_XPOS+3+i*FONT2_XSIZE,
917               ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE);
918   DrawText(ED_COUNT_GADGET_XPOS+5,
919            ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
920            level.name,FS_SMALL,FC_YELLOW);
921   DrawText(ED_COUNT_GADGET_XPOS+(30+3)*FONT2_XSIZE-5,
922            ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
923            "Title",FS_SMALL,FC_YELLOW);
924
925   DrawText(ED_SIZE_GADGET_XPOS,ED_SIZE_GADGET_YPOS-18,
926            "Playfield size:",FS_SMALL,FC_YELLOW);
927   XCopyArea(display,pix[PIX_DOOR],drawto,gc,
928             DOOR_GFX_PAGEX4+ED_BUTTON_MINUS_XPOS,
929             DOOR_GFX_PAGEY1+ED_BUTTON_MINUS_YPOS,
930             DXSIZE-4,ED_BUTTON_MINUS_YSIZE,
931             ED_SIZE_GADGET_XPOS,
932             ED_SIZE_GADGET_YPOS+0*ED_COUNT_GADGET_YSIZE);
933   XCopyArea(display,pix[PIX_DOOR],drawto,gc,
934             DOOR_GFX_PAGEX4+ED_BUTTON_MINUS_XPOS,
935             DOOR_GFX_PAGEY1+ED_BUTTON_MINUS_YPOS,
936             DXSIZE-4,ED_BUTTON_MINUS_YSIZE,
937             ED_SIZE_GADGET_XPOS,
938             ED_SIZE_GADGET_YPOS+1*ED_COUNT_GADGET_YSIZE);
939   DrawText(ED_SIZE_TEXT_XPOS,ED_SIZE_TEXT_YPOS+0*ED_SIZE_TEXT_YSIZE,
940            "Width",FS_SMALL,FC_YELLOW);
941   DrawText(ED_SIZE_TEXT_XPOS,ED_SIZE_TEXT_YPOS+1*ED_SIZE_TEXT_YSIZE,
942            "Height",FS_SMALL,FC_YELLOW);
943   DrawText(ED_SIZE_VALUE_XPOS,ED_SIZE_VALUE_YPOS+0*ED_SIZE_GADGET_YSIZE,
944            int2str(level.fieldx,3),FS_SMALL,FC_YELLOW);
945   DrawText(ED_SIZE_VALUE_XPOS,ED_SIZE_VALUE_YPOS+1*ED_SIZE_GADGET_YSIZE,
946            int2str(level.fieldy,3),FS_SMALL,FC_YELLOW);
947 }
948
949 void AdjustLevelScrollPosition()
950 {
951   if (level_xpos < -1)
952     level_xpos = -1;
953   if (level_xpos > lev_fieldx - 2*SCR_FIELDX + 1)
954     level_xpos = lev_fieldx - 2*SCR_FIELDX + 1;
955   if (lev_fieldx < 2*SCR_FIELDX - 2)
956     level_xpos = -1;
957
958   if (level_ypos < -1)
959     level_ypos = -1;
960   if (level_ypos > lev_fieldy - 2*SCR_FIELDY + 1)
961     level_ypos = lev_fieldy - 2*SCR_FIELDY + 1;
962   if (lev_fieldy < 2*SCR_FIELDY - 2)
963     level_ypos = -1;
964 }
965
966 void LevelEd(int mx, int my, int button)
967 {
968   static int last_button = 0;
969   static int in_field_pressed = FALSE;
970   static boolean use_floodfill = FALSE;
971
972
973   /*
974   int x = (mx-SX)/MINI_TILEX; 
975   int y = (my-SY)/MINI_TILEY; 
976   */
977
978   /*
979   HandlePressedControlButtons();
980   HandleDrawingFunctions(mx, my, button);
981   */
982
983   if (use_floodfill)            /********** FLOOD FILL **********/
984   {
985
986
987 #if 0
988
989     if (button)
990     {
991       if (mx>=SX && mx<SX+SXSIZE && my>=SY && my<SY+SYSIZE)
992       {
993         int from_x, from_y;
994         int fill_element;
995
996         if (x>lev_fieldx || y>lev_fieldy ||
997             (x==0 && level_xpos<0) ||
998             (x==2*SCR_FIELDX-1 && level_xpos>lev_fieldx-2*SCR_FIELDX) ||
999             (y==0 && level_ypos<0) ||
1000             (y==2*SCR_FIELDY-1 && level_ypos>lev_fieldy-2*SCR_FIELDY))
1001           return;
1002
1003         from_x = x+level_xpos;
1004         from_y = y+level_ypos;
1005         fill_element = (button==1 ? new_element1 :
1006                         button==2 ? new_element2 :
1007                         button==3 ? new_element3 : 0);
1008
1009         FloodFill(from_x,from_y,fill_element);
1010         DrawMiniLevel(level_xpos,level_ypos);
1011       }
1012
1013       use_floodfill = FALSE;
1014       CloseDoor(DOOR_CLOSE_1);
1015       OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
1016     }
1017     return;
1018
1019 #endif
1020
1021
1022
1023   }
1024   else                          /********** EDIT/CTRL-FENSTER **********/
1025   {
1026     static unsigned long choice_delay = 0;
1027     int choice = CheckElemButtons(mx,my,button);
1028     int elem_pos = choice-ED_BUTTON_ELEM;
1029
1030     if (((choice == ED_BUTTON_EUP && element_shift>0) ||
1031          (choice == ED_BUTTON_EDOWN &&
1032           element_shift<elements_in_list-MAX_ELEM_X*MAX_ELEM_Y)) &&
1033         DelayReached(&choice_delay, GADGET_FRAME_DELAY))
1034     {
1035       int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
1036       int i;
1037
1038 #if 0
1039       step = (button==1 ? MAX_ELEM_X : button==2 ? 5*MAX_ELEM_X :
1040               elements_in_list);
1041       element_shift += (choice==ED_BUTTON_EUP ? -step : step);
1042 #else
1043       step = step * MAX_ELEM_X * (choice == ED_BUTTON_EUP ? -1 : +1);
1044       element_shift += step;
1045 #endif
1046
1047       if (element_shift<0)
1048         element_shift = 0;
1049       if (element_shift>elements_in_list-MAX_ELEM_X*MAX_ELEM_Y)
1050         element_shift = elements_in_list-MAX_ELEM_X*MAX_ELEM_Y;
1051       if (element_shift % MAX_ELEM_X)
1052         element_shift += MAX_ELEM_X-(element_shift % MAX_ELEM_X);
1053
1054       for(i=0;i<MAX_ELEM_X*MAX_ELEM_Y;i++)
1055         DrawElemButton(i+2,ED_BUTTON_RELEASED);
1056     }
1057     else if (elem_pos>=0 && elem_pos<MAX_ELEM_X*MAX_ELEM_Y)
1058     {
1059       int new_element;
1060
1061       if (elem_pos+element_shift < elements_in_list)
1062         new_element = editor_element[elem_pos+element_shift];
1063       else
1064         new_element = EL_LEERRAUM;
1065
1066       if (last_button==1)
1067         new_element1 = new_element;
1068       else if (last_button==2)
1069         new_element2 = new_element;
1070       else if (last_button==3)
1071         new_element3 = new_element;
1072
1073       DrawMiniGraphicExt(drawto,gc,
1074                          DX+ED_WIN_MB_LEFT_XPOS,
1075                          DY+ED_WIN_MB_LEFT_YPOS,
1076                          el2gfx(new_element1));
1077       DrawMiniGraphicExt(drawto,gc,
1078                          DX+ED_WIN_MB_MIDDLE_XPOS,
1079                          DY+ED_WIN_MB_MIDDLE_YPOS,
1080                          el2gfx(new_element2));
1081       DrawMiniGraphicExt(drawto,gc,
1082                          DX+ED_WIN_MB_RIGHT_XPOS,
1083                          DY+ED_WIN_MB_RIGHT_YPOS,
1084                          el2gfx(new_element3));
1085       redraw_mask |= REDRAW_DOOR_1;
1086
1087       if (edit_mode == ED_MODE_PROPERTIES)
1088         DrawPropertiesWindow(new_element);
1089     }
1090   
1091     if (edit_mode == ED_MODE_DRAWING)   /********** EDIT-FENSTER **********/
1092     {
1093
1094
1095
1096 #if 0
1097
1098       switch(CheckEditButtons(mx,my,button))
1099       {
1100         case ED_BUTTON_CTRL:
1101           CloseDoor(DOOR_CLOSE_2);
1102           DrawControlWindow();
1103           XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
1104                     DOOR_GFX_PAGEX4,DOOR_GFX_PAGEY1+80,
1105                     VXSIZE,VYSIZE,
1106                     DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
1107           OpenDoor(DOOR_OPEN_2);
1108           edit_mode = ED_MODE_INFO;
1109           break;
1110         case ED_BUTTON_FILL:
1111           Request("Caution ! Flood fill mode ! Choose area !",REQ_OPEN);
1112           use_floodfill = TRUE;
1113           return;
1114           break;
1115         case ED_BUTTON_LEFT:
1116           if (level_xpos>=0)
1117           {
1118             if (!DelayReached(&choice_delay, GADGET_FRAME_DELAY))
1119               break;
1120             if (lev_fieldx<2*SCR_FIELDX-2)
1121               break;
1122
1123             level_xpos -= (button==1 ? 1 : button==2 ? 5 : lev_fieldx);
1124             if (level_xpos<-1)
1125               level_xpos = -1;
1126             if (button==1)
1127               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_RIGHT);
1128             else
1129               DrawMiniLevel(level_xpos,level_ypos);
1130           }
1131           break;
1132         case ED_BUTTON_RIGHT:
1133           if (level_xpos<=lev_fieldx-2*SCR_FIELDX)
1134           {
1135             if (!DelayReached(&choice_delay, GADGET_FRAME_DELAY))
1136               break;
1137             if (lev_fieldx<2*SCR_FIELDX-2)
1138               break;
1139
1140             level_xpos += (button==1 ? 1 : button==2 ? 5 : lev_fieldx);
1141             if (level_xpos>lev_fieldx-2*SCR_FIELDX+1)
1142               level_xpos = lev_fieldx-2*SCR_FIELDX+1;
1143             if (button==1)
1144               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_LEFT);
1145             else
1146               DrawMiniLevel(level_xpos,level_ypos);
1147           }
1148           break;
1149         case ED_BUTTON_UP:
1150           if (level_ypos>=0)
1151           {
1152             if (!DelayReached(&choice_delay, GADGET_FRAME_DELAY))
1153               break;
1154             if (lev_fieldy<2*SCR_FIELDY-2)
1155               break;
1156
1157             level_ypos -= (button==1 ? 1 : button==2 ? 5 : lev_fieldy);
1158             if (level_ypos<-1)
1159               level_ypos = -1;
1160             if (button==1)
1161               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_DOWN);
1162             else
1163               DrawMiniLevel(level_xpos,level_ypos);
1164           }
1165           break;
1166         case ED_BUTTON_DOWN:
1167           if (level_ypos<=lev_fieldy-2*SCR_FIELDY)
1168           {
1169             if (!DelayReached(&choice_delay, GADGET_FRAME_DELAY))
1170               break;
1171             if (lev_fieldy<2*SCR_FIELDY-2)
1172               break;
1173
1174             level_ypos += (button==1 ? 1 : button==2 ? 5 : lev_fieldy);
1175             if (level_ypos>lev_fieldy-2*SCR_FIELDY+1)
1176               level_ypos = lev_fieldy-2*SCR_FIELDY+1;
1177             if (button==1)
1178               ScrollMiniLevel(level_xpos,level_ypos,ED_SCROLL_UP);
1179             else
1180               DrawMiniLevel(level_xpos,level_ypos);
1181           }
1182           break;
1183         default:
1184           break;
1185       }
1186
1187 #endif
1188
1189
1190
1191 #if 0
1192
1193       if (mx>=SX && mx<SX+SXSIZE && my>=SY && my<SY+SYSIZE)
1194       {
1195         int new_element;
1196
1197         if (button && !motion_status)
1198           in_field_pressed = TRUE;
1199
1200         if (!button || !in_field_pressed || button<1 || button>3 ||
1201             (y==0 && level_ypos<0) ||
1202             (y==2*SCR_FIELDY-1 && level_ypos>lev_fieldy-2*SCR_FIELDY) ||
1203             (x==0 && level_xpos<0) ||
1204             (x==2*SCR_FIELDX-1 && level_xpos>lev_fieldx-2*SCR_FIELDX) ||
1205             x>lev_fieldx || y>lev_fieldy)
1206           return;
1207
1208         new_element = (button==1 ? new_element1 :
1209                        button==2 ? new_element2 :
1210                        button==3 ? new_element3 : 0);
1211
1212         if (new_element != Feld[x+level_xpos][y+level_ypos])
1213         {
1214           if (new_element==EL_SPIELFIGUR) /* Jeder nur EINE Figur bitte... */
1215           {
1216             int x,y;
1217
1218             for(x=0;x<lev_fieldx;x++) for(y=0;y<lev_fieldy;y++)
1219             {
1220               if (Feld[x][y]==EL_SPIELFIGUR || Feld[x][y]==EL_SPIELER1)
1221               {
1222                 Feld[x][y] = EL_LEERRAUM;
1223                 if (x-level_xpos>=0 && x-level_xpos<2*SCR_FIELDX &&
1224                     y-level_ypos>=0 && y-level_ypos<2*SCR_FIELDY)
1225                   DrawMiniElement(x-level_xpos,y-level_ypos,EL_LEERRAUM);
1226               }
1227             }
1228           }
1229
1230           Feld[x+level_xpos][y+level_ypos] = new_element;
1231           DrawMiniElement(x,y,new_element);
1232         }
1233       }
1234       else if (!motion_status)  /* Mauszeiger nicht im Level-Feld */
1235         in_field_pressed = FALSE;
1236
1237 #endif
1238
1239
1240
1241     }
1242     else if (edit_mode == ED_MODE_INFO)/********** KONTROLL-FENSTER **********/
1243     {
1244       int choice = CheckCountButtons(mx,my,button);
1245       int step = (button==1 ? 1 : button==2 ? 5 : button==3 ? 10 : 0);
1246
1247       if (choice >= 0 && choice < 36 &&
1248           DelayReached(&choice_delay, GADGET_FRAME_DELAY))
1249       {
1250         if (!(choice % 2))
1251           step = -step;
1252
1253         choice /= 2;
1254
1255         if (choice<11)
1256         {
1257           level.score[choice] += step;
1258           if (level.score[choice]<0)
1259             level.score[choice] = 0;
1260           else if (level.score[choice]>255)
1261             level.score[choice] = 255;
1262         }
1263         else if (choice==11)
1264         {
1265           level.tempo_amoebe += step;
1266           if (level.tempo_amoebe<0)
1267             level.tempo_amoebe = 0;
1268           else if (level.tempo_amoebe>255)
1269             level.tempo_amoebe = 255;
1270         }
1271         else if (choice==12)
1272         {
1273           level.dauer_sieb += step;
1274           if (level.dauer_sieb<0)
1275             level.dauer_sieb = 0;
1276           else if (level.dauer_sieb>255)
1277             level.dauer_sieb = 255;
1278         }
1279         else if (choice==13)
1280         {
1281           level.dauer_ablenk += step;
1282           if (level.dauer_ablenk<0)
1283             level.dauer_ablenk = 0;
1284           else if (level.dauer_ablenk>255)
1285             level.dauer_ablenk = 255;
1286         }
1287         else if (choice==14)
1288         {
1289           level.edelsteine += step;
1290           if (level.edelsteine<0)
1291             level.edelsteine = 0;
1292           else if (level.edelsteine>999)
1293             level.edelsteine = 999;
1294         }
1295         else if (choice==15)
1296         {
1297           level.time += step;
1298           if (level.time<0)
1299             level.time = 0;
1300           else if (level.time>999)
1301             level.time = 999;
1302         }
1303         else if (choice==16)
1304         {
1305           lev_fieldx += step;
1306           if (lev_fieldx<MIN_LEV_FIELDX)
1307             lev_fieldx = MIN_LEV_FIELDX;
1308           else if (lev_fieldx>MAX_LEV_FIELDX)
1309             lev_fieldx = MAX_LEV_FIELDX;
1310           level.fieldx = lev_fieldx;
1311         }
1312         else if (choice==17)
1313         {
1314           lev_fieldy += step;
1315           if (lev_fieldy<MIN_LEV_FIELDY)
1316             lev_fieldy = MIN_LEV_FIELDY;
1317           else if (lev_fieldy>MAX_LEV_FIELDY)
1318             lev_fieldy = MAX_LEV_FIELDY;
1319           level.fieldy = lev_fieldy;
1320         }
1321
1322         if (choice<11)
1323           DrawText(ED_COUNT_VALUE_XPOS,
1324                    ED_COUNT_VALUE_YPOS+choice*ED_COUNT_GADGET_YSIZE,
1325                    int2str(level.score[choice],3),FS_SMALL,FC_YELLOW);
1326         else if (choice==11)
1327           DrawText(ED_COUNT_VALUE_XPOS,
1328                    ED_COUNT_VALUE_YPOS+11*ED_COUNT_GADGET_YSIZE,
1329                    int2str(level.tempo_amoebe,3),FS_SMALL,FC_YELLOW);
1330         else if (choice==12)
1331           DrawText(ED_COUNT_VALUE_XPOS,
1332                    ED_COUNT_VALUE_YPOS+12*ED_COUNT_GADGET_YSIZE,
1333                    int2str(level.dauer_sieb,3),FS_SMALL,FC_YELLOW);
1334         else if (choice==13)
1335           DrawText(ED_COUNT_VALUE_XPOS,
1336                    ED_COUNT_VALUE_YPOS+13*ED_COUNT_GADGET_YSIZE,
1337                    int2str(level.dauer_ablenk,3),FS_SMALL,FC_YELLOW);
1338         else if (choice==14)
1339           DrawText(ED_COUNT_VALUE_XPOS,
1340                    ED_COUNT_VALUE_YPOS+14*ED_COUNT_GADGET_YSIZE,
1341                    int2str(level.edelsteine,3),FS_SMALL,FC_YELLOW);
1342         else if (choice==15)
1343           DrawText(ED_COUNT_VALUE_XPOS,
1344                    ED_COUNT_VALUE_YPOS+15*ED_COUNT_GADGET_YSIZE,
1345                    int2str(level.time,3),FS_SMALL,FC_YELLOW);
1346         else if (choice==16)
1347           DrawText(ED_SIZE_VALUE_XPOS,
1348                    ED_SIZE_VALUE_YPOS+0*ED_SIZE_GADGET_YSIZE,
1349                    int2str(level.fieldx,3),FS_SMALL,FC_YELLOW);
1350         else if (choice==17)
1351           DrawText(ED_SIZE_VALUE_XPOS,
1352                    ED_SIZE_VALUE_YPOS+1*ED_SIZE_GADGET_YSIZE,
1353                    int2str(level.fieldy,3),FS_SMALL,FC_YELLOW);
1354
1355         redraw_mask &= ~REDRAW_FIELD;
1356         if (choice<16)
1357           XCopyArea(display,drawto,window,gc,
1358                     ED_COUNT_VALUE_XPOS,
1359                     ED_COUNT_VALUE_YPOS+choice*ED_COUNT_GADGET_YSIZE,
1360                     3*FONT2_XSIZE,FONT2_YSIZE,
1361                     ED_COUNT_VALUE_XPOS,
1362                     ED_COUNT_VALUE_YPOS+choice*ED_COUNT_GADGET_YSIZE);
1363         else
1364           XCopyArea(display,drawto,window,gc,
1365                     ED_SIZE_VALUE_XPOS,
1366                     ED_SIZE_VALUE_YPOS+(choice-16)*ED_SIZE_GADGET_YSIZE,
1367                     3*FONT2_XSIZE,FONT2_YSIZE,
1368                     ED_SIZE_VALUE_XPOS,
1369                     ED_SIZE_VALUE_YPOS+(choice-16)*ED_SIZE_GADGET_YSIZE);
1370         XFlush(display);
1371       }
1372
1373
1374
1375 #if 0
1376
1377       switch(CheckCtrlButtons(mx,my,button))
1378       {
1379         case ED_BUTTON_EDIT:
1380           CloseDoor(DOOR_CLOSE_2);
1381           AdjustLevelScrollPosition();
1382           DrawMiniLevel(level_xpos,level_ypos);
1383           XCopyArea(display,pix[PIX_DOOR],pix[PIX_DB_DOOR],gc,
1384                     DOOR_GFX_PAGEX6,DOOR_GFX_PAGEY2,
1385                     VXSIZE,VYSIZE,
1386                     DOOR_GFX_PAGEX1,DOOR_GFX_PAGEY2);
1387           OpenDoor(DOOR_OPEN_2);
1388           edit_mode = ED_MODE_DRAWING;
1389           break;
1390         case ED_BUTTON_CLEAR:
1391           if (Request("Are you sure to clear this level ?",REQ_ASK))
1392           {
1393             for(x=0;x<MAX_LEV_FIELDX;x++) 
1394               for(y=0;y<MAX_LEV_FIELDY;y++) 
1395                 Feld[x][y] = EL_ERDREICH;
1396             DrawMiniLevel(level_xpos,level_ypos);
1397           }
1398           break;
1399         case ED_BUTTON_UNDO:
1400           if (leveldir[leveldir_nr].readonly ||
1401               Request("Exit without saving ?",REQ_ASK | REQ_STAY_OPEN))
1402           {
1403             CloseDoor(DOOR_CLOSE_ALL);
1404             game_status=MAINMENU;
1405             DrawMainMenu();
1406           }
1407           else
1408           {
1409             CloseDoor(DOOR_CLOSE_1);
1410             OpenDoor(DOOR_OPEN_1 | DOOR_COPY_BACK);
1411           }
1412           break;
1413         case ED_BUTTON_EXIT:
1414           {
1415             int figur_vorhanden = FALSE;
1416
1417             if (leveldir[leveldir_nr].readonly)
1418             {
1419               Request("This level is read only !",REQ_CONFIRM);
1420               break;
1421             }
1422
1423             for(y=0;y<lev_fieldy;y++) 
1424               for(x=0;x<lev_fieldx;x++)
1425                 if (Feld[x][y]==EL_SPIELFIGUR || Feld[x][y]==EL_SPIELER1) 
1426                   figur_vorhanden = TRUE;
1427
1428             if (!figur_vorhanden)
1429               Request("No Level without Gregor Mc Duffin please !",
1430                          REQ_CONFIRM);
1431             else
1432             {
1433               if (Request("Save this level and kill the old ?",
1434                              REQ_ASK | REQ_STAY_OPEN))
1435               {
1436                 for(x=0;x<lev_fieldx;x++)
1437                   for(y=0;y<lev_fieldy;y++) 
1438                     Ur[x][y]=Feld[x][y];
1439                 SaveLevel(level_nr);
1440               }
1441               CloseDoor(DOOR_CLOSE_ALL);
1442               game_status=MAINMENU;
1443               DrawMainMenu();
1444             }
1445           }
1446           break;
1447         default:
1448           break;
1449       }
1450
1451 #endif
1452
1453
1454
1455       if (mx>=ED_COUNT_GADGET_XPOS &&
1456           mx<ED_COUNT_GADGET_XPOS+31*FONT2_XSIZE+10 &&
1457           my>=ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE &&
1458           my<ED_COUNT_GADGET_YPOS+16*ED_COUNT_GADGET_YSIZE+ED_WIN_COUNT_YSIZE)
1459       {
1460         if (!name_typing)
1461         {
1462           name_typing = TRUE;
1463           DrawText(ED_COUNT_GADGET_XPOS+5,
1464                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1465                    level.name,FS_SMALL,FC_GREEN);
1466           DrawText(ED_COUNT_GADGET_XPOS+5+strlen(level.name)*FONT2_XSIZE,
1467                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1468                    "<",FS_SMALL,FC_RED);
1469         }
1470       }
1471       else
1472       {
1473         if (name_typing)
1474         {
1475           name_typing = FALSE;
1476           DrawText(ED_COUNT_GADGET_XPOS+5,
1477                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1478                    level.name,FS_SMALL,FC_YELLOW);
1479           DrawText(ED_COUNT_GADGET_XPOS+5+strlen(level.name)*FONT2_XSIZE,
1480                    ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1481                    " ",FS_SMALL,FC_RED);
1482         }
1483       }
1484
1485       if (mx>=SX+29*MINI_TILEX && mx<SX+30*MINI_TILEX &&
1486           my>=SY+26*MINI_TILEY && my<SY+27*MINI_TILEY)
1487       {
1488         int new_element;
1489
1490         if (!button || button<1 || button>3)
1491           return;
1492
1493         new_element = (button==1 ? new_element1 :
1494                        button==2 ? new_element2 :
1495                        button==3 ? new_element3 : 0);
1496
1497         if (new_element != level.amoebe_inhalt)
1498         {
1499           level.amoebe_inhalt = new_element;
1500           DrawMiniElement(29,26,new_element);
1501         }
1502       }
1503
1504       if (mx>=SX+1*MINI_TILEX && mx<SX+(1+4*5)*MINI_TILEX &&
1505           my>=SY+2*MINI_TILEY && my<SY+(2+3)*MINI_TILEY)
1506       {
1507         int x = (mx-SX-1*MINI_TILEX)/MINI_TILEX;
1508         int y = (my-SY-2*MINI_TILEY)/MINI_TILEY;
1509         int i = x/5;
1510         int new_element;
1511
1512         x = x-i*5;
1513         if (i>=0 && i<43 && x>=0 && x<3 && y>=0 && y<3)
1514         {
1515           if (button && !motion_status)
1516             in_field_pressed = TRUE;
1517
1518           if (!button || !in_field_pressed || button<1 || button>3)
1519             return;
1520
1521           new_element = (button==1 ? new_element1 :
1522                          button==2 ? new_element2 :
1523                          button==3 ? new_element3 : 0);
1524
1525           if (new_element != level.mampfer_inhalt[i][x][y])
1526           {
1527             level.mampfer_inhalt[i][x][y] = new_element;
1528             DrawMiniElement(1+5*i+x,2+y,new_element);
1529           }
1530         }
1531         else if (!motion_status)/* Mauszeiger nicht im Cruncher-Feld */
1532           in_field_pressed = FALSE;
1533       }
1534       else if (!motion_status)  /* Mauszeiger nicht im Cruncher-Feld */
1535         in_field_pressed = FALSE;
1536     }
1537   }
1538
1539   last_button = button;
1540
1541   BackToFront();
1542 }
1543
1544 void LevelNameTyping(KeySym key)
1545 {
1546   unsigned char ascii = 0;
1547   int len = strlen(level.name);
1548
1549   if (!name_typing)
1550     return;
1551
1552   if (key>=XK_A && key<=XK_Z)
1553     ascii = 'A'+(char)(key-XK_A);
1554   else if (key>=XK_a && key<=XK_z)
1555     ascii = 'a'+(char)(key-XK_a);
1556   else if (key>=XK_0 && key<=XK_9)
1557     ascii = '0'+(char)(key-XK_0);
1558 #ifdef XK_LATIN1
1559   else if (key>=XK_space && key<=XK_at)
1560     ascii = ' '+(char)(key-XK_space);
1561   else if (key==XK_Adiaeresis)
1562     ascii = 'Ä';
1563   else if (key==XK_Odiaeresis)
1564     ascii = 'Ö';
1565   else if (key==XK_Udiaeresis)
1566     ascii = 'Ü';
1567   else if (key==XK_adiaeresis)
1568     ascii = 'ä';
1569   else if (key==XK_odiaeresis)
1570     ascii = 'ö';
1571   else if (key==XK_udiaeresis)
1572     ascii = 'ü';
1573   else if (key==XK_underscore)
1574     ascii = '_';
1575 #endif
1576
1577   if (ascii && len<MAX_LEVNAMLEN-2)
1578   {
1579     level.name[len] = ascii;
1580     level.name[len+1] = 0;
1581     len++;
1582
1583     DrawTextExt(drawto,gc,
1584                 ED_COUNT_GADGET_XPOS+5,
1585                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1586                 level.name,FS_SMALL,FC_GREEN);
1587     DrawTextExt(window,gc,
1588                 ED_COUNT_GADGET_XPOS+5,
1589                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1590                 level.name,FS_SMALL,FC_GREEN);
1591     DrawTextExt(drawto,gc,
1592                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1593                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1594                 "<",FS_SMALL,FC_RED);
1595     DrawTextExt(window,gc,
1596                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1597                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1598                 "<",FS_SMALL,FC_RED);
1599   }
1600   else if ((key==XK_Delete || key==XK_BackSpace) && len>0)
1601   {
1602     level.name[len-1] = 0;
1603     len--;
1604
1605     DrawTextExt(drawto,gc,
1606                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1607                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1608                 "< ",FS_SMALL,FC_GREEN);
1609     DrawTextExt(window,gc,
1610                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1611                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1612                 "< ",FS_SMALL,FC_GREEN);
1613   }
1614   else if (key==XK_Return)
1615   {
1616     DrawTextExt(drawto,gc,
1617                 ED_COUNT_GADGET_XPOS+5,
1618                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1619                 level.name,FS_SMALL,FC_YELLOW);
1620     DrawTextExt(window,gc,
1621                 ED_COUNT_GADGET_XPOS+5,
1622                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1623                 level.name,FS_SMALL,FC_YELLOW);
1624     DrawTextExt(drawto,gc,
1625                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1626                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1627                 " ",FS_SMALL,FC_YELLOW);
1628     DrawTextExt(window,gc,
1629                 ED_COUNT_GADGET_XPOS+5+len*FONT2_XSIZE,
1630                 ED_COUNT_TEXT_YPOS+16*ED_COUNT_TEXT_YSIZE,
1631                 " ",FS_SMALL,FC_YELLOW);
1632
1633     name_typing = FALSE;
1634   }
1635 }
1636
1637 static void DrawCounterValueField(int counter_id, int value)
1638 {
1639   int x = SX + counter_info[counter_id].x + ED_WIN_COUNT_XPOS;
1640   int y = SY + counter_info[counter_id].y;
1641
1642   XCopyArea(display, pix[PIX_DOOR], drawto, gc,
1643             DOOR_GFX_PAGEX4 + ED_WIN_COUNT_XPOS,
1644             DOOR_GFX_PAGEY1 + ED_WIN_COUNT_YPOS,
1645             ED_WIN_COUNT_XSIZE, ED_WIN_COUNT_YSIZE,
1646             x, y);
1647
1648   DrawText(x + ED_COUNT_VALUE_XOFFSET, y + ED_COUNT_VALUE_YOFFSET,
1649            int2str(value, 3), FS_SMALL, FC_YELLOW);
1650 }
1651
1652 #define TEXT_COLLECTING         "Score for collecting"
1653 #define TEXT_SMASHING           "Score for smashing"
1654 #define TEXT_CRACKING           "Score for cracking"
1655 #define TEXT_SPEED              "Speed of growth"
1656 #define TEXT_DURATION           "Duration when activated"
1657
1658 static void DrawDrawingWindow()
1659 {
1660   ClearWindow();
1661   UnmapLevelEditorWindowGadgets();
1662   MapMainDrawingArea();
1663   AdjustLevelScrollPosition();
1664   DrawMiniLevel(level_xpos, level_ypos);
1665 }
1666
1667 static void DrawPropertiesWindow(int element)
1668 {
1669   int i, x, y;
1670   int num_elements_in_level;
1671   static struct
1672   {
1673     int element;
1674     int *counter_value;
1675     char *text;
1676   } elements_with_counter[] =
1677   {
1678     { EL_EDELSTEIN,     &level.score[0],        TEXT_COLLECTING },
1679     { EL_EDELSTEIN_BD,  &level.score[0],        TEXT_COLLECTING },
1680     { EL_EDELSTEIN_GELB,&level.score[0],        TEXT_COLLECTING },
1681     { EL_EDELSTEIN_ROT, &level.score[0],        TEXT_COLLECTING },
1682     { EL_EDELSTEIN_LILA,&level.score[0],        TEXT_COLLECTING },
1683     { EL_DIAMANT,       &level.score[1],        TEXT_COLLECTING },
1684     { EL_KAEFER_R,      &level.score[2],        TEXT_SMASHING },
1685     { EL_KAEFER_O,      &level.score[2],        TEXT_SMASHING },
1686     { EL_KAEFER_L,      &level.score[2],        TEXT_SMASHING },
1687     { EL_KAEFER_U,      &level.score[2],        TEXT_SMASHING },
1688     { EL_BUTTERFLY_R,   &level.score[2],        TEXT_SMASHING },
1689     { EL_BUTTERFLY_O,   &level.score[2],        TEXT_SMASHING },
1690     { EL_BUTTERFLY_L,   &level.score[2],        TEXT_SMASHING },
1691     { EL_BUTTERFLY_U,   &level.score[2],        TEXT_SMASHING },
1692     { EL_FLIEGER_R,     &level.score[3],        TEXT_SMASHING },
1693     { EL_FLIEGER_O,     &level.score[3],        TEXT_SMASHING },
1694     { EL_FLIEGER_L,     &level.score[3],        TEXT_SMASHING },
1695     { EL_FLIEGER_U,     &level.score[3],        TEXT_SMASHING },
1696     { EL_FIREFLY_R,     &level.score[3],        TEXT_SMASHING },
1697     { EL_FIREFLY_O,     &level.score[3],        TEXT_SMASHING },
1698     { EL_FIREFLY_L,     &level.score[3],        TEXT_SMASHING },
1699     { EL_FIREFLY_U,     &level.score[3],        TEXT_SMASHING },
1700     { EL_MAMPFER,       &level.score[4],        TEXT_SMASHING },
1701     { EL_MAMPFER2,      &level.score[4],        TEXT_SMASHING },
1702     { EL_ROBOT,         &level.score[5],        TEXT_SMASHING },
1703     { EL_PACMAN_R,      &level.score[6],        TEXT_SMASHING },
1704     { EL_PACMAN_O,      &level.score[6],        TEXT_SMASHING },
1705     { EL_PACMAN_L,      &level.score[6],        TEXT_SMASHING },
1706     { EL_PACMAN_U,      &level.score[6],        TEXT_SMASHING },
1707     { EL_KOKOSNUSS,     &level.score[7],        TEXT_CRACKING },
1708     { EL_DYNAMIT_AUS,   &level.score[8],        TEXT_COLLECTING },
1709     { EL_SCHLUESSEL1,   &level.score[9],        TEXT_COLLECTING },
1710     { EL_SCHLUESSEL2,   &level.score[9],        TEXT_COLLECTING },
1711     { EL_SCHLUESSEL3,   &level.score[9],        TEXT_COLLECTING },
1712     { EL_SCHLUESSEL4,   &level.score[9],        TEXT_COLLECTING },
1713     { EL_AMOEBE_NASS,   &level.tempo_amoebe,    TEXT_SPEED },
1714     { EL_AMOEBE_NORM,   &level.tempo_amoebe,    TEXT_SPEED },
1715     { EL_AMOEBE_VOLL,   &level.tempo_amoebe,    TEXT_SPEED },
1716     { EL_AMOEBE_BD,     &level.tempo_amoebe,    TEXT_SPEED },
1717     { EL_SIEB_LEER,     &level.dauer_sieb,      TEXT_DURATION },
1718     { EL_ABLENK_AUS,    &level.dauer_ablenk,    TEXT_DURATION },
1719     { -1, NULL, NULL }
1720   };
1721
1722   ClearWindow();
1723   UnmapLevelEditorWindowGadgets();
1724
1725   DrawGraphic(1, 1, el2gfx(element));
1726   DrawText(SX + 3*TILEX, SY + 5*TILEY/4, "Element Properties",
1727            FS_SMALL, FC_YELLOW);
1728
1729   num_elements_in_level = 0;
1730   for(y=0; y<lev_fieldy; y++) 
1731     for(x=0; x<lev_fieldx; x++)
1732       if (Feld[x][y] == element)
1733         num_elements_in_level++;
1734
1735   DrawTextF(TILEX, 5*TILEY, FC_YELLOW, "%d x contained in level",
1736             num_elements_in_level);
1737
1738   for (i=0; elements_with_counter[i].element != -1; i++)
1739   {
1740     if (elements_with_counter[i].element == element)
1741     {
1742       int x = SX + counter_info[ED_COUNTER_SCORE].x + DXSIZE;
1743       int y = SY + counter_info[ED_COUNTER_SCORE].y;
1744
1745       gadget_score_value = elements_with_counter[i].counter_value;
1746       DrawCounterValueField(ED_COUNTER_SCORE, *gadget_score_value);
1747       DrawText(x + ED_COUNT_VALUE_XOFFSET, y + ED_COUNT_VALUE_YOFFSET,
1748                elements_with_counter[i].text, FS_SMALL, FC_YELLOW);
1749       MapCounterButtons(ED_COUNTER_SCORE);
1750       break;
1751     }
1752   }
1753 }
1754
1755 static void swap_numbers(int *i1, int *i2)
1756 {
1757   int help = *i1;
1758
1759   *i1 = *i2;
1760   *i2 = help;
1761 }
1762
1763 static void swap_number_pairs(int *x1, int *y1, int *x2, int *y2)
1764 {
1765   int help_x = *x1;
1766   int help_y = *y1;
1767
1768   *x1 = *x2;
1769   *x2 = help_x;
1770
1771   *y1 = *y2;
1772   *y2 = help_y;
1773 }
1774
1775 static void DrawLineElement(int sx, int sy, int element, boolean change_level)
1776 {
1777   int lx = sx + level_xpos;
1778   int ly = sy + level_ypos;
1779
1780   DrawMiniElement(sx, sy, (element < 0 ? Feld[lx][ly] : element));
1781
1782   if (change_level)
1783     Feld[lx][ly] = element;
1784 }
1785
1786 static void DrawLine(int from_x, int from_y, int to_x, int to_y,
1787                      int element, boolean change_level)
1788 {
1789   if (from_y == to_y)                   /* horizontal line */
1790   {
1791     int x;
1792     int y = from_y;
1793
1794     if (from_x > to_x)
1795       swap_numbers(&from_x, &to_x);
1796
1797     for (x=from_x; x<=to_x; x++)
1798       DrawLineElement(x, y, element, change_level);
1799   }
1800   else if (from_x == to_x)              /* vertical line */
1801   {
1802     int x = from_x;
1803     int y;
1804
1805     if (from_y > to_y)
1806       swap_numbers(&from_y, &to_y);
1807
1808     for (y=from_y; y<=to_y; y++)
1809       DrawLineElement(x, y, element, change_level);
1810   }
1811   else                                  /* diagonal line */
1812   {
1813     int len_x = ABS(to_x - from_x);
1814     int len_y = ABS(to_y - from_y);
1815     int x, y;
1816
1817     if (len_y < len_x)                  /* a < 1 */
1818     {
1819       float a = (float)len_y / (float)len_x;
1820
1821       if (from_x > to_x)
1822         swap_number_pairs(&from_x, &from_y, &to_x, &to_y);
1823
1824       for (x=0; x<=len_x; x++)
1825       {
1826         int y = (int)(a * x + 0.5) * (to_y < from_y ? -1 : +1);
1827
1828         DrawLineElement(from_x + x, from_y + y, element, change_level);
1829       }
1830     }
1831     else                                /* a >= 1 */
1832     {
1833       float a = (float)len_x / (float)len_y;
1834
1835       if (from_y > to_y)
1836         swap_number_pairs(&from_x, &from_y, &to_x, &to_y);
1837
1838       for (y=0; y<=len_y; y++)
1839       {
1840         int x = (int)(a * y + 0.5) * (to_x < from_x ? -1 : +1);
1841
1842         DrawLineElement(from_x + x, from_y + y, element, change_level);
1843       }
1844     }
1845   }
1846 }
1847
1848 static void DrawRectangle(int from_x, int from_y, int to_x, int to_y,
1849                           int element, boolean change_level)
1850 {
1851   DrawLine(from_x, from_y, from_x, to_y, element, change_level);
1852   DrawLine(from_x, to_y, to_x, to_y, element, change_level);
1853   DrawLine(to_x, to_y, to_x, from_y, element, change_level);
1854   DrawLine(to_x, from_y, from_x, from_y, element, change_level);
1855 }
1856
1857 static void DrawFilledBox(int from_x, int from_y, int to_x, int to_y,
1858                           int element, boolean change_level)
1859 {
1860   int y;
1861
1862   if (from_y > to_y)
1863     swap_number_pairs(&from_x, &from_y, &to_x, &to_y);
1864
1865   for (y=from_y; y<=to_y; y++)
1866     DrawLine(from_x, y, to_x, y, element, change_level);
1867 }
1868
1869 static void FloodFill(int from_x, int from_y, int fill_element)
1870 {
1871   int i,x,y;
1872   int old_element;
1873   static int check[4][2] = { {-1,0}, {0,-1}, {1,0}, {0,1} };
1874   static int safety = 0;
1875
1876   /* check if starting field still has the desired content */
1877   if (Feld[from_x][from_y] == fill_element)
1878     return;
1879
1880   safety++;
1881
1882   if (safety > lev_fieldx*lev_fieldy)
1883     Error(ERR_EXIT, "Something went wrong in 'FloodFill()'. Please debug.");
1884
1885   old_element = Feld[from_x][from_y];
1886   Feld[from_x][from_y] = fill_element;
1887
1888   for(i=0;i<4;i++)
1889   {
1890     x = from_x + check[i][0];
1891     y = from_y + check[i][1];
1892
1893     if (IN_LEV_FIELD(x,y) && Feld[x][y] == old_element)
1894       FloodFill(x, y, fill_element);
1895   }
1896
1897   safety--;
1898 }
1899
1900 static void DrawAreaBorder(int from_x, int from_y, int to_x, int to_y)
1901 {
1902   unsigned long border_color = ReadPixel(pix[PIX_SMALLFONT], 2, 16);
1903   int from_sx = SX + from_x * MINI_TILEX;
1904   int from_sy = SY + from_y * MINI_TILEX;
1905   int to_sx = SX + to_x * MINI_TILEX + MINI_TILEX - 1;
1906   int to_sy = SY + to_y * MINI_TILEX + MINI_TILEY - 1;
1907
1908   XSetForeground(display, gc, border_color);
1909
1910   XDrawLine(display, drawto, gc, from_sx, from_sy, to_sx, from_sy);
1911   XDrawLine(display, drawto, gc, to_sx, from_sy, to_sx, to_sy);
1912   XDrawLine(display, drawto, gc, to_sx, to_sy, from_sx, to_sy);
1913   XDrawLine(display, drawto, gc, from_sx, to_sy, from_sx, from_sy);
1914
1915   XSetForeground(display, gc, BlackPixel(display,screen));
1916
1917   if (from_x == to_x && from_y == to_y)
1918     MarkTileDirty(from_x/2, from_y/2);
1919   else
1920     redraw_mask |= REDRAW_FIELD;
1921 }
1922
1923 /* values for DrawLeveltext() modes */
1924 #define TEXT_INIT       0
1925 #define TEXT_SETCURSOR  1
1926 #define TEXT_WRITECHAR  2
1927 #define TEXT_BACKSPACE  3
1928 #define TEXT_NEWLINE    4
1929 #define TEXT_END        5
1930
1931 static void DrawLevelText(int sx, int sy, char letter, int mode)
1932 {
1933   static short delete_buffer[MAX_LEV_FIELDX];
1934   static int start_sx, start_sy;
1935   static int last_sx, last_sy;
1936   static boolean typing = FALSE;
1937   int letter_element = EL_CHAR_ASCII0 + letter;
1938   int lx, ly;
1939
1940   if (mode != TEXT_INIT)
1941   {
1942     if (!typing)
1943       return;
1944
1945     if (mode != TEXT_SETCURSOR)
1946     {
1947       sx = last_sx;
1948       sy = last_sy;
1949     }
1950
1951     lx = last_sx + level_xpos;
1952     ly = last_sy + level_ypos;
1953   }
1954
1955   switch (mode)
1956   {
1957     case TEXT_INIT:
1958       if (typing)
1959         DrawLevelText(0, 0, 0, TEXT_END);
1960
1961       typing = TRUE;
1962       start_sx = last_sx = sx;
1963       start_sy = last_sy = sy;
1964       DrawLevelText(sx, sy, 0, TEXT_SETCURSOR);
1965       break;
1966
1967     case TEXT_SETCURSOR:
1968       DrawMiniElement(last_sx, last_sy, Feld[lx][ly]);
1969       DrawAreaBorder(sx, sy, sx, sy);
1970       last_sx = sx;
1971       last_sy = sy;
1972       break;
1973
1974     case TEXT_WRITECHAR:
1975       if (letter_element >= EL_CHAR_START && letter_element <= EL_CHAR_END)
1976       {
1977         delete_buffer[sx - start_sx] = Feld[lx][ly];
1978         Feld[lx][ly] = letter_element;
1979
1980         if (sx + 1 < 2*SCR_FIELDX && lx + 1 < lev_fieldx)
1981           DrawLevelText(sx + 1, sy, 0, TEXT_SETCURSOR);
1982         else if (sy + 1 < 2*SCR_FIELDY && ly + 1 < lev_fieldy)
1983           DrawLevelText(start_sx, sy + 1, 0, TEXT_SETCURSOR);
1984         else
1985           DrawLevelText(0, 0, 0, TEXT_END);
1986       }
1987       break;
1988
1989     case TEXT_BACKSPACE:
1990       if (sx > start_sx)
1991       {
1992         Feld[lx - 1][ly] = delete_buffer[sx - start_sx - 1];
1993         DrawMiniElement(sx - 1, sy, new_element3);
1994         DrawLevelText(sx - 1, sy, 0, TEXT_SETCURSOR);
1995       }
1996       break;
1997
1998     case TEXT_NEWLINE:
1999       if (sy + 1 < 2*SCR_FIELDY - 1 && ly + 1 < lev_fieldy - 1)
2000         DrawLevelText(start_sx, sy + 1, 0, TEXT_SETCURSOR);
2001       else
2002         DrawLevelText(0, 0, 0, TEXT_END);
2003       break;
2004
2005     case TEXT_END:
2006       CopyLevelToUndoBuffer();
2007       DrawMiniElement(sx, sy, Feld[lx][ly]);
2008       typing = FALSE;
2009       break;
2010
2011     default:
2012       break;
2013   }
2014 }
2015
2016 static void CopyLevelToUndoBuffer()
2017 {
2018   int x, y;
2019
2020   undo_buffer_position = (undo_buffer_position + 1) % NUM_UNDO_STEPS;
2021
2022   if (undo_buffer_steps < NUM_UNDO_STEPS - 1)
2023     undo_buffer_steps++;
2024
2025   for(x=0; x<lev_fieldx; x++)
2026     for(y=0; y<lev_fieldy; y++)
2027       UndoBuffer[undo_buffer_position][x][y] = Feld[x][y];
2028 }
2029
2030 static void RandomPlacement(int button)
2031 {
2032   int new_element;
2033   int x, y;
2034
2035   new_element = (button == 1 ? new_element1 :
2036                  button == 2 ? new_element2 :
2037                  button == 3 ? new_element3 : 0);
2038
2039   if (random_placement_method == RANDOM_USE_PERCENTAGE)
2040   {
2041     for(x=0; x<lev_fieldx; x++)
2042       for(y=0; y<lev_fieldy; y++)
2043         if (RND(100) < random_placement_percentage)
2044           Feld[x][y] = new_element;
2045   }
2046   else
2047   {
2048     int elements_left = random_placement_num_objects;
2049
2050     while (elements_left > 0)
2051     {
2052       x = RND(lev_fieldx);
2053       y = RND(lev_fieldy);
2054
2055       if (Feld[x][y] != new_element)
2056       {
2057         Feld[x][y] = new_element;
2058         elements_left--;
2059       }
2060     }
2061   }
2062
2063   DrawMiniLevel(level_xpos, level_ypos);
2064 }
2065
2066 static void HandleDrawingAreas(struct GadgetInfo *gi)
2067 {
2068   static boolean started_inside_drawing_area = FALSE;
2069   boolean inside_drawing_area = !gi->event.off_borders;
2070   boolean button_press_event;
2071   boolean button_release_event;
2072   int new_element;
2073   int button = gi->event.button;
2074   int sx = gi->event.x, sy = gi->event.y;
2075   int lx, ly;
2076   int x, y;
2077
2078   if (edit_mode != ED_MODE_DRAWING)
2079     return;
2080
2081   button_press_event = (gi->event.type == GD_EVENT_PRESSED);
2082   button_release_event = (gi->event.type == GD_EVENT_RELEASED);
2083
2084   sx = (sx < 0 ? 0 : sx > 2*SCR_FIELDX - 1 ? 2*SCR_FIELDX - 1 : sx);
2085   sy = (sy < 0 ? 0 : sy > 2*SCR_FIELDY - 1 ? 2*SCR_FIELDY - 1 : sy);
2086   lx = sx + level_xpos;
2087   ly = sy + level_ypos;
2088
2089   lx = (lx < 0 ? 0 : lx > lev_fieldx - 1 ? lev_fieldx - 1 : lx);
2090   ly = (ly < 0 ? 0 : ly > lev_fieldy - 1 ? lev_fieldy - 1 : ly);
2091   sx = lx - level_xpos;
2092   sy = ly - level_ypos;
2093
2094   if (button_press_event)
2095     started_inside_drawing_area = inside_drawing_area;
2096
2097   if (!started_inside_drawing_area)
2098     return;
2099
2100   if ((!button && !button_release_event) ||
2101       sx > lev_fieldx || sy > lev_fieldy ||
2102       (sx == 0 && level_xpos<0) ||
2103       (sx == 2*SCR_FIELDX - 1 && level_xpos > lev_fieldx - 2*SCR_FIELDX) ||
2104       (sy == 0 && level_ypos < 0) ||
2105       (sy == 2*SCR_FIELDY - 1 && level_ypos > lev_fieldy - 2*SCR_FIELDY))
2106     return;
2107
2108   new_element = (button == 1 ? new_element1 :
2109                  button == 2 ? new_element2 :
2110                  button == 3 ? new_element3 : 0);
2111
2112   switch (drawing_function)
2113   {
2114     case ED_CTRL_ID_SINGLE_ITEMS:
2115       if (button_release_event)
2116         CopyLevelToUndoBuffer();
2117
2118       if (!button)
2119         break;
2120
2121       if (new_element != Feld[lx][ly])
2122       {
2123         if (new_element == EL_SPIELFIGUR)
2124         {
2125           /* remove player at old position */
2126           for(y=0; y<lev_fieldy; y++)
2127           {
2128             for(x=0; x<lev_fieldx; x++)
2129             {
2130               if (Feld[x][y] == EL_SPIELFIGUR || Feld[x][y] == EL_SPIELER1)
2131               {
2132                 Feld[x][y] = EL_LEERRAUM;
2133                 if (x - level_xpos >= 0 && x - level_xpos < 2*SCR_FIELDX &&
2134                     y - level_ypos >= 0 && y - level_ypos < 2*SCR_FIELDY)
2135                   DrawMiniElement(x - level_xpos, y - level_ypos, EL_LEERRAUM);
2136               }
2137             }
2138           }
2139         }
2140
2141         Feld[lx][ly] = new_element;
2142         DrawMiniElement(sx, sy, new_element);
2143       }
2144       break;
2145
2146     case ED_CTRL_ID_CONNECTED_ITEMS:
2147       {
2148         static int last_sx = -1;
2149         static int last_sy = -1;
2150
2151         if (button_release_event)
2152           CopyLevelToUndoBuffer();
2153
2154         if (button)
2155         {
2156           if (!button_press_event)
2157             DrawLine(last_sx, last_sy, sx, sy, new_element, TRUE);
2158
2159           last_sx = sx;
2160           last_sy = sy;
2161         }
2162       }
2163       break;
2164
2165     case ED_CTRL_ID_LINE:
2166     case ED_CTRL_ID_RECTANGLE:
2167     case ED_CTRL_ID_FILLED_BOX:
2168       {
2169         static int last_sx = -1;
2170         static int last_sy = -1;
2171         static int start_sx = -1;
2172         static int start_sy = -1;
2173         void (*draw_func)(int, int, int, int, int, boolean);
2174
2175         if (drawing_function == ED_CTRL_ID_LINE)
2176           draw_func = DrawLine;
2177         else if (drawing_function == ED_CTRL_ID_RECTANGLE)
2178           draw_func = DrawRectangle;
2179         else
2180           draw_func = DrawFilledBox;
2181
2182         if (button_press_event)
2183         {
2184           draw_func(sx, sy, sx, sy, new_element, FALSE);
2185           start_sx = last_sx = sx;
2186           start_sy = last_sy = sy;
2187         }
2188         else if (button_release_event)
2189         {
2190           draw_func(start_sx, start_sy, sx, sy, new_element, TRUE);
2191           CopyLevelToUndoBuffer();
2192         }
2193         else if (last_sx != sx || last_sy != sy)
2194         {
2195           draw_func(start_sx, start_sy, last_sx, last_sy, -1, FALSE);
2196           draw_func(start_sx, start_sy, sx, sy, new_element, FALSE);
2197           last_sx = sx;
2198           last_sy = sy;
2199         }
2200       }
2201       break;
2202
2203     case ED_CTRL_ID_FLOOD_FILL:
2204       if (button_press_event && Feld[lx][ly] != new_element)
2205       {
2206         FloodFill(lx, ly, new_element);
2207         DrawMiniLevel(level_xpos, level_ypos);
2208         CopyLevelToUndoBuffer();
2209       }
2210       break;
2211
2212     case ED_CTRL_ID_TEXT:
2213       if (button_press_event)
2214         DrawLevelText(sx, sy, 0, TEXT_INIT);
2215       break;
2216
2217     default:
2218       break;
2219   }
2220 }
2221
2222 static void HandleCounterButtons(struct GadgetInfo *gi)
2223 {
2224   int id = gi->custom_id;
2225   int button = gi->event.button;
2226   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
2227
2228   switch (id)
2229   {
2230     case ED_CTRL_ID_SCORE_DOWN:
2231     case ED_CTRL_ID_SCORE_UP:
2232       *gadget_score_value += (id == ED_CTRL_ID_SCORE_DOWN ? -step : step);
2233       if (*gadget_score_value < 0)
2234         *gadget_score_value = 0;
2235       else if (*gadget_score_value > 255)
2236         *gadget_score_value = 255;
2237
2238       DrawCounterValueField(ED_COUNTER_SCORE, *gadget_score_value);
2239       break;
2240
2241     default:
2242       break;
2243   }
2244 }
2245
2246 static void HandleControlButtons(struct GadgetInfo *gi)
2247 {
2248   int id = gi->custom_id;
2249   int button = gi->event.button;
2250   int step = (button == 1 ? 1 : button == 2 ? 5 : 10);
2251   int new_element;
2252   int player_present = FALSE;
2253   int level_changed = FALSE;
2254   int x, y;
2255
2256   new_element = (button == 1 ? new_element1 :
2257                  button == 2 ? new_element2 :
2258                  button == 3 ? new_element3 : 0);
2259
2260   if (edit_mode == ED_MODE_DRAWING && drawing_function == ED_CTRL_ID_TEXT)
2261     DrawLevelText(0, 0, 0, TEXT_END);
2262
2263   if (id < ED_NUM_CTRL1_BUTTONS && edit_mode != ED_MODE_DRAWING)
2264   {
2265     DrawDrawingWindow();
2266     edit_mode = ED_MODE_DRAWING;
2267   }
2268
2269   switch (id)
2270   {
2271     case ED_CTRL_ID_SINGLE_ITEMS:
2272     case ED_CTRL_ID_CONNECTED_ITEMS:
2273     case ED_CTRL_ID_LINE:
2274     case ED_CTRL_ID_TEXT:
2275     case ED_CTRL_ID_RECTANGLE:
2276     case ED_CTRL_ID_FILLED_BOX:
2277     case ED_CTRL_ID_FLOOD_FILL:
2278     case ED_CTRL_ID_BRUSH:
2279       drawing_function = id;
2280       break;
2281
2282     case ED_CTRL_ID_WRAP_LEFT:
2283       if (level_xpos >= 0)
2284       {
2285         if (lev_fieldx < 2*SCR_FIELDX - 2)
2286           break;
2287
2288         level_xpos -= step;
2289         if (level_xpos <- 1)
2290           level_xpos = -1;
2291         if (button == 1)
2292           ScrollMiniLevel(level_xpos, level_ypos, ED_SCROLL_RIGHT);
2293         else
2294           DrawMiniLevel(level_xpos, level_ypos);
2295       }
2296       break;
2297
2298     case ED_CTRL_ID_WRAP_RIGHT:
2299       if (level_xpos <= lev_fieldx - 2*SCR_FIELDX)
2300       {
2301         if (lev_fieldx < 2*SCR_FIELDX - 2)
2302           break;
2303
2304         level_xpos += step;
2305         if (level_xpos > lev_fieldx - 2*SCR_FIELDX + 1)
2306           level_xpos = lev_fieldx - 2*SCR_FIELDX + 1;
2307         if (button == 1)
2308           ScrollMiniLevel(level_xpos, level_ypos, ED_SCROLL_LEFT);
2309         else
2310           DrawMiniLevel(level_xpos, level_ypos);
2311       }
2312       break;
2313
2314     case ED_CTRL_ID_WRAP_UP:
2315       if (level_ypos >= 0)
2316       {
2317         if (lev_fieldy < 2*SCR_FIELDY - 2)
2318           break;
2319
2320         level_ypos -= step;
2321         if (level_ypos < -1)
2322           level_ypos = -1;
2323         if (button == 1)
2324           ScrollMiniLevel(level_xpos, level_ypos, ED_SCROLL_DOWN);
2325         else
2326           DrawMiniLevel(level_xpos, level_ypos);
2327       }
2328       break;
2329
2330     case ED_CTRL_ID_WRAP_DOWN:
2331       if (level_ypos <= lev_fieldy - 2*SCR_FIELDY)
2332       {
2333         if (lev_fieldy < 2*SCR_FIELDY - 2)
2334           break;
2335
2336         level_ypos += step;
2337         if (level_ypos > lev_fieldy - 2*SCR_FIELDY + 1)
2338           level_ypos = lev_fieldy - 2*SCR_FIELDY + 1;
2339         if (button == 1)
2340           ScrollMiniLevel(level_xpos, level_ypos, ED_SCROLL_UP);
2341         else
2342           DrawMiniLevel(level_xpos, level_ypos);
2343       }
2344       break;
2345
2346     case ED_CTRL_ID_PROPERTIES:
2347       DrawPropertiesWindow(new_element);
2348       edit_mode = ED_MODE_PROPERTIES;
2349       break;
2350
2351     case ED_CTRL_ID_RANDOM_PLACEMENT:
2352       RandomPlacement(button);
2353       CopyLevelToUndoBuffer();
2354       break;
2355
2356     case ED_CTRL_ID_UNDO:
2357       if (undo_buffer_steps == 0)
2358       {
2359         Request("Undo buffer empty !", REQ_CONFIRM);
2360         break;
2361       }
2362
2363       undo_buffer_position =
2364         (undo_buffer_position - 1 + NUM_UNDO_STEPS) % NUM_UNDO_STEPS;
2365       undo_buffer_steps--;
2366
2367       for(x=0; x<lev_fieldx; x++)
2368         for(y=0; y<lev_fieldy; y++)
2369           Feld[x][y] = UndoBuffer[undo_buffer_position][x][y];
2370       DrawMiniLevel(level_xpos,level_ypos);
2371       break;
2372
2373     case ED_CTRL_ID_INFO:
2374       if (edit_mode != ED_MODE_INFO)
2375       {
2376         DrawControlWindow();
2377         edit_mode = ED_MODE_INFO;
2378       }
2379       else
2380       {
2381         AdjustLevelScrollPosition();
2382         DrawMiniLevel(level_xpos, level_ypos);
2383         edit_mode = ED_MODE_DRAWING;
2384       }
2385       break;
2386
2387     case ED_CTRL_ID_CLEAR:
2388       for(x=0; x<MAX_LEV_FIELDX; x++) 
2389         for(y=0; y<MAX_LEV_FIELDY; y++) 
2390           Feld[x][y] = new_element3;
2391       CopyLevelToUndoBuffer();
2392
2393       DrawMiniLevel(level_xpos, level_ypos);
2394       break;
2395
2396     case ED_CTRL_ID_SAVE:
2397       if (leveldir[leveldir_nr].readonly)
2398       {
2399         Request("This level is read only !", REQ_CONFIRM);
2400         break;
2401       }
2402
2403       for(y=0; y<lev_fieldy; y++) 
2404         for(x=0; x<lev_fieldx; x++)
2405           if (Feld[x][y] != Ur[x][y])
2406             level_changed = TRUE;
2407
2408       if (!level_changed)
2409       {
2410         Request("Level has not changed !", REQ_CONFIRM);
2411         break;
2412       }
2413
2414       for(y=0; y<lev_fieldy; y++) 
2415         for(x=0; x<lev_fieldx; x++)
2416           if (Feld[x][y] == EL_SPIELFIGUR || Feld[x][y] == EL_SPIELER1) 
2417             player_present = TRUE;
2418
2419       if (!player_present)
2420         Request("No Level without Gregor Mc Duffin please !", REQ_CONFIRM);
2421       else
2422       {
2423         if (Request("Save this level and kill the old ?", REQ_ASK))
2424         {
2425           for(x=0; x<lev_fieldx; x++)
2426             for(y=0; y<lev_fieldy; y++) 
2427               Ur[x][y] = Feld[x][y];
2428           SaveLevel(level_nr);
2429         }
2430       }
2431       break;
2432
2433     case ED_CTRL_ID_TEST:
2434       for(y=0; y<lev_fieldy; y++) 
2435         for(x=0; x<lev_fieldx; x++)
2436           if (Feld[x][y] == EL_SPIELFIGUR || Feld[x][y] == EL_SPIELER1) 
2437             player_present = TRUE;
2438
2439       if (!player_present)
2440         Request("No Level without Gregor Mc Duffin please !", REQ_CONFIRM);
2441       else
2442       {
2443         for(x=0; x<lev_fieldx; x++)
2444           for(y=0; y<lev_fieldy; y++)
2445             OrigBackup[x][y] = Ur[x][y];
2446
2447         for(x=0; x<lev_fieldx; x++)
2448           for(y=0; y<lev_fieldy; y++)
2449             Ur[x][y] = Feld[x][y];
2450
2451         level_editor_test_game = TRUE;
2452         game_status = PLAYING;
2453         InitGame();
2454       }
2455       break;
2456
2457     case ED_CTRL_ID_EXIT:
2458       for(y=0; y<lev_fieldy; y++) 
2459         for(x=0; x<lev_fieldx; x++)
2460           if (Feld[x][y] != Ur[x][y])
2461             level_changed = TRUE;
2462
2463       if (!level_changed ||
2464           Request("Level has changed! Exit without saving ?",
2465                   REQ_ASK | REQ_STAY_OPEN))
2466       {
2467         CloseDoor(DOOR_CLOSE_1);
2468
2469         /*
2470         CloseDoor(DOOR_CLOSE_ALL);
2471         */
2472
2473         /* draw smaller door */
2474         XCopyArea(display, pix[PIX_DOOR], drawto, gc,
2475                   DOOR_GFX_PAGEX7, 64,
2476                   108, 64,
2477                   EX - 4, EY - 12);
2478         redraw_mask |= REDRAW_ALL;
2479
2480         game_status = MAINMENU;
2481         DrawMainMenu();
2482       }
2483       else
2484       {
2485         CloseDoor(DOOR_CLOSE_1);
2486         XCopyArea(display, pix[PIX_DB_DOOR], pix[PIX_DB_DOOR], gc,
2487                   DOOR_GFX_PAGEX2, DOOR_GFX_PAGEY1, DXSIZE,DYSIZE,
2488                   DOOR_GFX_PAGEX1, DOOR_GFX_PAGEY1);
2489         OpenDoor(DOOR_OPEN_1);
2490       }
2491       break;
2492
2493     default:
2494       if (gi->event.type == GD_EVENT_PRESSED)
2495         printf("default: HandleControlButtons: GD_EVENT_PRESSED\n");
2496       else if (gi->event.type == GD_EVENT_RELEASED)
2497         printf("default: HandleControlButtons: GD_EVENT_RELEASED\n");
2498       else if (gi->event.type == GD_EVENT_MOVING)
2499         printf("default: HandleControlButtons: GD_EVENT_MOVING\n");
2500       else
2501         printf("default: HandleControlButtons: ?\n");
2502       break;
2503   }
2504 }
2505
2506 void HandleLevelEditorKeyInput(KeySym key)
2507 {
2508   if (edit_mode == ED_MODE_DRAWING && drawing_function == ED_CTRL_ID_TEXT)
2509   {
2510     char *keyname = getKeyNameFromKeySym(key);
2511     char letter = 0;
2512
2513     if (strlen(keyname) == 1)
2514       letter = keyname[0];
2515     else if (strcmp(keyname, "space") == 0)
2516       letter = ' ';
2517     else if (strcmp(keyname, "less") == 0)
2518       letter = '<';
2519     else if (strcmp(keyname, "equal") == 0)
2520       letter = '=';
2521     else if (strcmp(keyname, "greater") == 0)
2522       letter = '>';
2523
2524     /* map lower case letters to upper case */
2525     if (letter >= 'a' && letter <= 'z')
2526       letter += (int)('A' - 'a');
2527     else if (letter == 'ä')
2528       letter = 'Ä';
2529     else if (letter == 'ä')
2530       letter = 'Ö';
2531     else if (letter == 'ä')
2532       letter = 'Ü';
2533
2534     if (letter)
2535       DrawLevelText(0, 0, letter, TEXT_WRITECHAR);
2536     else if (key == XK_Delete || key == XK_BackSpace)
2537       DrawLevelText(0, 0, 0, TEXT_BACKSPACE);
2538     else if (key == XK_Return)
2539       DrawLevelText(0, 0, 0, TEXT_NEWLINE);
2540   }
2541 }