Committed gnomino's iceflower patch. Also added placeholder graphics (selfmade, PD...
[supertux.git] / src / object / player.cpp
1 //  $Id$
2 //
3 //  SuperTux
4 //  Copyright (C) 2006 Matthias Braun <matze@braunis.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 #include <config.h>
20
21 #include <typeinfo>
22 #include <cmath>
23 #include <iostream>
24 #include <cassert>
25
26 #include "gettext.hpp"
27 #include "sprite/sprite_manager.hpp"
28 #include "audio/sound_manager.hpp"
29 #include "player.hpp"
30 #include "tile.hpp"
31 #include "sprite/sprite.hpp"
32 #include "sector.hpp"
33 #include "resources.hpp"
34 #include "statistics.hpp"
35 #include "game_session.hpp"
36 #include "object/tilemap.hpp"
37 #include "object/camera.hpp"
38 #include "object/particles.hpp"
39 #include "object/portable.hpp"
40 #include "object/bullet.hpp"
41 #include "trigger/trigger_base.hpp"
42 #include "control/joystickkeyboardcontroller.hpp"
43 #include "scripting/squirrel_util.hpp"
44 #include "main.hpp"
45 #include "platform.hpp"
46 #include "badguy/badguy.hpp"
47 #include "player_status.hpp"
48 #include "log.hpp"
49 #include "falling_coin.hpp"
50 #include "random_generator.hpp"
51 #include "object/sprite_particle.hpp"
52
53 static const int TILES_FOR_BUTTJUMP = 3;
54 static const float SHOOTING_TIME = .150;
55 /// time before idle animation starts
56 static const float IDLE_TIME = 2.5;
57
58 static const float WALK_ACCELERATION_X = 300;
59 static const float RUN_ACCELERATION_X = 400;
60 static const float SKID_XM = 200;
61 static const float SKID_TIME = .3;
62 static const float MAX_WALK_XM = 230;
63 static const float MAX_RUN_XM = 320;
64 static const float WALK_SPEED = 100;
65
66 static const float KICK_TIME = .3;
67 static const float CHEER_TIME = 1;
68
69 static const float UNDUCK_HURT_TIME = 0.25; /**< if Tux cannot unduck for this long, he will get hurt */
70
71 // growing animation
72 Surface* growingtux_left[GROWING_FRAMES];
73 Surface* growingtux_right[GROWING_FRAMES];
74
75 Surface* tux_life = 0;
76
77 TuxBodyParts* small_tux = 0;
78 TuxBodyParts* big_tux = 0;
79 TuxBodyParts* fire_tux = 0;
80 TuxBodyParts* ice_tux = 0;
81
82 namespace{
83   bool no_water = true;
84 }
85 void
86 TuxBodyParts::set_action(std::string action, int loops)
87 {
88   if(head != NULL)
89     head->set_action(action, loops);
90   if(body != NULL)
91     body->set_action(action, loops);
92   if(arms != NULL)
93     arms->set_action(action, loops);
94   if(feet != NULL)
95     feet->set_action(action, loops);
96 }
97
98 void
99 TuxBodyParts::draw(DrawingContext& context, const Vector& pos, int layer)
100 {
101   if(head != NULL)
102     head->draw(context, pos, layer-1);
103   if(body != NULL)
104     body->draw(context, pos, layer-3);
105   if(arms != NULL)
106     arms->draw(context, pos, layer+10);
107   if(feet != NULL)
108     feet->draw(context, pos, layer-2);
109 }
110
111 Player::Player(PlayerStatus* _player_status, const std::string& name)
112   : player_status(_player_status), grabbed_object(NULL), ghost_mode(false)
113 {
114   this->name = name;
115   controller = main_controller;
116   smalltux_gameover = sprite_manager->create("images/creatures/tux_small/smalltux-gameover.sprite");
117   smalltux_star = sprite_manager->create("images/creatures/tux_small/smalltux-star.sprite");
118   bigtux_star = sprite_manager->create("images/creatures/tux_big/bigtux-star.sprite");
119
120   sound_manager->preload("sounds/bigjump.wav");
121   sound_manager->preload("sounds/jump.wav");
122   sound_manager->preload("sounds/hurt.wav");
123   sound_manager->preload("sounds/skid.wav");
124   sound_manager->preload("sounds/flip.wav");
125   sound_manager->preload("sounds/invincible.wav");
126   sound_manager->preload("sounds/splash.ogg");
127
128
129   init();
130 }
131
132 Player::~Player()
133 {
134   delete smalltux_gameover;
135   delete smalltux_star;
136   delete bigtux_star;
137 }
138
139 void
140 Player::init()
141 {
142   if(is_big())
143     set_size(31.8, 62.8);
144   else
145     set_size(31.8, 30.8);
146
147   dir = RIGHT;
148   old_dir = dir;
149   duck = false;
150   dead = false;
151
152   dying = false;
153   peeking = AUTO;
154   last_ground_y = 0;
155   fall_mode = ON_GROUND;
156   jumping = false;
157   can_jump = true;
158   butt_jump = false;
159   deactivated = false;
160   backflipping = false;
161   backflip_direction = 0;
162   visible = true;
163   swimming = false;
164
165   on_ground_flag = false;
166   grabbed_object = NULL;
167
168   physic.reset();
169 }
170
171 void
172 Player::expose(HSQUIRRELVM vm, SQInteger table_idx)
173 {
174   if (name.empty())
175     return;
176
177   Scripting::expose_object(vm, table_idx, dynamic_cast<Scripting::Player *>(this), name, false);
178 }
179
180 void
181 Player::unexpose(HSQUIRRELVM vm, SQInteger table_idx)
182 {
183   if (name.empty())
184     return;
185
186   Scripting::unexpose_object(vm, table_idx, name);
187 }
188
189 void
190 Player::set_controller(Controller* controller)
191 {
192   this->controller = controller;
193 }
194
195 bool
196 Player::adjust_height(float new_height)
197 {
198   Rect bbox2 = bbox;
199   bbox2.move(Vector(0, bbox.get_height() - new_height));
200   bbox2.set_height(new_height);
201
202   if(new_height > bbox.get_height()) {
203     Rect additional_space = bbox2;
204     additional_space.set_height(new_height - bbox.get_height());
205     if(!Sector::current()->is_free_of_statics(additional_space, this))
206       return false;
207   }
208
209   // adjust bbox accordingly
210   // note that we use members of moving_object for this, so we can run this during CD, too
211   set_pos(bbox2.p1);
212   set_size(bbox2.get_width(), bbox2.get_height());
213   return true;
214 }
215
216 void
217 Player::update(float elapsed_time)
218 {
219   if( no_water ){
220     swimming = false;
221   }
222   no_water = true;
223
224   if(dying && dying_timer.check()) {
225     dead = true;
226     return;
227   }
228
229   if(!dying && !deactivated)
230     handle_input();
231
232   // handle_input() calls apply_friction() when Tux is not walking, so we'll have to do this ourselves
233   if (deactivated)
234     apply_friction();
235
236   // extend/shrink tux collision rectangle so that we fall through/walk over 1
237   // tile holes
238   if(fabsf(physic.get_velocity_x()) > MAX_WALK_XM) {
239     set_width(34);
240   } else {
241     set_width(31.8);
242   }
243
244   // on downward slopes, adjust vertical velocity so tux walks smoothly down
245   if (on_ground()) {
246     if(floor_normal.y != 0) {
247       if ((floor_normal.x * physic.get_velocity_x()) >= 0) {
248         physic.set_velocity_y(250);
249       }
250     }
251   }
252
253   // handle backflipping
254   if (backflipping) {
255     //prevent player from changing direction when backflipping
256     dir = (backflip_direction == 1) ? LEFT : RIGHT;
257     if (backflip_timer.started()) physic.set_velocity_x(100 * backflip_direction);
258   }
259
260   // set fall mode...
261   if(on_ground()) {
262     fall_mode = ON_GROUND;
263     last_ground_y = get_pos().y;
264   } else {
265     if(get_pos().y > last_ground_y)
266       fall_mode = FALLING;
267     else if(fall_mode == ON_GROUND)
268       fall_mode = JUMPING;
269   }
270
271   // check if we landed
272   if(on_ground()) {
273     jumping = false;
274     if (backflipping && (!backflip_timer.started())) {
275       backflipping = false;
276       backflip_direction = 0;
277
278       // if controls are currently deactivated, we take care of standing up ourselves
279       if (deactivated)
280         do_standup();
281     }
282   }
283
284   // calculate movement for this frame
285   movement = physic.get_movement(elapsed_time);
286
287   if(grabbed_object != NULL && !dying) {
288     Vector pos = get_pos() +
289       Vector(dir == LEFT ? -16 : 16, get_bbox().get_height()*0.66666 - 32);
290     grabbed_object->grab(*this, pos, dir);
291   }
292
293   if(grabbed_object != NULL && dying){
294     grabbed_object->ungrab(*this, dir);
295     grabbed_object = NULL;
296   }
297
298   on_ground_flag = false;
299
300   // when invincible, spawn particles
301   if (invincible_timer.started() && !dying)
302   {
303     if (systemRandom.rand(0, 2) == 0) {
304       float px = systemRandom.randf(bbox.p1.x+0, bbox.p2.x-0);
305       float py = systemRandom.randf(bbox.p1.y+0, bbox.p2.y-0);
306       Vector ppos = Vector(px, py);
307       Vector pspeed = Vector(0, 0);
308       Vector paccel = Vector(0, 0);
309       // draw bright sparkle when there is lots of time left, dark sparkle when invincibility is about to end
310       if (invincible_timer.get_timeleft() > TUX_INVINCIBLE_TIME_WARNING) {
311         // make every other a longer sparkle to make trail a bit fuzzy
312         if (size_t(game_time*20)%2) {
313           Sector::current()->add_object(new SpriteParticle("images/objects/particles/sparkle.sprite", "small", ppos, ANCHOR_MIDDLE, pspeed, paccel, LAYER_OBJECTS+1+5));
314         } else {
315           Sector::current()->add_object(new SpriteParticle("images/objects/particles/sparkle.sprite", "medium", ppos, ANCHOR_MIDDLE, pspeed, paccel, LAYER_OBJECTS+1+5));
316         }
317       } else {
318         Sector::current()->add_object(new SpriteParticle("images/objects/particles/sparkle.sprite", "dark", ppos, ANCHOR_MIDDLE, pspeed, paccel, LAYER_OBJECTS+1+5));
319       }
320     }
321   }
322
323 }
324
325 bool
326 Player::on_ground()
327 {
328   return on_ground_flag;
329 }
330
331 bool
332 Player::is_big()
333 {
334   if(player_status->bonus == NO_BONUS)
335     return false;
336
337   return true;
338 }
339
340 void
341 Player::apply_friction()
342 {
343   if ((on_ground()) && (fabs(physic.get_velocity_x()) < WALK_SPEED)) {
344     physic.set_velocity_x(0);
345     physic.set_acceleration_x(0);
346   } else if(physic.get_velocity_x() < 0) {
347     physic.set_acceleration_x(WALK_ACCELERATION_X * 1.5);
348   } else {
349     physic.set_acceleration_x(WALK_ACCELERATION_X * -1.5);
350   }
351 }
352
353 void
354 Player::handle_horizontal_input()
355 {
356   float vx = physic.get_velocity_x();
357   float vy = physic.get_velocity_y();
358   float ax = physic.get_acceleration_x();
359   float ay = physic.get_acceleration_y();
360
361   float dirsign = 0;
362   if(!duck || physic.get_velocity_y() != 0) {
363     if(controller->hold(Controller::LEFT) && !controller->hold(Controller::RIGHT)) {
364       old_dir = dir;
365       dir = LEFT;
366       dirsign = -1;
367     } else if(!controller->hold(Controller::LEFT)
368               && controller->hold(Controller::RIGHT)) {
369       old_dir = dir;
370       dir = RIGHT;
371       dirsign = 1;
372     }
373   }
374
375   // only run if action key is pressed and we're not holding anything
376   if (!(controller->hold(Controller::ACTION) && (!grabbed_object))) {
377     ax = dirsign * WALK_ACCELERATION_X;
378     // limit speed
379     if(vx >= MAX_WALK_XM && dirsign > 0) {
380       vx = MAX_WALK_XM;
381       ax = 0;
382     } else if(vx <= -MAX_WALK_XM && dirsign < 0) {
383       vx = -MAX_WALK_XM;
384       ax = 0;
385     }
386   } else {
387     ax = dirsign * RUN_ACCELERATION_X;
388     // limit speed
389     if(vx >= MAX_RUN_XM && dirsign > 0) {
390       vx = MAX_RUN_XM;
391       ax = 0;
392     } else if(vx <= -MAX_RUN_XM && dirsign < 0) {
393       vx = -MAX_RUN_XM;
394       ax = 0;
395     }
396   }
397
398   // we can reach WALK_SPEED without any acceleration
399   if(dirsign != 0 && fabs(vx) < WALK_SPEED) {
400     vx = dirsign * WALK_SPEED;
401   }
402
403   // changing directions?
404   if(on_ground() && ((vx < 0 && dirsign >0) || (vx>0 && dirsign<0))) {
405     // let's skid!
406     if(fabs(vx)>SKID_XM && !skidding_timer.started()) {
407       skidding_timer.start(SKID_TIME);
408       sound_manager->play("sounds/skid.wav");
409       // dust some particles
410       Sector::current()->add_object(
411         new Particles(
412           Vector(dir == RIGHT ? get_bbox().p2.x : get_bbox().p1.x, get_bbox().p2.y),
413           dir == RIGHT ? 270+20 : 90-40, dir == RIGHT ? 270+40 : 90-20,
414           Vector(280, -260), Vector(0, 300), 3, Color(.4, .4, .4), 3, .8,
415           LAYER_OBJECTS+1));
416
417       ax *= 2.5;
418     } else {
419       ax *= 2;
420     }
421   }
422
423   physic.set_velocity(vx, vy);
424   physic.set_acceleration(ax, ay);
425
426   // we get slower when not pressing any keys
427   if(dirsign == 0) {
428     apply_friction();
429   }
430
431 }
432
433 void
434 Player::do_cheer()
435 {
436   do_duck();
437   do_backflip();
438   do_standup();
439 }
440
441 void
442 Player::do_duck() {
443   if (duck)
444     return;
445   if (!is_big())
446     return;
447
448   if (physic.get_velocity_y() != 0)
449     return;
450   if (!on_ground())
451     return;
452
453   if (adjust_height(31.8)) {
454     duck = true;
455     unduck_hurt_timer.stop();
456   } else {
457     // FIXME: what now?
458   }
459 }
460
461 void
462 Player::do_standup() {
463   if (!duck)
464     return;
465   if (!is_big())
466     return;
467   if (backflipping)
468     return;
469
470   if (adjust_height(63.8)) {
471     duck = false;
472     unduck_hurt_timer.stop();
473   } else {
474     // if timer is not already running, start it.
475     if (unduck_hurt_timer.get_period() == 0) {
476       unduck_hurt_timer.start(UNDUCK_HURT_TIME);
477     }
478     else if (unduck_hurt_timer.check()) {
479       kill(false);
480     }
481   }
482
483 }
484
485 void
486 Player::do_backflip() {
487   if (!duck)
488     return;
489   if (!on_ground())
490     return;
491
492   // TODO: we don't have an animation for firetux backflipping, so let's revert to bigtux
493   set_bonus(GROWUP_BONUS, true);
494
495   backflip_direction = (dir == LEFT)?(+1):(-1);
496   backflipping = true;
497   do_jump(-580);
498   sound_manager->play("sounds/flip.wav");
499   backflip_timer.start(0.15);
500 }
501
502 void
503 Player::do_jump(float yspeed) {
504   if (!on_ground())
505     return;
506
507   physic.set_velocity_y(yspeed);
508   //bbox.move(Vector(0, -1));
509   jumping = true;
510   on_ground_flag = false;
511   can_jump = false;
512
513   // play sound
514   if (is_big()) {
515     sound_manager->play("sounds/bigjump.wav");
516   } else {
517     sound_manager->play("sounds/jump.wav");
518   }
519 }
520
521 void
522 Player::handle_vertical_input()
523 {
524   // Press jump key
525   if(controller->pressed(Controller::JUMP) && (can_jump)) {
526     if (duck) {
527       // when running, only jump a little bit; else do a backflip
528       if (physic.get_velocity_x() != 0) do_jump(-300); else do_backflip();
529     } else {
530       // jump a bit higher if we are running; else do a normal jump
531       if (fabs(physic.get_velocity_x()) > MAX_WALK_XM) do_jump(-580); else do_jump(-520);
532     }
533   }
534   // Let go of jump key
535   else if(!controller->hold(Controller::JUMP)) {
536     if (!backflipping && jumping && physic.get_velocity_y() < 0) {
537       jumping = false;
538       physic.set_velocity_y(0);
539     }
540   }
541
542   /* In case the player has pressed Down while in a certain range of air,
543      enable butt jump action */
544   if (controller->hold(Controller::DOWN) && !butt_jump && !duck && is_big() && jumping) {
545     butt_jump = true;
546   }
547
548   /* When Down is not held anymore, disable butt jump */
549   if(butt_jump && !controller->hold(Controller::DOWN))
550     butt_jump = false;
551
552   // swimming
553   physic.set_acceleration_y(0);
554   if (swimming) {
555     if (controller->hold(Controller::UP) || controller->hold(Controller::JUMP))
556       physic.set_acceleration_y(-2000);
557     physic.set_velocity_y(physic.get_velocity_y() * 0.94);
558   }
559 }
560
561 void
562 Player::handle_input()
563 {
564   if (ghost_mode) {
565     handle_input_ghost();
566     return;
567   }
568
569   /* Peeking */
570   if( controller->released( Controller::PEEK_LEFT ) ) {
571     peeking = AUTO;
572   }
573   if( controller->released( Controller::PEEK_RIGHT ) ) {
574     peeking = AUTO;
575   }
576   if( controller->pressed( Controller::PEEK_LEFT ) ) {
577     peeking = LEFT;
578   }
579   if( controller->pressed( Controller::PEEK_RIGHT ) ) {
580     peeking = RIGHT;
581   }
582
583   /* Handle horizontal movement: */
584   if (!backflipping) handle_horizontal_input();
585
586   /* Jump/jumping? */
587   if (on_ground() && !controller->hold(Controller::JUMP))
588     can_jump = true;
589
590   /* Handle vertical movement: */
591   handle_vertical_input();
592
593   /* Shoot! */
594   if (controller->pressed(Controller::ACTION) && (player_status->bonus == FIRE_BONUS || player_status->bonus == ICE_BONUS)) {
595     if(Sector::current()->add_bullet(
596          get_pos() + ((dir == LEFT)? Vector(0, bbox.get_height()/2)
597                       : Vector(32, bbox.get_height()/2)),
598          physic.get_velocity_x(), dir))
599       shooting_timer.start(SHOOTING_TIME);
600   }
601
602   /* Duck or Standup! */
603   if (controller->hold(Controller::DOWN)) {
604     do_duck();
605   } else {
606     do_standup();
607   }
608
609   /* grabbing */
610   try_grab();
611
612   if(!controller->hold(Controller::ACTION) && grabbed_object) {
613     // move the grabbed object a bit away from tux
614     Vector pos = get_pos() +
615         Vector(dir == LEFT ? -bbox.get_width()-1 : bbox.get_width()+1,
616                 bbox.get_height()*0.66666 - 32);
617     Rect dest(pos, pos + Vector(32, 32));
618     if(Sector::current()->is_free_of_statics(dest)) {
619       MovingObject* moving_object = dynamic_cast<MovingObject*> (grabbed_object);
620       if(moving_object) {
621         moving_object->set_pos(pos);
622       } else {
623         log_debug << "Non MovingObjetc grabbed?!?" << std::endl;
624       }
625       grabbed_object->ungrab(*this, dir);
626       grabbed_object = NULL;
627     }
628   }
629 }
630
631 void 
632 Player::try_grab()
633 {
634   if(controller->hold(Controller::ACTION) && !grabbed_object
635       && !duck) {
636   Sector* sector = Sector::current();
637     Vector pos;
638     if(dir == LEFT) {
639       pos = Vector(bbox.get_left() - 5, bbox.get_bottom() - 16);
640     } else {
641       pos = Vector(bbox.get_right() + 5, bbox.get_bottom() - 16);
642     }
643
644     for(Sector::Portables::iterator i = sector->portables.begin();
645         i != sector->portables.end(); ++i) {
646       Portable* portable = *i;
647       if(!portable->is_portable())
648         continue;
649
650       MovingObject* moving_object = dynamic_cast<MovingObject*> (portable);
651       assert(portable);
652       if(moving_object == NULL)
653         continue;
654
655       if(moving_object->get_bbox().contains(pos)) {
656         grabbed_object = portable;
657         grabbed_object->grab(*this, get_pos(), dir);
658         break;
659       }
660     }
661   }
662 }
663
664 void
665 Player::handle_input_ghost()
666 {
667   float vx = 0;
668   float vy = 0;
669   if (controller->hold(Controller::LEFT)) {
670     dir = LEFT;
671     vx -= MAX_RUN_XM * 2;
672   }
673   if (controller->hold(Controller::RIGHT)) {
674     dir = RIGHT;
675     vx += MAX_RUN_XM * 2;
676   }
677   if ((controller->hold(Controller::UP)) || (controller->hold(Controller::JUMP))) {
678     vy -= MAX_RUN_XM * 2;
679   }
680   if (controller->hold(Controller::DOWN)) {
681     vy += MAX_RUN_XM * 2;
682   }
683   if (controller->hold(Controller::ACTION)) {
684     set_ghost_mode(false);
685   }
686   physic.set_velocity(vx, vy);
687   physic.set_acceleration(0, 0);
688 }
689
690 void
691 Player::add_coins(int count)
692 {
693   player_status->add_coins(count);
694 }
695
696 bool
697 Player::add_bonus(const std::string& bonustype)
698 {
699   BonusType type = NO_BONUS;
700
701   if(bonustype == "grow") {
702     type = GROWUP_BONUS;
703   } else if(bonustype == "fireflower") {
704     type = FIRE_BONUS;
705   } else if(bonustype == "iceflower") {
706     type = ICE_BONUS;
707   } else if(bonustype == "none") {
708     type = NO_BONUS;
709   } else {
710     std::ostringstream msg;
711     msg << "Unknown bonus type "  << bonustype;
712     throw std::runtime_error(msg.str());
713   }
714
715   return add_bonus(type);
716 }
717
718 bool
719 Player::add_bonus(BonusType type, bool animate)
720 {
721   // always ignore NO_BONUS
722   if (type == NO_BONUS) {
723     return true;
724   }
725
726   // ignore GROWUP_BONUS if we're already big
727   if (type == GROWUP_BONUS) {
728     if (player_status->bonus == GROWUP_BONUS)
729       return true;
730     if (player_status->bonus == FIRE_BONUS)
731       return true;
732     if (player_status->bonus == ICE_BONUS)
733       return true;
734   }
735
736   return set_bonus(type, animate);
737 }
738
739 bool
740 Player::set_bonus(BonusType type, bool animate)
741 {
742   if(player_status->bonus == NO_BONUS) {
743     if (!adjust_height(62.8)) {
744       printf("can't adjust\n");
745       return false;
746     }
747     if(animate)
748       growing_timer.start(GROWING_TIME);
749   }
750
751   if ((type == NO_BONUS) || (type == GROWUP_BONUS)) {
752     if ((player_status->bonus == FIRE_BONUS) && (animate)) {
753       // visually lose helmet
754       Vector ppos = Vector((bbox.p1.x + bbox.p2.x) / 2, bbox.p1.y);
755       Vector pspeed = Vector(((dir==LEFT) ? +100 : -100), -300);
756       Vector paccel = Vector(0, 1000);
757       std::string action = (dir==LEFT)?"left":"right";
758       Sector::current()->add_object(new SpriteParticle("images/objects/particles/firetux-helmet.sprite", action, ppos, ANCHOR_TOP, pspeed, paccel, LAYER_OBJECTS-1));
759     }
760     if ((player_status->bonus == ICE_BONUS) && (animate)) {
761       // visually lose cap
762       Vector ppos = Vector((bbox.p1.x + bbox.p2.x) / 2, bbox.p1.y);
763       Vector pspeed = Vector(((dir==LEFT) ? +100 : -100), -300);
764       Vector paccel = Vector(0, 1000);
765       std::string action = (dir==LEFT)?"left":"right";
766       Sector::current()->add_object(new SpriteParticle("images/objects/particles/icetux-cap.sprite", action, ppos, ANCHOR_TOP, pspeed, paccel, LAYER_OBJECTS-1));
767     }
768     player_status->max_fire_bullets = 0;
769     player_status->max_ice_bullets = 0;
770   }
771   if (type == FIRE_BONUS) player_status->max_fire_bullets++;
772   if (type == ICE_BONUS) player_status->max_ice_bullets++;
773
774   player_status->bonus = type;
775   return true;
776 }
777
778 void
779 Player::set_visible(bool visible)
780 {
781   this->visible = visible;
782   if( visible )
783     set_group(COLGROUP_MOVING);
784   else
785     set_group(COLGROUP_DISABLED);
786 }
787
788 bool
789 Player::get_visible()
790 {
791   return visible;
792 }
793
794 void
795 Player::kick()
796 {
797   kick_timer.start(KICK_TIME);
798 }
799
800 void
801 Player::draw(DrawingContext& context)
802 {
803   if(!visible)
804     return;
805
806   TuxBodyParts* tux_body;
807
808   if (player_status->bonus == GROWUP_BONUS)
809     tux_body = big_tux;
810   else if (player_status->bonus == FIRE_BONUS)
811     tux_body = fire_tux;
812   else if (player_status->bonus == ICE_BONUS)
813     tux_body = ice_tux;
814   else
815     tux_body = small_tux;
816
817   int layer = LAYER_OBJECTS + 1;
818
819   /* Set Tux sprite action */
820   if (backflipping)
821     {
822     if(dir == LEFT)
823       tux_body->set_action("backflip-left");
824     else // dir == RIGHT
825       tux_body->set_action("backflip-right");
826     }
827   else if (duck && is_big())
828     {
829     if(dir == LEFT)
830       tux_body->set_action("duck-left");
831     else // dir == RIGHT
832       tux_body->set_action("duck-right");
833     }
834   else if (skidding_timer.started() && !skidding_timer.check())
835     {
836     if(dir == LEFT)
837       tux_body->set_action("skid-left");
838     else // dir == RIGHT
839       tux_body->set_action("skid-right");
840     }
841   else if (kick_timer.started() && !kick_timer.check())
842     {
843     if(dir == LEFT)
844       tux_body->set_action("kick-left");
845     else // dir == RIGHT
846       tux_body->set_action("kick-right");
847     }
848   else if (butt_jump && is_big())
849     {
850     if(dir == LEFT)
851       tux_body->set_action("buttjump-left");
852     else // dir == RIGHT
853       tux_body->set_action("buttjump-right");
854     }
855   else if (!on_ground())
856     {
857     if(dir == LEFT)
858       tux_body->set_action("jump-left");
859     else // dir == RIGHT
860       tux_body->set_action("jump-right");
861     }
862   else
863     {
864     if (fabsf(physic.get_velocity_x()) < 1.0f) // standing
865       {
866       if(dir == LEFT)
867         tux_body->set_action("stand-left");
868       else // dir == RIGHT
869         tux_body->set_action("stand-right");
870       }
871     else // moving
872       {
873       if(dir == LEFT)
874         tux_body->set_action("walk-left");
875       else // dir == RIGHT
876         tux_body->set_action("walk-right");
877       }
878     }
879
880   if(idle_timer.check())
881     {
882     if(is_big())
883       {
884       if(dir == LEFT)
885         tux_body->head->set_action("idle-left", 1);
886       else // dir == RIGHT
887         tux_body->head->set_action("idle-right", 1);
888       }
889
890     }
891
892   // Tux is holding something
893   if ((grabbed_object != 0 && physic.get_velocity_y() == 0) ||
894       (shooting_timer.get_timeleft() > 0 && !shooting_timer.check()))
895     {
896     if (duck)
897       {
898       if(dir == LEFT)
899         tux_body->arms->set_action("duck+grab-left");
900       else // dir == RIGHT
901         tux_body->arms->set_action("duck+grab-right");
902       }
903     else
904       {
905       if(dir == LEFT)
906         tux_body->arms->set_action("grab-left");
907       else // dir == RIGHT
908         tux_body->arms->set_action("grab-right");
909       }
910     }
911
912   /* Draw Tux */
913   if(dying) {
914     smalltux_gameover->draw(context, get_pos(), LAYER_FLOATINGOBJECTS + 1);
915   }
916   else if ((growing_timer.get_timeleft() > 0) && (!duck)) {
917       if (dir == RIGHT) {
918         context.draw_surface(growingtux_right[int((growing_timer.get_timegone() *
919                  GROWING_FRAMES) / GROWING_TIME)], get_pos(), layer);
920       } else {
921         context.draw_surface(growingtux_left[int((growing_timer.get_timegone() *
922                 GROWING_FRAMES) / GROWING_TIME)], get_pos(), layer);
923       }
924     }
925   else if (safe_timer.started() && size_t(game_time*40)%2)
926     ;  // don't draw Tux
927   else
928     tux_body->draw(context, get_pos(), layer);
929
930 }
931
932 void
933 Player::collision_tile(uint32_t tile_attributes)
934 {
935   if(tile_attributes & Tile::HURTS)
936     kill(false);
937
938   if( swimming ){
939     if( tile_attributes & Tile::WATER ){
940       no_water = false;
941     } else {
942       swimming = false;
943     }
944   } else {
945     if( tile_attributes & Tile::WATER ){
946       swimming = true;
947       no_water = false;
948       sound_manager->play( "sounds/splash.ogg" );
949     }
950   }
951 }
952
953 void
954 Player::collision_solid(const CollisionHit& hit)
955 {
956   if(hit.bottom) {
957     if(physic.get_velocity_y() > 0)
958       physic.set_velocity_y(0);
959
960     on_ground_flag = true;
961     floor_normal = hit.slope_normal;
962   } else if(hit.top) {
963     if(physic.get_velocity_y() < 0)
964       physic.set_velocity_y(.2);
965   }
966
967   if(hit.left || hit.right) {
968     physic.set_velocity_x(0);
969   }
970
971   // crushed?
972   if(hit.crush) {
973     if(hit.left || hit.right) {
974       kill(true);
975     } else if(hit.top || hit.bottom) {
976       kill(false);
977     }
978   }
979 }
980
981 HitResponse
982 Player::collision(GameObject& other, const CollisionHit& hit)
983 {
984   Bullet* bullet = dynamic_cast<Bullet*> (&other);
985   if(bullet) {
986     return FORCE_MOVE;
987   }
988
989   if(hit.left || hit.right) {
990     physic.set_velocity_x(0);
991     try_grab(); //grab objects right now, in update it will be too late
992   }
993 #ifdef DEBUG
994   assert(dynamic_cast<MovingObject*> (&other) != NULL);
995 #endif
996   MovingObject* moving_object = static_cast<MovingObject*> (&other);
997   if(moving_object->get_group() == COLGROUP_TOUCHABLE) {
998     TriggerBase* trigger = dynamic_cast<TriggerBase*> (&other);
999     if(trigger) {
1000       if(controller->pressed(Controller::UP))
1001         trigger->event(*this, TriggerBase::EVENT_ACTIVATE);
1002     }
1003
1004     return FORCE_MOVE;
1005   }
1006
1007   BadGuy* badguy = dynamic_cast<BadGuy*> (&other);
1008   if(badguy != NULL) {
1009     if(safe_timer.started() || invincible_timer.started())
1010       return FORCE_MOVE;
1011
1012     return CONTINUE;
1013   }
1014
1015   return CONTINUE;
1016 }
1017
1018 void
1019 Player::make_invincible()
1020 {
1021   sound_manager->play("sounds/invincible.wav");
1022   invincible_timer.start(TUX_INVINCIBLE_TIME);
1023   Sector::current()->play_music(HERRING_MUSIC);
1024 }
1025
1026 /* Kill Player! */
1027 void
1028 Player::kill(bool completely)
1029 {
1030   if(dying || deactivated)
1031     return;
1032
1033   if(!completely && (safe_timer.started() || invincible_timer.started()))
1034     return;
1035
1036   sound_manager->play("sounds/hurt.wav");
1037
1038   physic.set_velocity_x(0);
1039
1040   if(!completely && is_big()) {
1041     if(player_status->bonus == FIRE_BONUS
1042         || player_status->bonus == ICE_BONUS) {
1043       safe_timer.start(TUX_SAFE_TIME);
1044       set_bonus(GROWUP_BONUS, true);
1045     } else {
1046       //growing_timer.start(GROWING_TIME);
1047       safe_timer.start(TUX_SAFE_TIME /* + GROWING_TIME */);
1048       adjust_height(30.8);
1049       duck = false;
1050       set_bonus(NO_BONUS, true);
1051     }
1052   } else {
1053     for (int i = 0; (i < 5) && (i < player_status->coins); i++)
1054     {
1055       // the numbers: starting x, starting y, velocity y
1056       Sector::current()->add_object(new FallingCoin(get_pos() +
1057             Vector(systemRandom.rand(5), systemRandom.rand(-32,18)),
1058             systemRandom.rand(-100,100)));
1059     }
1060     physic.enable_gravity(true);
1061     physic.set_acceleration(0, 0);
1062     physic.set_velocity(0, -700);
1063     player_status->coins -= 25;
1064     set_bonus(NO_BONUS, true);
1065     dying = true;
1066     dying_timer.start(3.0);
1067     set_group(COLGROUP_DISABLED);
1068
1069     DisplayEffect* effect = new DisplayEffect();
1070     effect->fade_out(3.0);
1071     Sector::current()->add_object(effect);
1072     sound_manager->stop_music(3.0);
1073   }
1074 }
1075
1076 void
1077 Player::move(const Vector& vector)
1078 {
1079   set_pos(vector);
1080
1081   // TODO: do we need the following? Seems irrelevant to moving the player
1082   if(is_big())
1083     set_size(31.8, 63.8);
1084   else
1085     set_size(31.8, 31.8);
1086   duck = false;
1087   last_ground_y = vector.y;
1088
1089   physic.reset();
1090 }
1091
1092 void
1093 Player::check_bounds(Camera* camera)
1094 {
1095   /* Keep tux in bounds: */
1096   if (get_pos().x < 0) {
1097     // Lock Tux to the size of the level, so that he doesn't fall of
1098     // on the left side
1099     set_pos(Vector(0, get_pos().y));
1100   }
1101
1102   /* fallen out of the level? */
1103   if (get_pos().y > Sector::current()->get_height()) {
1104     kill(true);
1105     return;
1106   }
1107
1108   // can happen if back scrolling is disabled
1109   if(get_pos().x < camera->get_translation().x) {
1110     set_pos(Vector(camera->get_translation().x, get_pos().y));
1111   }
1112   if(get_pos().x >= camera->get_translation().x + SCREEN_WIDTH - bbox.get_width())
1113   {
1114     set_pos(Vector(
1115           camera->get_translation().x + SCREEN_WIDTH - bbox.get_width(),
1116           get_pos().y));
1117   }
1118 }
1119
1120 void
1121 Player::add_velocity(const Vector& velocity)
1122 {
1123   physic.set_velocity(physic.get_velocity() + velocity);
1124 }
1125
1126 void
1127 Player::add_velocity(const Vector& velocity, const Vector& end_speed)
1128 {
1129   if (end_speed.x > 0)
1130     physic.set_velocity_x(std::min(physic.get_velocity_x() + velocity.x, end_speed.x));
1131   if (end_speed.x < 0)
1132     physic.set_velocity_x(std::max(physic.get_velocity_x() + velocity.x, end_speed.x));
1133   if (end_speed.y > 0)
1134     physic.set_velocity_y(std::min(physic.get_velocity_y() + velocity.y, end_speed.y));
1135   if (end_speed.y < 0)
1136     physic.set_velocity_y(std::max(physic.get_velocity_y() + velocity.y, end_speed.y));
1137 }
1138
1139 void
1140 Player::bounce(BadGuy& )
1141 {
1142   if(controller->hold(Controller::JUMP))
1143     physic.set_velocity_y(-520);
1144   else
1145     physic.set_velocity_y(-300);
1146 }
1147
1148 //Scripting Functions Below
1149
1150 void
1151 Player::deactivate()
1152 {
1153   if (deactivated)
1154     return;
1155   deactivated = true;
1156   physic.set_velocity_x(0);
1157   physic.set_velocity_y(0);
1158   physic.set_acceleration_x(0);
1159   physic.set_acceleration_y(0);
1160 }
1161
1162 void
1163 Player::activate()
1164 {
1165   if (!deactivated)
1166     return;
1167   deactivated = false;
1168 }
1169
1170 void Player::walk(float speed)
1171 {
1172   physic.set_velocity_x(speed);
1173 }
1174
1175 void
1176 Player::set_ghost_mode(bool enable)
1177 {
1178   if (ghost_mode == enable)
1179     return;
1180
1181   if (enable) {
1182     ghost_mode = true;
1183     set_group(COLGROUP_DISABLED);
1184     physic.enable_gravity(false);
1185     log_debug << "You feel lightheaded. Use movement controls to float around, press ACTION to scare badguys." << std::endl;
1186   } else {
1187     ghost_mode = false;
1188     set_group(COLGROUP_MOVING);
1189     physic.enable_gravity(true);
1190     log_debug << "You feel solid again." << std::endl;
1191   }
1192 }