equal
deleted
inserted
replaced
1100 if ((Mask and EXPLDoNotTouchHH) = 0) or (Gear^.Kind <> gtHedgehog) then |
1100 if ((Mask and EXPLDoNotTouchHH) = 0) or (Gear^.Kind <> gtHedgehog) then |
1101 begin |
1101 begin |
1102 DeleteCI(Gear); |
1102 DeleteCI(Gear); |
1103 Gear^.dX:= Gear^.dX + SignAs(_0_005 * dmg + cHHKick, Gear^.X - int2hwFloat(X)); |
1103 Gear^.dX:= Gear^.dX + SignAs(_0_005 * dmg + cHHKick, Gear^.X - int2hwFloat(X)); |
1104 Gear^.dY:= Gear^.dY + SignAs(_0_005 * dmg + cHHKick, Gear^.Y - int2hwFloat(Y)); |
1104 Gear^.dY:= Gear^.dY + SignAs(_0_005 * dmg + cHHKick, Gear^.Y - int2hwFloat(Y)); |
1105 Gear^.State:= Gear^.State or gstMoving; |
1105 Gear^.State:= (Gear^.State or gstMoving) and (not gstWinner); |
1106 Gear^.Active:= true; |
1106 Gear^.Active:= true; |
1107 FollowGear:= Gear |
1107 FollowGear:= Gear |
1108 end; |
1108 end; |
1109 end; |
1109 end; |
1110 gtGrave: begin |
1110 gtGrave: begin |