hedgewars/HHHandlers.inc
changeset 3963 6090d2a2472e
parent 3957 25b0a62e08de
child 3965 09eea558ba83
equal deleted inserted replaced
3962:e9ee2bd51e08 3963:6090d2a2472e
   266                                Y:= _0;
   266                                Y:= _0;
   267                                FollowGear:= AddGear(TargetPoint.X, 0, gtPiano, 0, _0, _0, 0);
   267                                FollowGear:= AddGear(TargetPoint.X, 0, gtPiano, 0, _0, _0, 0);
   268                                PauseMusic
   268                                PauseMusic
   269                                end;
   269                                end;
   270                       amFlamethrower: CurAmmoGear:= AddGear(hwRound(X), hwRound(Y), gtFlamethrower,  0, xx * _0_5, yy * _0_5, 0);
   270                       amFlamethrower: CurAmmoGear:= AddGear(hwRound(X), hwRound(Y), gtFlamethrower,  0, xx * _0_5, yy * _0_5, 0);
       
   271                     amResurrector: CurAmmoGear:= AddGear(hwRound(lx),
       
   272                                            hwRound(ly), gtResurrector, 0, _0,
       
   273                                            _0, 0);
   271                   end;
   274                   end;
   272 
   275 
   273         uStats.AmmoUsed(CurAmmoType);
   276         uStats.AmmoUsed(CurAmmoType);
   274 
   277 
   275         if not (SpeechText = '') then
   278         if not (SpeechText = '') then