equal
deleted
inserted
replaced
1820 CakePoints[CakeI].y:= Gear^.Y; |
1820 CakePoints[CakeI].y:= Gear^.Y; |
1821 Gear^.DirAngle:= DxDy2Angle(tdx, tdy); |
1821 Gear^.DirAngle:= DxDy2Angle(tdx, tdy); |
1822 end; |
1822 end; |
1823 |
1823 |
1824 dec(Gear^.Health); |
1824 dec(Gear^.Health); |
|
1825 Gear^.Timer:= Gear^.Health*10; // This is not seconds, but at least it is *some* feedback |
1825 if (Gear^.Health = 0) or ((Gear^.Message and gm_Attack) <> 0) then |
1826 if (Gear^.Health = 0) or ((Gear^.Message and gm_Attack) <> 0) then |
1826 begin |
1827 begin |
1827 FollowGear:= Gear; |
1828 FollowGear:= Gear; |
1828 Gear^.doStep:= @doStepCakeDown |
1829 Gear^.doStep:= @doStepCakeDown |
1829 end |
1830 end |