src/badguy/zeekling.cpp

   1 //  $Id$
   2 //
   3 //  Zeekling - flyer that swoops down when she spots the player
   4 //  Copyright (C) 2005 Matthias Braun <matze@braunis.de>
   5 //  Copyright (C) 2006 Christoph Sommer <supertux@2006.expires.deltadevelopment.de>
   6 //
   7 //  This program is free software; you can redistribute it and/or
   8 //  modify it under the terms of the GNU General Public License
   9 //  as published by the Free Software Foundation; either version 2
  10 //  of the License, or (at your option) any later version.
  11 //
  12 //  This program is distributed in the hope that it will be useful,
  13 //  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14 //  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15 //  GNU General Public License for more details.
  16 //
  17 //  You should have received a copy of the GNU General Public License
  18 //  along with this program; if not, write to the Free Software
  19 //  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
  20 //  02111-1307, USA.
  21
  22 #include <config.h>
  23 #include <math.h>
  24
  25 #include "zeekling.hpp"
  26
  27 Zeekling::Zeekling(const lisp::Lisp& reader)
  28 {
  29   reader.get("x", start_position.x);
  30   reader.get("y", start_position.y);
  31   bbox.set_size(31.8, 31.8);
  32   sprite = sprite_manager->create("images/creatures/zeekling/zeekling.sprite");
  33   set_direction = false;
  34   state = FLYING;
  35 }
  36
  37 Zeekling::Zeekling(float pos_x, float pos_y, Direction d)
  38 {
  39   start_position.x = pos_x;
  40   start_position.y = pos_y;
  41   bbox.set_size(63.8, 50.8);
  42   sprite = sprite_manager->create("images/creatures/zeekling/zeekling.sprite");
  43   set_direction = true;
  44   initial_direction = d;
  45   state = FLYING;
  46 }
  47
  48 void
  49 Zeekling::write(lisp::Writer& writer)
  50 {
  51   writer.start_list("zeekling");
  52
  53   writer.write_float("x", start_position.x);
  54   writer.write_float("y", start_position.y);
  55
  56   writer.end_list("zeekling");
  57 }
  58
  59 void
  60 Zeekling::activate()
  61 {
  62   speed = 130 + (rand() % 41);
  63   if (set_direction) {dir = initial_direction;}
  64   physic.set_velocity_x(dir == LEFT ? -speed : speed);
  65   physic.enable_gravity(false);
  66   sprite->set_action(dir == LEFT ? "left" : "right");
  67 }
  68
  69 bool
  70 Zeekling::collision_squished(Player& player)
  71 {
  72   sprite->set_action(dir == LEFT ? "squished-left" : "squished-right");
  73   kill_squished(player);
  74   kill_fall();
  75   return true;
  76 }
  77
  78 void
  79 Zeekling::onBumpHorizontal() {
  80   if (state == FLYING) {
  81     dir = (dir == LEFT ? RIGHT : LEFT);
  82     sprite->set_action(dir == LEFT ? "left" : "right");
  83     physic.set_velocity_x(dir == LEFT ? -speed : speed);
  84   } else
  85   if (state == DIVING) {
  86     dir = (dir == LEFT ? RIGHT : LEFT);
  87     state = FLYING;
  88     sprite->set_action(dir == LEFT ? "left" : "right");
  89     physic.set_velocity_x(dir == LEFT ? -speed : speed);
  90     physic.set_velocity_y(0);
  91   } else
  92   if (state == CLIMBING) {
  93     dir = (dir == LEFT ? RIGHT : LEFT);
  94     sprite->set_action(dir == LEFT ? "left" : "right");
  95     physic.set_velocity_x(dir == LEFT ? -speed : speed);
  96   }
  97 }
  98
  99 void
 100 Zeekling::onBumpVertical() {
 101   if (state == FLYING) {
 102     physic.set_velocity_y(0);
 103   } else
 104   if (state == DIVING) {
 105     state = CLIMBING;
 106     physic.set_velocity_y(speed);
 107     sprite->set_action(dir == LEFT ? "left" : "right");
 108   } else
 109   if (state == CLIMBING) {
 110     state = FLYING;
 111     physic.set_velocity_y(0);
 112   }
 113 }
 114
 115 HitResponse
 116 Zeekling::collision_solid(GameObject& , const CollisionHit& hit)
 117 {
 118   if(fabsf(hit.normal.y) > .5) {
 119     onBumpVertical();
 120   } else {
 121     onBumpHorizontal();
 122   }
 123
 124   return CONTINUE;
 125 }
 126
 127 /**
 128  * linear prediction of player and badguy positions to decide if we should enter the DIVING state
 129  */
 130 bool
 131 Zeekling::should_we_dive() {
 132   const MovingObject* player = this->get_nearest_player();
 133   if (!player) return false;
 134
 135   const MovingObject* badguy = this;
 136
 137   const Vector playerPos = player->get_pos();
 138   const Vector playerMov = player->get_movement();
 139
 140   const Vector badguyPos = badguy->get_pos();
 141   const Vector badguyMov = badguy->get_movement();
 142
 143   // new vertical speed to test with
 144   float vy = -2*fabsf(badguyMov.x);
 145
 146   // do not dive if we are not above the player
 147   float height = playerPos.y - badguyPos.y;
 148   if (height <= 0) return false;
 149
 150   // do not dive if we would not descend faster than the player
 151   float relSpeed = -vy + playerMov.y;
 152   if (relSpeed <= 0) return false;
 153
 154   // guess number of frames to descend to same height as player
 155   float estFrames = height / relSpeed;
 156
 157   // guess where the player would be at this time
 158   float estPx = (playerPos.x + (estFrames * playerMov.x));
 159
 160   // guess where we would be at this time
 161   float estBx = (badguyPos.x + (estFrames * badguyMov.x));
 162
 163   // near misses are OK, too
 164   if (fabsf(estPx - estBx) < 32) return true;
 165
 166   return false;
 167 }
 168
 169 void
 170 Zeekling::active_update(float elapsed_time) {
 171   BadGuy::active_update(elapsed_time);
 172
 173   if (state == FLYING) {
 174     if (should_we_dive()) {
 175       state = DIVING;
 176       physic.set_velocity_y(-2*fabsf(physic.get_velocity_x()));
 177       sprite->set_action(dir == LEFT ? "diving-left" : "diving-right");
 178     }
 179     return;
 180   }
 181
 182   if (state == DIVING) {
 183     return;
 184   }
 185
 186   if (state == CLIMBING) {
 187     // stop climbing when we're back at initial height
 188     if (get_pos().y <= start_position.y) {
 189       state = FLYING;
 190       physic.set_velocity_y(0);
 191     }
 192     return;
 193   }
 194
 195 }
 196
 197 IMPLEMENT_FACTORY(Zeekling, "zeekling")