Random stuff that I should have committed ages ago.
[supertux.git] / src / badguy / smartball.cpp
1 //  $Id$
2 //
3 //  SuperTux - Smart Snowball
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 "smartball.hpp"
23
24 #include "object_factory.hpp"
25 #include "sprite/sprite.hpp"
26
27 SmartBall::SmartBall(const lisp::Lisp& reader)
28   : WalkingBadguy(reader, "images/creatures/snowball/smart-snowball.sprite", "left", "right")
29 {
30   walk_speed = 80;
31   max_drop_height = 16;
32 }
33
34 SmartBall::SmartBall(const Vector& pos, Direction d)
35   : WalkingBadguy(pos, d, "images/creatures/snowball/smart-snowball.sprite", "left", "right")
36 {
37   walk_speed = 80;
38   max_drop_height = 16;
39 }
40
41 bool
42 SmartBall::collision_squished(GameObject& object)
43 {
44   sprite->set_action(dir == LEFT ? "squished-left" : "squished-right");
45   kill_squished(object);
46   return true;
47 }
48
49 IMPLEMENT_FACTORY(SmartBall, "smartball")