Cleanups. Basically I made sprites to care about the scrolling and not the player...
[supertux.git] / src / world.cpp
1 //  $Id$
2 // 
3 //  SuperTux
4 //  Copyright (C) 2000 Bill Kendrick <bill@newbreedsoftware.com>
5 //  Copyright (C) 2004 Tobias Glaesser <tobi.web@gmx.de>
6 //  Copyright (C) 2004 Ingo Ruhnke <grumbel@gmx.de>
7 //
8 //  This program is free software; you can redistribute it and/or
9 //  modify it under the terms of the GNU General Public License
10 //  as published by the Free Software Foundation; either version 2
11 //  of the License, or (at your option) any later version.
12 //
13 //  This program is distributed in the hope that it will be useful,
14 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
15 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 //  GNU General Public License for more details.
17 // 
18 //  You should have received a copy of the GNU General Public License
19 //  along with this program; if not, write to the Free Software
20 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
21 //  02111-1307, USA.
22
23 #include <iostream>
24 #include <math.h>
25 #include <stdlib.h>
26 #include <string.h>
27 #include "globals.h"
28 #include "scene.h"
29 #include "screen.h"
30 #include "defines.h"
31 #include "world.h"
32 #include "level.h"
33 #include "tile.h"
34 #include "resources.h"
35
36 Surface* img_distro[4];
37
38 World* World::current_ = 0;
39
40 World::World(const std::string& filename)
41 {
42   // FIXME: Move this to action and draw and everywhere else where the
43   // world calls child functions
44   current_ = this;
45
46   level = new Level(filename);
47   tux.init();
48
49   set_defaults();
50
51   get_level()->load_gfx();
52   activate_bad_guys();
53   activate_particle_systems();
54   get_level()->load_song();
55
56   apply_bonuses();
57
58   scrolling_timer.init(true);
59 }
60
61 World::World(const std::string& subset, int level_nr)
62 {
63   // FIXME: Move this to action and draw and everywhere else where the
64   // world calls child functions
65   current_ = this;
66
67   level = new Level(subset, level_nr);
68   tux.init();
69
70   set_defaults();
71
72   get_level()->load_gfx();
73   activate_bad_guys();
74   activate_particle_systems();
75   get_level()->load_song();
76
77   apply_bonuses();
78
79   scrolling_timer.init(true);
80 }
81
82 void
83 World::apply_bonuses()
84 {
85   // Apply bonuses from former levels
86   switch (player_status.bonus)
87     {
88     case PlayerStatus::NO_BONUS:
89       break;
90
91     case PlayerStatus::FLOWER_BONUS:
92       tux.got_coffee = true;
93       // fall through
94
95     case PlayerStatus::GROWUP_BONUS:
96       // FIXME: Move this to Player class
97       tux.size = BIG;
98       tux.base.height = 64;
99       tux.base.y -= 32;
100       break;
101     }
102 }
103
104 World::~World()
105 {
106   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end(); ++i)
107     delete *i;
108
109   for (ParticleSystems::iterator i = particle_systems.begin();
110           i != particle_systems.end(); ++i)
111     delete *i;
112
113   for (std::vector<BouncyDistro*>::iterator i = bouncy_distros.begin();
114        i != bouncy_distros.end(); ++i)
115     delete *i;
116   
117   for (std::vector<BrokenBrick*>::iterator i = broken_bricks.begin();
118        i != broken_bricks.end(); ++i)
119     delete *i;
120   
121   for (std::vector<BouncyBrick*>::iterator i = bouncy_bricks.begin();
122        i != bouncy_bricks.end(); ++i)
123     delete *i;
124
125   for (std::vector<FloatingScore*>::iterator i = floating_scores.begin();
126        i != floating_scores.end(); ++i)
127     delete *i;
128   
129   delete level;
130 }
131
132 void
133 World::set_defaults()
134 {
135   // Set defaults: 
136   scroll_x = 0;
137
138   player_status.score_multiplier = 1;
139
140   counting_distros = false;
141   distro_counter = 0;
142
143   /* set current song/music */
144   currentmusic = LEVEL_MUSIC;
145 }
146
147 void
148 World::activate_bad_guys()
149 {
150   for (std::vector<BadGuyData>::iterator i = level->badguy_data.begin();
151        i != level->badguy_data.end();
152        ++i)
153     {
154       add_bad_guy(i->x, i->y, i->kind, i->stay_on_platform);
155     }
156 }
157
158 void
159 World::activate_particle_systems()
160 {
161   if (level->particle_system == "clouds")
162     {
163       particle_systems.push_back(new CloudParticleSystem);
164     }
165   else if (level->particle_system == "snow")
166     {
167       particle_systems.push_back(new SnowParticleSystem);
168     }
169   else if (level->particle_system != "")
170     {
171       st_abort("unknown particle system specified in level", "");
172     }
173 }
174
175 void
176 World::draw()
177 {
178   int y,x;
179
180   /* Draw the real background */
181   if(level->img_bkgd)
182     {
183       int s = (int)((float)scroll_x * ((float)level->bkgd_speed/100.0f)) % screen->w;
184       level->img_bkgd->draw_part(s, 0,0,0,level->img_bkgd->w - s, level->img_bkgd->h);
185       level->img_bkgd->draw_part(0, 0,screen->w - s ,0,s,level->img_bkgd->h);
186     }
187   else
188     {
189       drawgradient(level->bkgd_top, level->bkgd_bottom);
190     }
191     
192   /* Draw particle systems (background) */
193   std::vector<ParticleSystem*>::iterator p;
194   for(p = particle_systems.begin(); p != particle_systems.end(); ++p)
195     {
196       (*p)->draw(scroll_x, 0, 0);
197     }
198
199   /* Draw background: */
200   for (y = 0; y < 15; ++y)
201     {
202       for (x = 0; x < 21; ++x)
203         {
204           Tile::draw(32*x - fmodf(scroll_x, 32), y * 32,
205                      level->bg_tiles[(int)y + (int)(scroll_y / 32)][(int)x + (int)(scroll_x / 32)]);
206         }
207     }
208
209   /* Draw interactive tiles: */
210   for (y = 0; y < 15; ++y)
211     {
212       for (x = 0; x < 21; ++x)
213         {
214           Tile::draw(32*x - fmodf(scroll_x, 32), y * 32,
215                      level->ia_tiles[(int)y + (int)(scroll_y / 32)][(int)x + (int)(scroll_x / 32)]);
216         }
217     }
218
219   /* (Bouncy bricks): */
220   for (unsigned int i = 0; i < bouncy_bricks.size(); ++i)
221     bouncy_bricks[i]->draw();
222
223   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end(); ++i)
224     (*i)->draw();
225
226   tux.draw();
227
228   for (unsigned int i = 0; i < bullets.size(); ++i)
229     bullets[i].draw();
230
231   for (unsigned int i = 0; i < floating_scores.size(); ++i)
232     floating_scores[i]->draw();
233
234   for (unsigned int i = 0; i < upgrades.size(); ++i)
235     upgrades[i].draw();
236
237   for (unsigned int i = 0; i < bouncy_distros.size(); ++i)
238     bouncy_distros[i]->draw();
239
240   for (unsigned int i = 0; i < broken_bricks.size(); ++i)
241     broken_bricks[i]->draw();
242
243   /* Draw foreground: */
244   for (y = 0; y < 15; ++y)
245     {
246       for (x = 0; x < 21; ++x)
247         {
248           Tile::draw(32*x - fmodf(scroll_x, 32), y * 32,
249                      level->fg_tiles[(int)y + (int)(scroll_y / 32)][(int)x + (int)(scroll_x / 32)]);
250         }
251     }
252
253   /* Draw particle systems (foreground) */
254   for(p = particle_systems.begin(); p != particle_systems.end(); ++p)
255     {
256       (*p)->draw(scroll_x, 0, 1);
257     }
258 }
259
260 void
261 World::action(double frame_ratio)
262 {
263   tux.action(frame_ratio);
264   tux.check_bounds(level->back_scrolling, (bool)level->hor_autoscroll_speed);
265   scrolling(frame_ratio);
266
267   /* Handle bouncy distros: */
268   for (unsigned int i = 0; i < bouncy_distros.size(); i++)
269     bouncy_distros[i]->action(frame_ratio);
270
271   /* Handle broken bricks: */
272   for (unsigned int i = 0; i < broken_bricks.size(); i++)
273     broken_bricks[i]->action(frame_ratio);
274
275   // Handle all kinds of game objects
276   for (unsigned int i = 0; i < bouncy_bricks.size(); i++)
277     bouncy_bricks[i]->action(frame_ratio);
278   
279   for (unsigned int i = 0; i < floating_scores.size(); i++)
280     floating_scores[i]->action(frame_ratio);
281
282   for (unsigned int i = 0; i < bullets.size(); ++i)
283     bullets[i].action(frame_ratio);
284   
285   for (unsigned int i = 0; i < upgrades.size(); i++)
286     upgrades[i].action(frame_ratio);
287
288   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end(); ++i)
289     (*i)->action(frame_ratio);
290
291   /* update particle systems */
292   std::vector<ParticleSystem*>::iterator p;
293   for(p = particle_systems.begin(); p != particle_systems.end(); ++p)
294     {
295       (*p)->simulate(frame_ratio);
296     }
297
298   /* Handle all possible collisions. */
299   collision_handler();
300   
301   // Cleanup marked badguys
302   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end();
303       /* ++i handled at end of the loop */) {
304     if ((*i)->is_removable()) {
305       delete *i;
306       i =  bad_guys.erase(i);
307     } else {
308       ++i;
309     }
310   }
311 }
312
313 // the space that it takes for the screen to start scrolling, regarding
314 // screen bounds (in pixels)
315 #define X_SPACE (400-16)
316 // the time it takes to move the camera (in ms)
317 #define CHANGE_DIR_SCROLL_SPEED 2000
318
319 /* This functions takes cares of the scrolling */
320 void World::scrolling(double frame_ratio)
321 {
322   if(level->hor_autoscroll_speed)
323     {
324     scroll_x += level->hor_autoscroll_speed * frame_ratio;
325     return;
326     }
327
328   float tux_pos_x = tux.base.x + (tux.base.width/2);
329
330   if (level->back_scrolling || debug_mode)
331   {
332     if(tux.old_dir != tux.dir && level->back_scrolling)
333       scrolling_timer.start(CHANGE_DIR_SCROLL_SPEED);
334
335     if(scrolling_timer.check())
336     {
337       float final_scroll_x;
338       if (tux.physic.get_velocity_x() > 0)
339         final_scroll_x = tux_pos_x - (screen->w - X_SPACE);
340       else if (tux.physic.get_velocity_x() < 0)
341         final_scroll_x = tux_pos_x - X_SPACE;
342       else
343       {
344         if (tux.dir == RIGHT)
345           final_scroll_x = tux_pos_x - (screen->w - X_SPACE);
346         else if (tux.dir == LEFT && level->back_scrolling)
347           final_scroll_x = tux_pos_x - X_SPACE;
348       }
349
350       scroll_x +=   (final_scroll_x - scroll_x)
351                   / (frame_ratio * (CHANGE_DIR_SCROLL_SPEED / 100))
352                   + (tux.physic.get_velocity_x() * frame_ratio + tux.physic.get_acceleration_x() * frame_ratio * frame_ratio);
353       // std::cerr << tux_pos_x << " " << final_scroll_x << " " << scroll_x << std::endl;
354
355     }
356     else
357     {
358       if (tux.physic.get_velocity_x() > 0 && scroll_x < tux_pos_x - (screen->w - X_SPACE))
359         scroll_x = tux_pos_x - (screen->w - X_SPACE);
360       else if (tux.physic.get_velocity_x() < 0 && scroll_x > tux_pos_x - X_SPACE && level->back_scrolling)
361         scroll_x = tux_pos_x - X_SPACE;
362       else
363       {
364         if (tux.dir == RIGHT && scroll_x < tux_pos_x - (screen->w - X_SPACE))
365             scroll_x = tux_pos_x - (screen->w - X_SPACE);
366         else if (tux.dir == LEFT && scroll_x > tux_pos_x - X_SPACE && level->back_scrolling)
367             scroll_x = tux_pos_x - X_SPACE;
368       }
369     }
370   }
371
372   else /*no debug*/
373   {
374     if (tux.physic.get_velocity_x() > 0 && scroll_x < tux_pos_x - (screen->w - X_SPACE))
375       scroll_x = tux_pos_x - (screen->w - X_SPACE);
376     else if (tux.physic.get_velocity_x() < 0 && scroll_x > tux_pos_x - X_SPACE && level->back_scrolling)
377       scroll_x = tux_pos_x - X_SPACE;
378     else
379     {
380       if (tux.dir == RIGHT && scroll_x < tux_pos_x - (screen->w - X_SPACE))
381           scroll_x = tux_pos_x - (screen->w - X_SPACE);
382       else if (tux.dir == LEFT && scroll_x > tux_pos_x - X_SPACE && level->back_scrolling)
383           scroll_x = tux_pos_x - X_SPACE;
384     }
385
386   }
387
388   // this code prevent the screen to scroll before the start or after the level's end
389   if(scroll_x < 0)
390     scroll_x = 0;
391   if(scroll_x > level->width * 32 - screen->w)
392     scroll_x = level->width * 32 - screen->w;
393
394   /* Y-axis scrolling */
395
396   float tux_pos_y = tux.base.y + (tux.base.height/2);
397
398   scroll_y = tux_pos_y - (screen->h / 2);
399
400   // this code prevent the screen to scroll before the start or after the level's end
401   if(scroll_y < 0)
402     scroll_y = 0;
403   if(scroll_y > level->height * 32 - screen->h)
404     scroll_y = level->height * 32 - screen->h;
405 }
406
407 void
408 World::collision_handler()
409 {
410   // CO_BULLET & CO_BADGUY check
411   for(unsigned int i = 0; i < bullets.size(); ++i)
412     {
413       for (BadGuys::iterator j = bad_guys.begin(); j != bad_guys.end(); ++j)
414         {
415           if((*j)->dying != DYING_NOT)
416             continue;
417           
418           if(rectcollision(bullets[i].base, (*j)->base))
419             {
420               // We have detected a collision and now call the
421               // collision functions of the collided objects.
422               // collide with bad_guy first, since bullet_collision will
423               // delete the bullet
424               (*j)->collision(0, CO_BULLET);
425               bullets[i].collision(CO_BADGUY);
426               break; // bullet is invalid now, so break
427             }
428         }
429     }
430
431   /* CO_BADGUY & CO_BADGUY check */
432   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end(); ++i)
433     {
434       if((*i)->dying != DYING_NOT)
435         continue;
436       
437       BadGuys::iterator j = i;
438       ++j;
439       for (; j != bad_guys.end(); ++j)
440         {
441           if(j == i || (*j)->dying != DYING_NOT)
442             continue;
443
444           if(rectcollision((*i)->base, (*j)->base))
445             {
446               // We have detected a collision and now call the
447               // collision functions of the collided objects.
448               (*j)->collision(*i, CO_BADGUY);
449               (*i)->collision(*j, CO_BADGUY);
450             }
451         }
452     }
453
454   if(tux.dying != DYING_NOT) return;
455     
456   // CO_BADGUY & CO_PLAYER check 
457   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end(); ++i)
458     {
459       if((*i)->dying != DYING_NOT)
460         continue;
461       
462       if(rectcollision_offset((*i)->base, tux.base, 0, 0))
463         {
464           // We have detected a collision and now call the collision
465           // functions of the collided objects.
466           if (tux.previous_base.y < tux.base.y &&
467               tux.previous_base.y + tux.previous_base.height 
468               < (*i)->base.y + (*i)->base.height/2
469               && !tux.invincible_timer.started())
470             {
471               (*i)->collision(&tux, CO_PLAYER, COLLISION_SQUISH);
472             }
473           else
474             {
475               tux.collision(*i, CO_BADGUY);
476               (*i)->collision(&tux, CO_PLAYER, COLLISION_NORMAL);
477             }
478         }
479     }
480
481   // CO_UPGRADE & CO_PLAYER check
482   for(unsigned int i = 0; i < upgrades.size(); ++i)
483     {
484       if(rectcollision(upgrades[i].base, tux.base))
485         {
486           // We have detected a collision and now call the collision
487           // functions of the collided objects.
488           upgrades[i].collision(&tux, CO_PLAYER, COLLISION_NORMAL);
489         }
490     }
491 }
492
493 void
494 World::add_score(float x, float y, int s)
495 {
496   player_status.score += s;
497
498   FloatingScore* new_floating_score = new FloatingScore();
499   new_floating_score->init(x-scroll_x, y-scroll_y, s);
500   floating_scores.push_back(new_floating_score);
501 }
502
503 void
504 World::add_bouncy_distro(float x, float y)
505 {
506   BouncyDistro* new_bouncy_distro = new BouncyDistro();
507   new_bouncy_distro->init(x, y);
508   bouncy_distros.push_back(new_bouncy_distro);
509 }
510
511 void
512 World::add_broken_brick(Tile* tile, float x, float y)
513 {
514   add_broken_brick_piece(tile, x, y, -1, -4);
515   add_broken_brick_piece(tile, x, y + 16, -1.5, -3);
516
517   add_broken_brick_piece(tile, x + 16, y, 1, -4);
518   add_broken_brick_piece(tile, x + 16, y + 16, 1.5, -3);
519 }
520
521 void
522 World::add_broken_brick_piece(Tile* tile, float x, float y, float xm, float ym)
523 {
524   BrokenBrick* new_broken_brick = new BrokenBrick();
525   new_broken_brick->init(tile, x, y, xm, ym);
526   broken_bricks.push_back(new_broken_brick);
527 }
528
529 void
530 World::add_bouncy_brick(float x, float y)
531 {
532   BouncyBrick* new_bouncy_brick = new BouncyBrick();
533   new_bouncy_brick->init(x,y);
534   bouncy_bricks.push_back(new_bouncy_brick);
535 }
536
537 BadGuy*
538 World::add_bad_guy(float x, float y, BadGuyKind kind, bool stay_on_platform)
539 {
540   BadGuy* badguy = new BadGuy(x,y,kind, stay_on_platform);
541   bad_guys.push_back(badguy);
542   return badguy;
543 }
544
545 void
546 World::add_upgrade(float x, float y, Direction dir, UpgradeKind kind)
547 {
548   Upgrade new_upgrade;
549   new_upgrade.init(x,y,dir,kind);
550   upgrades.push_back(new_upgrade);
551 }
552
553 void 
554 World::add_bullet(float x, float y, float xm, Direction dir)
555 {
556   if(bullets.size() > MAX_BULLETS-1)
557     return;
558
559   Bullet new_bullet;
560   new_bullet.init(x,y,xm,dir);
561   bullets.push_back(new_bullet);
562   
563   play_sound(sounds[SND_SHOOT], SOUND_CENTER_SPEAKER);
564 }
565
566 void
567 World::play_music(int musictype)
568 {
569   currentmusic = musictype;
570   switch(currentmusic) {
571     case HURRYUP_MUSIC:
572       music_manager->play_music(get_level()->get_level_music_fast());
573       break;
574     case LEVEL_MUSIC:
575       music_manager->play_music(get_level()->get_level_music());
576       break;
577     case HERRING_MUSIC:
578       music_manager->play_music(herring_song);
579       break;
580     default:
581       music_manager->halt_music();
582       break;
583   }
584 }
585
586 int
587 World::get_music_type()
588 {
589   return currentmusic;
590 }
591
592 /* Break a brick: */
593 void
594 World::trybreakbrick(float x, float y, bool small)
595 {
596   Level* plevel = get_level();
597   
598   Tile* tile = gettile(x, y);
599   if (tile->brick)
600     {
601       if (tile->data > 0)
602         {
603           /* Get a distro from it: */
604           add_bouncy_distro(((int)(x + 1) / 32) * 32,
605                                   (int)(y / 32) * 32);
606
607           // TODO: don't handle this in a global way but per-tile...
608           if (!counting_distros)
609             {
610               counting_distros = true;
611               distro_counter = 5;
612             }
613           else
614             {
615               distro_counter--;
616             }
617
618           if (distro_counter <= 0)
619             {
620               counting_distros = false;
621               plevel->change(x, y, TM_IA, tile->next_tile);
622             }
623
624           play_sound(sounds[SND_DISTRO], SOUND_CENTER_SPEAKER);
625           player_status.score = player_status.score + SCORE_DISTRO;
626           player_status.distros++;
627         }
628       else if (!small)
629         {
630           /* Get rid of it: */
631           plevel->change(x, y, TM_IA, tile->next_tile);
632           
633           /* Replace it with broken bits: */
634           add_broken_brick(tile, 
635                                  ((int)(x + 1) / 32) * 32,
636                                  (int)(y / 32) * 32);
637           
638           /* Get some score: */
639           play_sound(sounds[SND_BRICK], SOUND_CENTER_SPEAKER);
640           player_status.score = player_status.score + SCORE_BRICK;
641         }
642     }
643 }
644
645 /* Empty a box: */
646 void
647 World::tryemptybox(float x, float y, Direction col_side)
648 {
649   Tile* tile = gettile(x,y);
650   if (!tile->fullbox)
651     return;
652
653   // according to the collision side, set the upgrade direction
654   if(col_side == LEFT)
655     col_side = RIGHT;
656   else
657     col_side = LEFT;
658
659   int posx = ((int)(x+1) / 32) * 32;
660   int posy = (int)(y/32) * 32 - 32;
661   switch(tile->data)
662     {
663     case 1: // Box with a distro!
664       add_bouncy_distro(posx, posy);
665       play_sound(sounds[SND_DISTRO], SOUND_CENTER_SPEAKER);
666       player_status.score = player_status.score + SCORE_DISTRO;
667       player_status.distros++;
668       break;
669
670     case 2: // Add an upgrade!
671       if (tux.size == SMALL)     /* Tux is small, add mints! */
672         add_upgrade(posx, posy, col_side, UPGRADE_GROWUP);
673       else     /* Tux is big, add an iceflower: */
674         add_upgrade(posx, posy, col_side, UPGRADE_ICEFLOWER);
675       play_sound(sounds[SND_UPGRADE], SOUND_CENTER_SPEAKER);
676       break;
677
678     case 3: // Add a golden herring
679       add_upgrade(posx, posy, col_side, UPGRADE_HERRING);
680       break;
681
682     case 4: // Add a 1up extra
683       add_upgrade(posx, posy, col_side, UPGRADE_1UP);
684       break;
685     default:
686       break;
687     }
688
689   /* Empty the box: */
690   level->change(x, y, TM_IA, tile->next_tile);
691 }
692
693 /* Try to grab a distro: */
694 void
695 World::trygrabdistro(float x, float y, int bounciness)
696 {
697   Tile* tile = gettile(x, y);
698   if (tile && tile->distro)
699     {
700       level->change(x, y, TM_IA, tile->next_tile);
701       play_sound(sounds[SND_DISTRO], SOUND_CENTER_SPEAKER);
702
703       if (bounciness == BOUNCE)
704         {
705           add_bouncy_distro(((int)(x + 1) / 32) * 32,
706                                   (int)(y / 32) * 32);
707         }
708
709       player_status.score = player_status.score + SCORE_DISTRO;
710       player_status.distros++;
711     }
712 }
713
714 /* Try to bump a bad guy from below: */
715 void
716 World::trybumpbadguy(float x, float y)
717 {
718   // Bad guys: 
719   for (BadGuys::iterator i = bad_guys.begin(); i != bad_guys.end(); ++i)
720     {
721       if ((*i)->base.x >= x - 32 && (*i)->base.x <= x + 32 &&
722           (*i)->base.y >= y - 16 && (*i)->base.y <= y + 16)
723         {
724           (*i)->collision(&tux, CO_PLAYER, COLLISION_BUMP);
725         }
726     }
727
728   // Upgrades:
729   for (unsigned int i = 0; i < upgrades.size(); i++)
730     {
731       if (upgrades[i].base.height == 32 &&
732           upgrades[i].base.x >= x - 32 && upgrades[i].base.x <= x + 32 &&
733           upgrades[i].base.y >= y - 16 && upgrades[i].base.y <= y + 16)
734         {
735           upgrades[i].collision(&tux, CO_PLAYER, COLLISION_BUMP);
736         }
737     }
738 }
739
740 /* EOF */
741