Split object/block.?pp
[supertux.git] / src / object / bonus_block.cpp
1 //  SuperTux
2 //  Copyright (C) 2009 Ingo Ruhnke <grumbel@gmx.de>
3 //
4 //  This program is free software: you can redistribute it and/or modify
5 //  it under the terms of the GNU General Public License as published by
6 //  the Free Software Foundation, either version 3 of the License, or
7 //  (at your option) any later version.
8 //
9 //  This program is distributed in the hope that it will be useful,
10 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
11 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 //  GNU General Public License for more details.
13 //
14 //  You should have received a copy of the GNU General Public License
15 //  along with this program.  If not, see <http://www.gnu.org/licenses/>.
16
17 #include "object/bonus_block.hpp"
18
19 #include "audio/sound_manager.hpp"
20 #include "badguy/badguy.hpp"
21 #include "lisp/list_iterator.hpp"
22 #include "object/broken_brick.hpp"
23 #include "object/coin.hpp"
24 #include "object/flower.hpp"
25 #include "object/bouncy_coin.hpp"
26 #include "object/growup.hpp"
27 #include "object/oneup.hpp"
28 #include "object/player.hpp"
29 #include "object/portable.hpp"
30 #include "object/specialriser.hpp"
31 #include "object/star.hpp"
32 #include "sprite/sprite_manager.hpp"
33 #include "supertux/constants.hpp"
34 #include "supertux/level.hpp"
35 #include "supertux/object_factory.hpp"
36 #include "supertux/sector.hpp"
37
38 BonusBlock::BonusBlock(const Vector& pos, int data) :
39   Block(sprite_manager->create("images/objects/bonus_block/bonusblock.sprite")), 
40   contents(),
41   object(0)
42 {
43   bbox.set_pos(pos);
44   sprite->set_action("normal");
45   switch(data) {
46     case 1: contents = CONTENT_COIN; break;
47     case 2: contents = CONTENT_FIREGROW; break;
48     case 3: contents = CONTENT_STAR; break;
49     case 4: contents = CONTENT_1UP; break;
50     case 5: contents = CONTENT_ICEGROW; break;
51     default:
52       log_warning << "Invalid box contents" << std::endl;
53       contents = CONTENT_COIN;
54       break;
55   }
56 }
57
58 BonusBlock::BonusBlock(const Reader& lisp) :
59   Block(sprite_manager->create("images/objects/bonus_block/bonusblock.sprite")),
60   contents(),
61   object(0)
62 {
63   Vector pos;
64
65   contents = CONTENT_COIN;
66   lisp::ListIterator iter(&lisp);
67   while(iter.next()) {
68     const std::string& token = iter.item();
69     if(token == "x") {
70       iter.value()->get(pos.x);
71     } else if(token == "y") {
72       iter.value()->get(pos.y);
73     } else if(token == "contents") {
74       std::string contentstring;
75       iter.value()->get(contentstring);
76       if(contentstring == "coin") {
77         contents = CONTENT_COIN;
78       } else if(contentstring == "firegrow") {
79         contents = CONTENT_FIREGROW;
80       } else if(contentstring == "icegrow") {
81         contents = CONTENT_ICEGROW;
82       } else if(contentstring == "star") {
83         contents = CONTENT_STAR;
84       } else if(contentstring == "1up") {
85         contents = CONTENT_1UP;
86       } else if(contentstring == "custom") {
87         contents = CONTENT_CUSTOM;
88       } else {
89         log_warning << "Invalid box contents '" << contentstring << "'" << std::endl;
90       }
91     } else {
92       if(contents == CONTENT_CUSTOM) {
93         GameObject* game_object = create_object(token, *(iter.lisp()));
94         object = dynamic_cast<MovingObject*> (game_object);
95         if(object == 0)
96           throw std::runtime_error(
97             "Only MovingObjects are allowed inside BonusBlocks");
98       } else {
99         log_warning << "Invalid element '" << token << "' in bonusblock" << std::endl;
100       }
101     }
102   }
103
104   if(contents == CONTENT_CUSTOM && object == 0)
105     throw std::runtime_error("Need to specify content object for custom block");
106
107   bbox.set_pos(pos);
108 }
109
110 BonusBlock::~BonusBlock()
111 {
112   delete object;
113 }
114
115 void
116 BonusBlock::hit(Player& )
117 {
118   try_open();
119 }
120
121 HitResponse
122 BonusBlock::collision(GameObject& other, const CollisionHit& hit){
123
124   Player* player = dynamic_cast<Player*> (&other);
125   if (player) {
126     if (player->does_buttjump) try_open();
127   }
128
129   BadGuy* badguy = dynamic_cast<BadGuy*> (&other);
130   if(badguy) {
131     // hit contains no information for collisions with blocks.
132     // Badguy's bottom has to be below the top of the block
133     // SHIFT_DELTA is required to slide over one tile gaps.
134     if( badguy->can_break() && ( badguy->get_bbox().get_bottom() > get_bbox().get_top() + SHIFT_DELTA ) ){
135       try_open();
136     }
137   }
138   Portable* portable = dynamic_cast<Portable*> (&other);
139   if(portable) {
140     MovingObject* moving = dynamic_cast<MovingObject*> (&other);
141     if(moving->get_bbox().get_top() > get_bbox().get_bottom() - SHIFT_DELTA) {
142       try_open();
143     }
144   }
145   return Block::collision(other, hit);
146 }
147
148 void
149 BonusBlock::try_open()
150 {
151   if(sprite->get_action() == "empty") {
152     sound_manager->play("sounds/brick.wav");
153     return;
154   }
155
156   Sector* sector = Sector::current();
157   assert(sector);
158   assert(sector->player);
159   Player& player = *(sector->player);
160   Direction direction = (player.get_bbox().get_middle().x > get_bbox().get_middle().x) ? LEFT : RIGHT;
161
162   switch(contents) {
163     case CONTENT_COIN:
164       Sector::current()->add_object(new BouncyCoin(get_pos(), true));
165       player.get_status()->add_coins(1);
166       Sector::current()->get_level()->stats.coins++;
167       break;
168
169     case CONTENT_FIREGROW:
170       if(player.get_status()->bonus == NO_BONUS) {
171         SpecialRiser* riser = new SpecialRiser(get_pos(), new GrowUp(direction));
172         sector->add_object(riser);
173       } else {
174         SpecialRiser* riser = new SpecialRiser(
175           get_pos(), new Flower(FIRE_BONUS));
176         sector->add_object(riser);
177       }
178       sound_manager->play("sounds/upgrade.wav");
179       break;
180
181     case CONTENT_ICEGROW:
182       if(player.get_status()->bonus == NO_BONUS) {
183         SpecialRiser* riser = new SpecialRiser(get_pos(), new GrowUp(direction));
184         sector->add_object(riser);
185       } else {
186         SpecialRiser* riser = new SpecialRiser(
187           get_pos(), new Flower(ICE_BONUS));
188         sector->add_object(riser);
189       }
190       sound_manager->play("sounds/upgrade.wav");
191       break;
192
193     case CONTENT_STAR:
194       sector->add_object(new Star(get_pos() + Vector(0, -32), direction));
195       break;
196
197     case CONTENT_1UP:
198       sector->add_object(new OneUp(get_pos(), direction));
199       break;
200
201     case CONTENT_CUSTOM:
202       SpecialRiser* riser = new SpecialRiser(get_pos(), object);
203       object = 0;
204       sector->add_object(riser);
205       sound_manager->play("sounds/upgrade.wav");
206       break;
207   }
208
209   start_bounce(&player);
210   sprite->set_action("empty");
211 }
212
213 void
214 Block::break_me()
215 {
216   Sector* sector = Sector::current();
217   sector->add_object(
218     new BrokenBrick(std::auto_ptr<Sprite>(new Sprite(*sprite)), get_pos(), Vector(-100, -400)));
219   sector->add_object(
220     new BrokenBrick(std::auto_ptr<Sprite>(new Sprite(*sprite)), get_pos() + Vector(0, 16),
221                     Vector(-150, -300)));
222   sector->add_object(
223     new BrokenBrick(std::auto_ptr<Sprite>(new Sprite(*sprite)), get_pos() + Vector(16, 0),
224                     Vector(100, -400)));
225   sector->add_object(
226     new BrokenBrick(std::auto_ptr<Sprite>(new Sprite(*sprite)), get_pos() + Vector(16, 16),
227                     Vector(150, -300)));
228   remove_me();
229 }
230
231 IMPLEMENT_FACTORY(BonusBlock, "bonusblock");
232
233 /* EOF */