rnd-20000720-1-src
[rocksndiamonds.git] / src / main.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 *  main.c                                                  *
12 ***********************************************************/
13
14 #include "main.h"
15 #include "init.h"
16 #include "game.h"
17 #include "events.h"
18 #include "sound.h"
19 #include "joystick.h"
20 #include "misc.h"
21
22 #ifdef MSDOS
23 #include <fcntl.h>
24 #endif
25
26 Display        *display;
27 Visual         *visual;
28 int             screen;
29 DrawWindow      window;
30 GC              gc, clip_gc[NUM_BITMAPS], tile_clip_gc;
31 Bitmap          pix[NUM_BITMAPS];
32 Bitmap          pix_masked[NUM_BITMAPS], tile_masked[NUM_TILES];
33 Pixmap          clipmask[NUM_BITMAPS], tile_clipmask[NUM_TILES];
34
35 #ifdef USE_XPM_LIBRARY
36 XpmAttributes   xpm_att[NUM_PICTURES];
37 #endif
38
39 DrawBuffer      drawto, drawto_field, backbuffer, fieldbuffer;
40 Colormap        cmap;
41
42 int             sound_pipe[2];
43 int             sound_device;
44 char           *sound_device_name = SOUND_DEVICE;
45 int             joystick_device = 0;
46 char           *joystick_device_name[MAX_PLAYERS] =
47 {
48   DEV_JOYSTICK_0,
49   DEV_JOYSTICK_1,
50   DEV_JOYSTICK_2,
51   DEV_JOYSTICK_3
52 };
53
54 char           *program_name = NULL;
55
56 int             game_status = MAINMENU;
57 boolean         level_editor_test_game = FALSE;
58 boolean         network_playing = FALSE;
59 int             button_status = MB_NOT_PRESSED;
60 boolean         motion_status = FALSE;
61 int             key_joystick_mapping = 0;
62 int             global_joystick_status = JOYSTICK_STATUS;
63 int             joystick_status = JOYSTICK_STATUS;
64 int             sound_status = SOUND_STATUS;
65 boolean         sound_loops_allowed = FALSE;
66
67 boolean         redraw[MAX_BUF_XSIZE][MAX_BUF_YSIZE];
68 int             redraw_x1 = 0, redraw_y1 = 0;
69 int             redraw_mask;
70 int             redraw_tiles;
71
72 short           Feld[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
73 short           Ur[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
74 short           MovPos[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
75 short           MovDir[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
76 short           MovDelay[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
77 short           Store[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
78 short           Store2[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
79 short           StorePlayer[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
80 short           Frame[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
81 boolean         Stop[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
82 short           JustStopped[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
83 short           AmoebaNr[MAX_LEV_FIELDX][MAX_LEV_FIELDY];
84 short           AmoebaCnt[MAX_NUM_AMOEBA], AmoebaCnt2[MAX_NUM_AMOEBA];
85 unsigned long   Elementeigenschaften1[MAX_ELEMENTS];
86 unsigned long   Elementeigenschaften2[MAX_ELEMENTS];
87
88 int             level_nr;
89 int             lev_fieldx,lev_fieldy, scroll_x,scroll_y;
90
91 int             FX = SX, FY = SY, ScrollStepSize;
92 int             ScreenMovDir = MV_NO_MOVING, ScreenMovPos = 0;
93 int             ScreenGfxPos = 0;
94 int             BorderElement = EL_BETON;
95 int             GameFrameDelay = GAME_FRAME_DELAY;
96 int             FfwdFrameDelay = FFWD_FRAME_DELAY;
97 int             BX1 = 0, BY1 = 0, BX2 = SCR_FIELDX-1, BY2 = SCR_FIELDY-1;
98 int             SBX_Left, SBX_Right;
99 int             SBY_Upper, SBY_Lower;
100 int             ZX,ZY, ExitX,ExitY;
101 int             AllPlayersGone;
102 int             FrameCounter, TimeFrames, TimePlayed, TimeLeft;
103
104 boolean         network_player_action_received = FALSE;
105
106 struct LevelDirInfo    *leveldir_first = NULL, *leveldir_current = NULL;
107 struct LevelInfo        level;
108 struct PlayerInfo       stored_player[MAX_PLAYERS], *local_player = NULL;
109 struct HiScore          highscore[MAX_SCORE_ENTRIES];
110 struct SoundInfo        Sound[NUM_SOUNDS];
111 struct TapeInfo         tape;
112 struct OptionInfo       options;
113 struct SetupInfo        setup;
114 struct GameInfo         game;
115 struct GlobalInfo       global;
116
117 /* data needed for playing sounds */
118 char *sound_name[NUM_SOUNDS] =
119 {
120   "alchemy",
121   "amoebe",
122   "antigrav",
123   "autsch",
124   "blurb",
125   "bong",
126   "buing",
127   "chase",
128   "czardasz",
129   "deng",
130   "fuel",
131   "gong",
132   "halloffame",
133   "holz",
134   "hui",
135   "kabumm",
136   "kink",
137   "klapper",
138   "kling",
139   "klopf",
140   "klumpf",
141   "knack",
142   "knurk",
143   "krach",
144   "lachen",
145   "laser",
146   "miep",
147   "network",
148   "njam",
149   "oeffnen",
150   "pling",
151   "pong",
152   "pusch",
153   "quiek",
154   "quirk",
155   "rhythmloop",
156   "roaaar",
157   "roehr",
158   "rumms",
159   "schlopp",
160   "schlurf",
161   "schrff",
162   "schwirr",
163   "sirr",
164   "slurp",
165   "sproing",
166   "twilight",
167   "tyger",
168   "voyager",
169   "warnton",
170   "whoosh",
171   "zisch",
172   "base",
173   "infotron",
174   "zonkdown",
175   "zonkpush",
176   "bug",
177   "boom",
178   "booom",
179   "exit",
180   "empty",
181   "gate"
182 };
183
184 /* background music */
185 int background_loop[] =
186 {
187   SND_ALCHEMY,
188   SND_CHASE,
189   SND_NETWORK,
190   SND_CZARDASZ,
191   SND_TYGER,
192   SND_VOYAGER,
193   SND_TWILIGHT
194 };
195 int num_bg_loops = sizeof(background_loop)/sizeof(int);
196
197 char *element_info[] =
198 {
199   "empty space",                                /* 0 */
200   "sand",
201   "normal wall",
202   "round wall",
203   "rock",
204   "key",
205   "emerald",
206   "closed exit",
207   "player",
208   "bug",
209   "spaceship",                                  /* 10 */
210   "yam yam",
211   "robot",
212   "steel wall",
213   "diamond",
214   "dead amoeba",
215   "empty quicksand",
216   "quicksand with rock",
217   "amoeba drop",
218   "bomb",
219   "magic wall",                                 /* 20 */
220   "speed ball",
221   "acid pool",
222   "dropping amoeba",
223   "normal amoeba",
224   "nut with emerald",
225   "life wall",
226   "biomaze",
227   "burning dynamite",
228   "unknown",
229   "magic wheel",                                /* 30 */
230   "running wire",
231   "red key",
232   "yellow key",
233   "green key",
234   "blue key",
235   "red door",
236   "yellow door",
237   "green door",
238   "blue door",
239   "gray door (opened by red key)",              /* 40 */
240   "gray door (opened by yellow key)",
241   "gray door (opened by green key)",
242   "gray door (opened by blue key)",
243   "dynamite",
244   "pac man",
245   "invisible normal wall",
246   "light bulb (dark)",
247   "ligh bulb (glowing)",
248   "wall with emerald",
249   "wall with diamond",                          /* 50 */
250   "amoeba with content",
251   "amoeba (BD style)",
252   "time orb (full)",
253   "time orb (empty)",
254   "growing wall",
255   "diamond (BD style)",
256   "yellow emerald",
257   "wall with BD style diamond",
258   "wall with yellow emerald",
259   "dark yam yam",                               /* 60 */
260   "magic wall (BD style)",
261   "invisible steel wall",
262   "-",
263   "increases number of bombs",
264   "increases explosion size",
265   "increases power of explosion",
266   "sokoban object",
267   "sokoban empty field",
268   "sokoban field with object",
269   "butterfly (starts moving right)",            /* 70 */
270   "butterfly (starts moving up)",
271   "butterfly (starts moving left)",
272   "butterfly (starts moving down)",
273   "firefly (starts moving right)",
274   "firefly (starts moving up)",
275   "firefly (starts moving left)",
276   "firefly (starts moving down)",
277   "butterfly",
278   "firefly",
279   "yellow player",                              /* 80 */
280   "red player",
281   "green player",
282   "blue player",
283   "bug (starts moving right)",
284   "bug (starts moving up)",
285   "bug (starts moving left)",
286   "bug (starts moving down)",
287   "spaceship (starts moving right)",
288   "spaceship (starts moving up)",
289   "spaceship (starts moving left)",             /* 90 */
290   "spaceship (starts moving down)",
291   "pac man (starts moving right)",
292   "pac man (starts moving up)",
293   "pac man (starts moving left)",
294   "pac man (starts moving down)",
295   "red emerald",
296   "violet emerald",
297   "wall with red emerald",
298   "wall with violet emerald",
299   "unknown",                                    /* 100 */
300   "unknown",
301   "unknown",
302   "unknown",
303   "unknown",
304   "normal wall (BD style)",
305   "rock (BD style)",
306   "open exit",
307   "unknown",
308   "amoeba",
309   "mole",                                       /* 110 */
310   "penguin",
311   "satellite",
312   "arrow left",
313   "arrow right",
314   "arrow up",
315   "arrow down",
316   "pig",
317   "fire breathing dragon",
318   "unknown",
319   "letter ' '",                                 /* 120 */
320   "letter '!'",
321   "letter '\"'",
322   "letter '#'",
323   "letter '$'",
324   "letter '%'",
325   "letter '&'",
326   "letter '''",
327   "letter '('",
328   "letter ')'",
329   "letter '*'",                                 /* 130 */
330   "letter '+'",
331   "letter ','",
332   "letter '-'",
333   "letter '.'",
334   "letter '/'",
335   "letter '0'",
336   "letter '1'",
337   "letter '2'",
338   "letter '3'",
339   "letter '4'",                                 /* 140 */
340   "letter '5'",
341   "letter '6'",
342   "letter '7'",
343   "letter '8'",
344   "letter '9'",
345   "letter ':'",
346   "letter ';'",
347   "letter '<'",
348   "letter '='",
349   "letter '>'",                                 /* 150 */
350   "letter '?'",
351   "letter '@'",
352   "letter 'A'",
353   "letter 'B'",
354   "letter 'C'",
355   "letter 'D'",
356   "letter 'E'",
357   "letter 'F'",
358   "letter 'G'",
359   "letter 'H'",                                 /* 160 */
360   "letter 'I'",
361   "letter 'J'",
362   "letter 'K'",
363   "letter 'L'",
364   "letter 'M'",
365   "letter 'N'",
366   "letter 'O'",
367   "letter 'P'",
368   "letter 'Q'",
369   "letter 'R'",                                 /* 170 */
370   "letter 'S'",
371   "letter 'T'",
372   "letter 'U'",
373   "letter 'V'",
374   "letter 'W'",
375   "letter 'X'",
376   "letter 'Y'",
377   "letter 'Z'",
378   "letter 'Ä'",
379   "letter 'Ö'",                                 /* 180 */
380   "letter 'Ãœ'",
381   "letter '^'",
382   "letter ''",
383   "letter ''",
384   "letter ''",
385   "letter ''",
386   "letter ''",
387   "letter ''",
388   "letter ''",
389   "letter ''",                                  /* 190 */
390   "letter ''",
391   "letter ''",
392   "letter ''",
393   "letter ''",
394   "letter ''",
395   "letter ''",
396   "letter ''",
397   "letter ''",
398   "letter ''",
399   "growing wall (horizontal)",                  /* 200 */
400   "growing wall (vertical)",
401   "growing wall (all directions)",
402   "unused",
403   "unused",
404   "unused",
405   "unused",
406   "unused",
407   "unused",
408   "unused",
409   "empty space",                                /* 210 */
410   "zonk",
411   "base",
412   "murphy",
413   "infotron",
414   "chip (single)",
415   "hardware",
416   "exit",
417   "orange disk",
418   "port (leading right)",
419   "port (leading down)",                        /* 220 */
420   "port (leading left)",
421   "port (leading up)",
422   "port (leading right)",
423   "port (leading down)",
424   "port (leading left)",
425   "port (leading up)",
426   "snik snak",
427   "yellow disk",
428   "terminal",
429   "red disk",                                   /* 230 */
430   "port (vertical)",
431   "port (horizontal)",
432   "port (all directions)",
433   "electron",
434   "buggy base",
435   "chip (left half)",
436   "chip (right half)",
437   "hardware",
438   "hardware",
439   "hardware",                                   /* 240 */
440   "hardware",
441   "hardware",
442   "hardware",
443   "hardware",
444   "hardware",
445   "hardware",
446   "hardware",
447   "chip (upper half)",
448   "chip (lower half)",
449   "unknown",                                    /* 250 */
450   "unknown",
451   "unknown",
452   "unknown",
453   "unknown",
454   "unknown",
455
456   /* 256 */
457
458   "pearl",                                      /* (256) */
459   "crystal",
460   "wall with pearl",
461   "wall with crystal",
462   "white door",                                 /* 260 */
463   "gray door (opened by white key)",
464   "white key",
465   "shield (passive)",
466   "extra time",
467   "switch gate (open)",
468   "switch gate (closed)",
469   "switch for switch gate",
470   "switch for switch gate",
471   "-",
472   "-",                                          /* 270 */
473   "red conveyor belt (left)",
474   "red conveyor belt (middle)",
475   "red conveyor belt (right)",
476   "switch for red conveyor belt (left)",
477   "switch for red conveyor belt (middle)",
478   "switch for red conveyor belt (right)",
479   "yellow conveyor belt (left)",
480   "yellow conveyor belt (middle)",
481   "yellow conveyor belt (right)",
482   "switch for yellow conveyor belt (left)",     /* 280 */
483   "switch for yellow conveyor belt (middle)",
484   "switch for yellow conveyor belt (right)",
485   "green conveyor belt (left)",
486   "green conveyor belt (middle)",
487   "green conveyor belt (right)",
488   "switch for green conveyor belt (left)",
489   "switch for green conveyor belt (middle)",
490   "switch for green conveyor belt (right)",
491   "blue conveyor belt (left)",
492   "blue conveyor belt (middle)",                /* 290 */
493   "blue conveyor belt (right)",
494   "switch for blue conveyor belt (left)",
495   "switch for blue conveyor belt (middle)",
496   "switch for blue conveyor belt (right)",
497   "land mine",
498   "mail envelope",
499   "light switch (off)",
500   "light switch (on)",
501   "sign (exclamation)",
502   "sign (radio activity)",                      /* 300 */
503   "sign (stop)",
504   "sign (wheel chair)",
505   "sign (parking)",
506   "sign (one way)",
507   "sign (heart)",
508   "sign (triangle)",
509   "sign (round)",
510   "sign (exit)",
511   "sign (yin yang)",
512   "sign (other)",                               /* 310 */
513   "mole (starts moving left)",
514   "mole (starts moving right)",
515   "mole (starts moving up)",
516   "mole (starts moving down)",
517   "steel wall (slanted)",
518   "invisible sand",
519   "dx unknown 15",
520   "dx unknown 42",
521   "-",
522   "-",                                          /* 320 */
523   "shield (active, kills enemies)",
524   "time gate (open)",
525   "time gate (closed)",
526   "switch for time gate",
527   "switch for time gate",
528   "balloon",
529   "send balloon to the left",
530   "send balloon to the right",
531   "send balloon up",
532   "send balloon down",                          /* 330 */
533   "send balloon in any direction",
534   "steel wall",
535   "steel wall",
536   "steel wall",
537   "steel wall",
538   "normal wall",
539   "normal wall",
540   "normal wall",
541   "normal wall",
542   "normal wall",                                /* 340 */
543   "normal wall",
544   "normal wall",
545   "normal wall",
546   "tube (all directions)",
547   "tube (vertical)",
548   "tube (horizontal)",
549   "tube (vertical & left)",
550   "tube (vertical & right)",
551   "tube (horizontal & up)",
552   "tube (horizontal & down)",                   /* 350 */
553   "tube (left & up)",
554   "tube (left & down)",
555   "tube (right & up)",
556   "tube (right & down)",
557   "spring",
558   "trap",
559   "stable bomb (DX style)",
560   "-"
561
562   /*
563   "-------------------------------",
564   */
565 };
566
567
568
569 /* +-----------------------------------------------------------------------+ */
570 /* | SDL TEST STUFF                                                        | */
571 /* +-----------------------------------------------------------------------+ */
572
573 #ifdef  USE_SDL_LIBRARY
574
575 SDL_Surface *sdl_screen, *sdl_image_tmp, *sdl_image, *sdl_image_masked;
576 SDL_Surface *sdl_image2_tmp, *sdl_image2, *sdl_image2_masked;
577
578 void TEST_SDL_BLIT_RECT(int x, int y)
579 {
580   SDL_Rect rect_src, rect_dst;
581
582   SDLCopyArea(pix_masked[PIX_HEROES], window,
583               8 * TILEX, 8 * TILEY, TILEX, TILEY, x, y);
584   return;
585
586   rect_src.x = 8 * TILEX;
587   rect_src.y = 8 * TILEY;
588   rect_src.w = TILEX;
589   rect_src.h = TILEY;
590
591   rect_dst.x = x;
592   rect_dst.y = y;
593   rect_dst.w = TILEX;
594   rect_dst.h = TILEY;
595
596   SDL_BlitSurface(sdl_image2_masked, &rect_src, sdl_screen, &rect_dst);
597   SDL_UpdateRect(sdl_screen, x, y, TILEX, TILEY);
598 }
599
600 void TEST_SDL_INIT_DISPLAY()
601 {
602   SDL_Rect rect_src, rect_dst;
603
604   if (SDL_Init(SDL_INIT_VIDEO) < 0)
605   {
606     fprintf(stderr, "SDL_Init() failed: %s\n", SDL_GetError());
607     exit(1);
608   }
609
610   /* automatically cleanup SDL stuff after exit() */
611   atexit(SDL_Quit);
612
613   if ((sdl_screen = SDL_SetVideoMode(WIN_XSIZE, WIN_YSIZE, 16, SDL_HWSURFACE))
614       == NULL)
615   {
616     fprintf(stderr, "SDL_SetVideoMode() failed: %s\n", SDL_GetError());
617     exit(1);
618   }
619
620   SDL_WM_SetCaption(WINDOW_TITLE_STRING, WINDOW_TITLE_STRING);
621
622   if ((sdl_image_tmp = IMG_Load("graphics/RocksScreen.pcx")) == NULL)
623   {
624     fprintf(stderr, "IMG_Load() failed: %s\n", SDL_GetError());
625     exit(1);
626   }
627
628   sdl_image = SDL_DisplayFormat(sdl_image_tmp);
629
630   SDL_SetColorKey(sdl_image_tmp, SDL_SRCCOLORKEY,
631                   SDL_MapRGB(sdl_image_tmp->format, 0x00, 0x00, 0x00));
632   sdl_image_masked = SDL_DisplayFormat(sdl_image_tmp);
633
634   SDL_FreeSurface(sdl_image_tmp);
635
636   if ((sdl_image2_tmp = IMG_Load("graphics/RocksHeroes.pcx")) == NULL)
637   {
638     fprintf(stderr, "IMG_Load() failed: %s\n", SDL_GetError());
639     exit(1);
640   }
641
642   sdl_image2 = SDL_DisplayFormat(sdl_image2_tmp);
643   SDL_FreeSurface(sdl_image2_tmp);
644
645   sdl_image2_masked = SDL_DisplayFormat(sdl_image2);
646   SDL_SetColorKey(sdl_image2_masked, SDL_SRCCOLORKEY,
647                   SDL_MapRGB(sdl_image2_masked->format, 0x00, 0x00, 0x00));
648
649   rect_src.x = 0;
650   rect_src.y = 0;
651   rect_src.w = sdl_image->w;
652   rect_src.h = sdl_image->h;
653
654   rect_dst.x = 0;
655   rect_dst.y = 0;
656   rect_dst.w = sdl_image->w;
657   rect_dst.h = sdl_image->h;
658                                            
659   SDL_BlitSurface(sdl_image, &rect_src, sdl_screen, &rect_dst);
660
661   /*
662   SDL_UpdateRect(sdl_screen, 0, 0, WIN_XSIZE, WIN_YSIZE);
663   */
664   /*
665   SDL_UpdateRect(sdl_screen, 0, 0, 0, 0);
666   */
667   SDL_Flip(sdl_screen);
668
669   /*
670   SDL_Delay(5000);
671   */
672 }
673
674 void TEST_SDL_EVENT_LOOP()
675 {
676   int quit_loop = 0;
677
678   SDL_EventState(SDL_MOUSEMOTION, SDL_IGNORE);
679
680   /*
681   while (!quit_loop && SDL_WaitEvent(&event) >=0)
682   */
683
684   while (!quit_loop)
685   {
686     SDL_Event event;
687
688     if (SDL_PollEvent(&event))
689     {
690       /* hier werden die Ereignisse behandelt */
691       switch(event.type)
692       {
693         case SDL_QUIT:
694         {
695           quit_loop = 1;
696           break;
697         }
698
699         case SDL_MOUSEBUTTONDOWN:
700         {
701           int x = event.button.x;
702           int y = event.button.y;
703
704           SDL_EventState(SDL_MOUSEMOTION, SDL_ENABLE);
705
706           TEST_SDL_BLIT_RECT(x, y);
707
708           printf("SDL_MOUSEBUTTONDOWN(%d, %d)\n", x, y);
709           break;
710         }
711
712         case SDL_MOUSEBUTTONUP:
713         {
714           int x = event.button.x;
715           int y = event.button.y;
716
717           SDL_EventState(SDL_MOUSEMOTION, SDL_IGNORE);
718
719           printf("SDL_MOUSEBUTTONUP(%d, %d)\n", x, y);
720           break;
721         }
722
723         case SDL_MOUSEMOTION:
724         {
725           int x = event.motion.x;
726           int y = event.motion.y;
727
728           TEST_SDL_BLIT_RECT(x, y);
729
730           printf("SDL_MOUSEMOTION(%d, %d)\n", x, y);
731           break;
732         }
733
734         default:
735           break;
736       }
737     }
738
739     if (!SDL_PollEvent(NULL))   /* delay only if no pending events */
740     {
741       printf("waiting...\n");
742       Delay(100);
743     }
744   }
745
746   SDL_FreeSurface(sdl_image);
747   SDL_Quit();
748 }
749
750 #endif  /* USE_SDL_LIBRARY */
751
752 /* +-----------------------------------------------------------------------+ */
753 /* | SDL TEST STUFF                                                        | */
754 /* +-----------------------------------------------------------------------+ */
755
756
757
758 int main(int argc, char *argv[])
759 {
760   program_name = (strrchr(argv[0],'/') ? strrchr(argv[0],'/') + 1 : argv[0]);
761
762 #ifdef MSDOS
763   _fmode = O_BINARY;
764 #endif
765
766   GetOptions(argv);
767   OpenAll(argc,argv);
768
769 #if 0
770 #ifdef USE_SDL_LIBRARY
771   TEST_SDL_BLIT_RECT((WIN_XSIZE - TILEX)/2, (WIN_YSIZE - TILEY)/2);
772   TEST_SDL_EVENT_LOOP();
773   exit(0);
774 #endif
775 #endif
776
777   EventLoop();
778   CloseAllAndExit(0);
779   exit(0);      /* to keep compilers happy */
780 }