Random stuff that I should have committed ages ago.
[supertux.git] / src / badguy / crystallo.cpp
1 //  $Id$
2 //
3 //  SuperTux - Crystallo
4 //  Copyright (C) 2008 Wolfgang Becker <uafr@gmx.de>
5 //
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.
10 //
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.
15 //
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.
19
20 #include <config.h>
21
22 #include "crystallo.hpp"
23
24 #include "object_factory.hpp"
25 #include "lisp/lisp.hpp"
26 #include "sprite/sprite.hpp"
27
28 Crystallo::Crystallo(const lisp::Lisp& reader)
29   : WalkingBadguy(reader, "images/creatures/crystallo/crystallo.sprite", "left", "right")
30 {
31   walk_speed = 80;
32   max_drop_height = 16;
33   radius = 100;
34   reader.get("radius", radius);
35 }
36
37 Crystallo::Crystallo(const Vector& pos, Direction d)
38   : WalkingBadguy(pos, d, "images/creatures/crystallo/crystallo.sprite", "left", "right")
39 {
40   walk_speed = 80;
41   max_drop_height = 16;
42   radius = 100;
43 }
44
45 void
46 Crystallo::active_update(float elapsed_time)
47 {
48   if(get_pos().x > (start_position.x + radius)){
49     if(dir != LEFT){
50       turn_around();
51     }
52   }
53   if( get_pos().x < (start_position.x - radius)){
54     if(dir != RIGHT){
55       turn_around();
56     }
57   }
58   BadGuy::active_update(elapsed_time);
59 }
60
61 bool
62 Crystallo::collision_squished(GameObject& object)
63 {
64   sprite->set_action(dir == LEFT ? "shattered-left" : "shattered-right");
65   kill_squished(object);
66   return true;
67 }
68
69 IMPLEMENT_FACTORY(Crystallo, "crystallo")