# HG changeset patch # User unc0rr # Date 1343241399 -14400 # Node ID 6dc7ccc0b043851c24c8abd13cea33ec6482d409 # Parent fcf13e40d6b660365feac8d33775d275616a732f Bonus for dealing more damage than needed to kill. Should help with cake leaving 1hp issue. Not tested. diff -r fcf13e40d6b6 -r 6dc7ccc0b043 hedgewars/uAIMisc.pas --- a/hedgewars/uAIMisc.pas Wed Jul 25 10:57:00 2012 -0400 +++ b/hedgewars/uAIMisc.pas Wed Jul 25 22:36:39 2012 +0400 @@ -439,21 +439,21 @@ end; if fallDmg < 0 then // drowning. score healthier hogs higher, since their death is more likely to benefit the AI if Score > 0 then - inc(rate, KillScore + Score div 10) // Add a bit of a bonus for bigger hog drownings + inc(rate, (KillScore + Score div 10) * 1024) // Add a bit of a bonus for bigger hog drownings else - dec(rate, KillScore * friendlyfactor div 100 - Score div 10) // and more of a punishment for drowning bigger friendly hogs + dec(rate, (KillScore * friendlyfactor div 100 - Score div 10) * 1024) // and more of a punishment for drowning bigger friendly hogs else if (dmg+fallDmg) >= abs(Score) then if Score > 0 then - inc(rate, KillScore) + inc(rate, KillScore * 1024 + (dmg + fallDmg)) // tiny bonus for dealing more damage than needed to kill else - dec(rate, KillScore * friendlyfactor div 100) + dec(rate, KillScore * friendlyfactor div 100 * 1024) else if Score > 0 then - inc(rate, dmg+fallDmg) - else dec(rate, (dmg+fallDmg) * friendlyfactor div 100) + inc(rate, (dmg + fallDmg) * 1024) + else dec(rate, (dmg + fallDmg) * friendlyfactor div 100 * 1024) end; end; -RateExplosion:= rate * 1024; +RateExplosion:= rate; end; function RateShove(Me: PGear; x, y, r, power, kick: LongInt; gdX, gdY: real; Flags: LongWord): LongInt;