hedgewars/HHHandlers.inc
changeset 1261 903058d382c7
parent 1259 0c660c3d98a4
child 1263 24677a82531d
equal deleted inserted replaced
1260:86318e7714c5 1261:903058d382c7
   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                     amSeduction: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtSeduction, 0, xx, yy, 0);
       
   170                    amWatermelon: FollowGear:= AddGear(hwRound(X), hwRound(Y), gtWatermelon,  0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, Ammo^[CurSlot, CurAmmo].Timer);
   170                   end;
   171                   end;
   171 
   172 
   172         uStats.AmmoUsed(Ammo^[CurSlot, CurAmmo].AmmoType);
   173         uStats.AmmoUsed(Ammo^[CurSlot, CurAmmo].AmmoType);
   173 
   174 
   174         Power:= 0;
   175         Power:= 0;