equal
deleted
inserted
replaced
55 Score: LongInt; |
55 Score: LongInt; |
56 end; |
56 end; |
57 |
57 |
58 TBonuses = record |
58 TBonuses = record |
59 activity: boolean; |
59 activity: boolean; |
60 Count : Longword; |
60 Count : LongInt; |
61 ar : array[0..Pred(MAXBONUS)] of TBonus; |
61 ar : array[0..Pred(MAXBONUS)] of TBonus; |
62 end; |
62 end; |
63 |
63 |
64 Twalkbonuses = record |
64 Twalkbonuses = record |
65 Count: Longword; |
65 Count: Longword; |
797 end |
797 end |
798 else if (dmg+fallDmg) >= abs(Score) then |
798 else if (dmg+fallDmg) >= abs(Score) then |
799 begin |
799 begin |
800 dead:= true; |
800 dead:= true; |
801 Targets.reset:= true; |
801 Targets.reset:= true; |
802 if gdX < 0.035 then |
802 if abs(gdX) < 0.035 then |
803 begin |
803 begin |
804 subrate:= RealRateExplosion(Me, round(pX), round(pY), 61, afErasesLand or afTrackFall); |
804 subrate:= RealRateExplosion(Me, round(pX), round(pY), 61, afErasesLand or afTrackFall); |
805 if abs(subrate) > 2000 then inc(Rate,subrate div 1024) |
805 if abs(subrate) > 2000 then inc(Rate,subrate div 1024) |
806 end; |
806 end; |
807 if Score > 0 then |
807 if Score > 0 then |