4 // Copyright (C) 2006 Matthias Braun <matze@braunis.de>
6 // This program is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU General Public License
8 // as published by the Free Software Foundation; either version 2
9 // of the License, or (at your option) any later version.
11 // This program is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 // GNU General Public License for more details.
16 // You should have received a copy of the GNU General Public License
17 // along with this program; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
22 #include "dispenser.hpp"
23 #include "badguy/bouncing_snowball.hpp"
24 #include "badguy/snowball.hpp"
25 #include "badguy/mrbomb.hpp"
26 #include "badguy/mriceblock.hpp"
27 #include "badguy/mrrocket.hpp"
28 #include "badguy/poisonivy.hpp"
29 #include "badguy/snail.hpp"
30 #include "badguy/skullyhop.hpp"
31 #include "random_generator.hpp"
33 Dispenser::Dispenser(const lisp::Lisp& reader)
34 : BadGuy(reader, "images/creatures/dispenser/dispenser.sprite")
36 set_direction = false;
37 reader.get("direction", direction);
38 if( direction != "auto" && direction != ""){
40 initial_direction = str2dir( direction );
41 dir = str2dir( direction );
43 reader.get("cycle", cycle);
44 reader.get("badguy", badguy);
45 if (badguy == "mrrocket") {
46 sprite->set_action(dir == LEFT ? "working-left" : "working-right");
48 else {sprite->set_action("dropper");}
49 bbox.set_size(sprite->get_current_hitbox_width(), sprite->get_current_hitbox_height());
54 Dispenser::write(lisp::Writer& writer)
56 writer.start_list("dispenser");
58 writer.write_string("direction", direction);
59 writer.write_float("x", start_position.x);
60 writer.write_float("y", start_position.y);
61 writer.write_float("cycle", cycle);
62 writer.write_string("badguy", badguy);
64 writer.end_list("dispenser");
70 dispense_timer.start(cycle, true);
75 Dispenser::collision_squished(Player& player)
77 //TODO: Should it act like a normal tile when killed?
78 sprite->set_action(dir == LEFT ? "broken-left" : "broken-right");
79 dispense_timer.start(0);
81 kill_squished(player);
86 Dispenser::active_update(float )
88 if (dispense_timer.check()) {
93 //TODO: Add launching velocity to certain badguys
94 // Add themed randomizer
96 Dispenser::launch_badguy()
99 dir = initial_direction;
101 //FIXME: Does is_offscreen() work right here?
102 if (!is_offscreen()) {
103 if (badguy == "snowball")
104 Sector::current()->add_object(new SnowBall(Vector(get_pos().x, get_pos().y+32), dir));
105 else if (badguy == "bouncingsnowball")
106 Sector::current()->add_object(new BouncingSnowball(Vector(get_pos().x, get_pos().y+32), dir));
107 else if (badguy == "mrbomb")
108 Sector::current()->add_object(new MrBomb(Vector(get_pos().x, get_pos().y+32), dir));
109 else if (badguy == "mriceblock")
110 Sector::current()->add_object(new MrIceBlock(Vector(get_pos().x, get_pos().y+32), dir));
111 else if (badguy == "snail")
112 Sector::current()->add_object(new Snail(Vector(get_pos().x, get_pos().y+32), dir));
113 else if (badguy == "mrrocket") {
114 Sector::current()->add_object(new MrRocket(Vector(get_pos().x+(dir == LEFT ? -32 : 32), get_pos().y), dir));}
115 else if (badguy == "poisonivy")
116 Sector::current()->add_object(new PoisonIvy(Vector(get_pos().x, get_pos().y+32), dir));
117 else if (badguy == "skullyhop")
118 Sector::current()->add_object(new SkullyHop(Vector(get_pos().x, get_pos().y+44), dir));
119 else if (badguy == "random")
121 switch (systemRandom.rand(7))
123 case 0: Sector::current()->add_object(new SnowBall(Vector(get_pos().x, get_pos().y+32), dir)); break;
124 case 1: Sector::current()->add_object(new BouncingSnowball(Vector(get_pos().x, get_pos().y+32), dir)); break;
125 case 2: Sector::current()->add_object(new MrBomb(Vector(get_pos().x, get_pos().y+32), dir)); break;
126 case 3: Sector::current()->add_object(new MrIceBlock(Vector(get_pos().x, get_pos().y+32), dir)); break;
127 case 4: Sector::current()->add_object(new PoisonIvy(Vector(get_pos().x, get_pos().y+32), dir)); break;
128 case 5: Sector::current()->add_object(new Snail(Vector(get_pos().x, get_pos().y+32), dir)); break;
129 case 6: Sector::current()->add_object(new SkullyHop(Vector(get_pos().x, get_pos().y+44), dir)); break;
135 IMPLEMENT_FACTORY(Dispenser, "dispenser")