new collision detection. cleanups. bug fixes. music approach patch from Ricardo.
[supertux.git] / src / title.c
1 /*
2   title.c
3   
4   Super Tux - Title Screen
5   
6   by Bill Kendrick
7   bill@newbreedsoftware.com
8   http://www.newbreedsoftware.com/supertux/
9   
10   April 11, 2000 - December 29, 2003
11 */
12
13 #include <stdio.h>
14 #include <stdlib.h>
15 #include <string.h>
16 #include <errno.h>
17 #include <unistd.h>
18 #include <SDL.h>
19 #include <SDL_image.h>
20
21 #ifdef LINUX
22 #include <pwd.h>
23 #include <sys/types.h>
24 #include <ctype.h>
25 #endif
26
27 #include "defines.h"
28 #include "globals.h"
29 #include "title.h"
30 #include "screen.h"
31 #include "high_scores.h"
32 #include "menu.h"
33 #include "texture.h"
34 #include "timer.h"
35 #include "setup.h"
36 #include "level.h"
37 #include "gameloop.h"
38 #include "leveleditor.h"
39
40 static texture_type bkg_title, img_choose_subset, anim1, anim2;
41 static SDL_Event event;
42 static SDLKey key;
43 static int quit, frame, pict, i;
44
45 void display_credits();
46
47 void draw_background()
48 {
49   /* Draw the title background: */
50
51   texture_draw_bg(&bkg_title, NO_UPDATE);
52
53   /* Animate title screen: */
54
55   pict = (frame / 5) % 3;
56
57   if (pict == 0)
58     texture_draw_part(&bkg_title, 560, 270, 560, 270, 80, 75, NO_UPDATE);
59   else if (pict == 1)
60     texture_draw(&anim1, 560, 270, NO_UPDATE);
61   else if (pict == 2)
62     texture_draw(&anim2, 560, 270, NO_UPDATE);
63 }
64
65 /* --- TITLE SCREEN --- */
66
67 int title(void)
68 {
69   int done;
70   char str[80];
71   string_list_type level_subsets;
72   st_subset subset;
73   level_subsets = dsubdirs("/levels", "info");
74
75   subset_init(&subset);
76
77   /* Reset menu variables */
78   menu_reset();
79   menu_set_current(&main_menu);
80
81   clearscreen(0, 0, 0);
82   updatescreen();
83
84   /* Load images: */
85
86   texture_load(&bkg_title,DATA_PREFIX "/images/title/title.png", IGNORE_ALPHA);
87   texture_load(&anim1,DATA_PREFIX "/images/title/title-anim2.png", IGNORE_ALPHA);
88   texture_load(&anim2,DATA_PREFIX "/images/title/title-anim1.png", IGNORE_ALPHA);
89   texture_load(&img_choose_subset,DATA_PREFIX "/images/status/choose-level-subset.png", USE_ALPHA);
90
91   /* --- Main title loop: --- */
92
93   done = 0;
94   quit = 0;
95   show_menu = 1;
96   frame = 0;
97
98   /* Draw the title background: */
99   texture_draw_bg(&bkg_title, NO_UPDATE);
100
101   load_hs();
102
103   while (!done && !quit)
104     {
105       /* Handle events: */
106
107       while (SDL_PollEvent(&event))
108         {
109           if (event.type == SDL_QUIT)
110             {
111               /* Quit event - quit: */
112               quit = 1;
113             }
114           else if (event.type == SDL_KEYDOWN)
115             {
116               /* Keypress... */
117
118               key = event.key.keysym.sym;
119
120               /* Check for menu events */
121               menu_event(&event.key.keysym);
122
123               if (key == SDLK_ESCAPE)
124                 {
125                   /* Escape: Quit: */
126
127                   quit = 1;
128                 }
129             }
130 #ifdef JOY_YES
131           else if (event.type == SDL_JOYAXISMOTION && event.jaxis.axis == JOY_Y)
132             {
133               if (event.jaxis.value > 1024)
134                 menuaction = MN_DOWN;
135               else if (event.jaxis.value < -1024)
136                 menuaction = MN_UP;
137             }
138           else if (event.type == SDL_JOYBUTTONDOWN)
139             {
140               /* Joystick button: Continue: */
141
142               menuaction = MN_HIT;
143             }
144 #endif
145
146         }
147
148       /* Draw the background: */
149       draw_background();
150
151       /* Draw the high score: */
152       sprintf(str, "High score: %d", hs_score);
153       text_drawf(&gold_text, str, 0, -40, A_HMIDDLE, A_BOTTOM, 1, NO_UPDATE);
154       sprintf(str, "by %s", hs_name);
155       text_drawf(&gold_text, str, 0, -20, A_HMIDDLE, A_BOTTOM, 1, NO_UPDATE);
156
157       /* Don't draw menu, if quit is true */
158       if(show_menu && !quit)
159         menu_process_current();
160
161       if(current_menu == &main_menu)
162         {
163           switch (menu_check(&main_menu))
164             {
165             case 2:
166               done = 0;
167               i = 0;
168               if(level_subsets.num_items != 0)
169                 {
170                   subset_load(&subset,level_subsets.item[0]);
171                   while(!done)
172                     {
173                       texture_draw(&img_choose_subset,(screen->w - img_choose_subset.w) / 2, 0, NO_UPDATE);
174                       if(level_subsets.num_items != 0)
175                         {
176                           texture_draw(&subset.image,(screen->w - subset.image.w) / 2 + 25,78,NO_UPDATE);
177                           if(level_subsets.num_items > 1)
178                             {
179                               if(i > 0)
180                                 texture_draw(&arrow_left,(screen->w / 2) - ((strlen(subset.title)+2)*16)/2,20,NO_UPDATE);
181                               if(i < level_subsets.num_items-1)
182                                 texture_draw(&arrow_right,(screen->w / 2) + ((strlen(subset.title))*16)/2,20,NO_UPDATE);
183                             }
184                           text_drawf(&gold_text, subset.title, 0, 20, A_HMIDDLE, A_TOP, 1, NO_UPDATE);
185                           text_drawf(&gold_text, subset.description, 20, -20, A_HMIDDLE, A_BOTTOM, 1, NO_UPDATE);
186                         }
187                       updatescreen();
188                       SDL_Delay(50);
189                       while(SDL_PollEvent(&event) && !done)
190                         {
191                           switch(event.type)
192                             {
193                             case SDL_QUIT:
194                               done = 1;
195                               quit = 1;
196                               break;
197                             case SDL_KEYDOWN:           // key pressed
198                               /* Keypress... */
199
200                               key = event.key.keysym.sym;
201
202                               if(key == SDLK_LEFT)
203                                 {
204                                   if(i > 0)
205                                     {
206                                       --i;
207                                       subset_free(&subset);
208                                       subset_load(&subset,level_subsets.item[i]);
209                                     }
210                                 }
211                               else if(key == SDLK_RIGHT)
212                                 {
213                                   if(i < level_subsets.num_items -1)
214                                     {
215                                       ++i;
216                                       subset_free(&subset);
217                                       subset_load(&subset,level_subsets.item[i]);
218                                     }
219                                 }
220                               else if(key == SDLK_SPACE || key == SDLK_RETURN)
221                                 {
222                                   done = YES;
223                                   quit = gameloop(subset.name,1,ST_GL_PLAY);
224                                   subset_free(&subset);
225                                 }
226                               else if(key == SDLK_ESCAPE)
227                                 {
228                                   done = YES;
229                                 }
230                               break;
231                             default:
232                               break;
233                             }
234                         }
235                     }
236                 }
237               break;
238             case 3:
239               update_load_save_game_menu(&load_game_menu, YES);
240               break;
241             case 5:
242               done = 1;
243               quit = leveleditor(1);
244               break;
245             case 6:
246               display_credits();
247               break;
248             case 8:
249               quit = 1;
250               break;
251             }
252         }
253       else if(current_menu == &options_menu)
254         {
255           process_options_menu();
256         }
257       else if(current_menu == &load_game_menu)
258         {
259           process_save_load_game_menu(NO);
260         }
261
262       flipscreen();
263
264       /* Pause: */
265       frame++;
266       SDL_Delay(50);
267
268     }
269   /* Free surfaces: */
270
271   texture_free(&bkg_title);
272   texture_free(&anim1);
273   texture_free(&anim2);
274   string_list_free(&level_subsets);
275
276   /* Return to main! */
277
278   return(quit);
279 }
280
281 void display_credits()
282 {
283   int done;
284   int scroll, speed;
285   timer_type timer;
286   int n,d;
287   int length;
288   FILE* fi;
289   char temp[1024];
290   string_list_type names;
291   char filename[1024];
292   string_list_init(&names);
293   sprintf(filename,"%s/CREDITS",DATA_PREFIX);
294   if((fi = fopen(filename,"r")) != NULL)
295     {
296       while(fgets(temp, sizeof(temp), fi) != NULL)
297         {
298           temp[strlen(temp)-1]='\0';
299           string_list_add_item(&names,temp);
300         }
301       fclose(fi);
302     }
303     else
304     {
305     string_list_add_item(&names,"Credits were not found!");
306     string_list_add_item(&names,"Shame on the guy, who");
307     string_list_add_item(&names,"forgot to include them");
308     string_list_add_item(&names,"in your SuperTux distribution.");
309     }
310
311
312   timer_init(&timer, SDL_GetTicks());
313   timer_start(&timer, 50);
314
315   scroll = 0;
316   speed = 1;
317   done = 0;
318
319   n = d = 0;
320
321   length = names.num_items;
322
323   SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
324
325   while(done == 0)
326     {
327       /* in case of input, exit */
328       while(SDL_PollEvent(&event))
329         switch(event.type)
330           {
331           case SDL_KEYDOWN:
332             switch(event.key.keysym.sym)
333               {
334               case SDLK_DOWN:
335                 speed -= 1;
336                 break;
337               case SDLK_UP:
338                 speed += 1;
339                 break;
340               case SDLK_SPACE:
341               case SDLK_RETURN:
342                 if(speed >= 0)
343                   scroll += 60;
344                 break;
345               case SDLK_ESCAPE:
346                 done = 1;
347                 break;
348               default:
349                 break;
350               }
351             break;
352           case SDL_QUIT:
353             done = 1;
354             break;
355           default:
356             break;
357           }
358
359       /* draw the credits */
360
361       draw_background();
362
363       text_drawf(&white_big_text, "- Credits -", 0, screen->h-scroll, A_HMIDDLE, A_TOP, 2, NO_UPDATE);
364
365       for(i = 0, n = 0, d = 0; i < length; i++,n++,d++)
366         {
367           if(names.item[i] == "")
368             n--;
369           else
370             {
371               if(names.item[i][0] == ' ')
372                 text_drawf(&white_small_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll-10, A_HMIDDLE, A_TOP, 1, NO_UPDATE);
373               else if(names.item[i][0] == '     ')
374                 text_drawf(&white_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll, A_HMIDDLE, A_TOP, 1, NO_UPDATE);
375               else if(names.item[i+1][0] == '-' || names.item[i][0] == '-')
376                 text_drawf(&white_big_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll, A_HMIDDLE, A_TOP, 3, NO_UPDATE);
377               else
378                 text_drawf(&blue_text, names.item[i], 0, 60+screen->h+(n*18)+(d*18)-scroll, A_HMIDDLE, A_TOP, 1, NO_UPDATE);
379             }
380         }
381     
382       
383       texture_draw_part(&bkg_title, 0, 0, 0, 0, 640, 130, NO_UPDATE);
384
385       flipscreen();
386
387       if(60+screen->h+(n*18)+(d*18)-scroll < 0 && 20+60+screen->h+(n*18)+(d*18)-scroll < 0)
388         done = 1;
389
390       scroll += speed;
391       if(scroll < 0)
392         scroll = 0;
393
394       SDL_Delay(35);
395
396       if(timer_get_left(&timer) < 0)
397         {
398           frame++;
399           timer_start(&timer, 50);
400         }
401     }
402   string_list_free(&names);
403
404   SDL_EnableKeyRepeat(0, 0);    // disables key repeating
405   show_menu = 1;
406   menu_set_current(&main_menu);
407 }