hedgewars/HHHandlers.inc
changeset 1259 0c660c3d98a4
parent 1112 11590c68b68e
child 1261 903058d382c7
equal deleted inserted replaced
1258:2a9843339910 1259:0c660c3d98a4
   164                        amKamikaze: CurAmmoGear:= AddGear(hwRound(X), hwRound(Y), gtKamikaze, 0, xx * _0_5, yy * _0_5, 0);
   164                        amKamikaze: CurAmmoGear:= AddGear(hwRound(X), hwRound(Y), gtKamikaze, 0, xx * _0_5, yy * _0_5, 0);
   165                          amCake: begin
   165                          amCake: begin
   166                                  CurAmmoGear:= AddGear(hwRound(X) + hwSign(dX) * 3, hwRound(Y), gtCake, 0, xx, _0, 0);
   166                                  CurAmmoGear:= AddGear(hwRound(X) + hwSign(dX) * 3, hwRound(Y), gtCake, 0, xx, _0, 0);
   167                                  PlaySound(sndLaugh, false)
   167                                  PlaySound(sndLaugh, false)
   168                                  end;
   168                                  end;
       
   169                     amSeduction: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtSeduction, 0, xx, yy);
   169                   end;
   170                   end;
   170 
   171 
   171         uStats.AmmoUsed(Ammo^[CurSlot, CurAmmo].AmmoType);
   172         uStats.AmmoUsed(Ammo^[CurSlot, CurAmmo].AmmoType);
   172 
   173 
   173         Power:= 0;
   174         Power:= 0;