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 "poisonivy.hpp"
23 #include "random_generator.hpp"
24 #include "object/sprite_particle.hpp"
25 #include "lisp/writer.hpp"
26 #include "object_factory.hpp"
31 PoisonIvy::PoisonIvy(const lisp::Lisp& reader)
32 : WalkingBadguy(reader, "images/creatures/poison_ivy/poison_ivy.sprite", "left", "right")
37 PoisonIvy::PoisonIvy(const Vector& pos, Direction d)
38 : WalkingBadguy(pos, d, "images/creatures/poison_ivy/poison_ivy.sprite", "left", "right")
44 PoisonIvy::write(lisp::Writer& writer)
46 writer.start_list("poisonivy");
47 WalkingBadguy::write(writer);
48 writer.end_list("poisonivy");
52 PoisonIvy::collision_squished(GameObject& object)
54 sprite->set_action(dir == LEFT ? "squished-left" : "squished-right");
55 // spawn some particles
56 // TODO: provide convenience function in MovingSprite or MovingObject?
57 for (int i = 0; i < 3; i++) {
58 Vector ppos = bbox.get_middle();
59 float angle = systemRandom.randf(-M_PI_2, M_PI_2);
60 float velocity = systemRandom.randf(350, 400);
61 float vx = sin(angle)*velocity;
62 float vy = -cos(angle)*velocity;
63 Vector pspeed = Vector(vx, vy);
64 Vector paccel = Vector(0, 100);
65 Sector::current()->add_object(new SpriteParticle("images/objects/particles/poisonivy.sprite", "default", ppos, ANCHOR_MIDDLE, pspeed, paccel, LAYER_OBJECTS-1));
67 kill_squished(object);
71 IMPLEMENT_FACTORY(PoisonIvy, "poisonivy")