equal
deleted
inserted
replaced
48 tX:= HHGear^.X; |
48 tX:= HHGear^.X; |
49 if WorldWrap(HHGear) and (WorldEdge = weWrap) and |
49 if WorldWrap(HHGear) and (WorldEdge = weWrap) and |
50 ((TestCollisionXwithGear(HHGear, 1) <> 0) or (TestCollisionXwithGear(HHGear, -1) <> 0)) then |
50 ((TestCollisionXwithGear(HHGear, 1) <> 0) or (TestCollisionXwithGear(HHGear, -1) <> 0)) then |
51 begin |
51 begin |
52 HHGear^.X:= tX; |
52 HHGear^.X:= tX; |
53 HHGear^.dX.isNegative:= hwRound(tX) > LongInt(leftX) + HHGear^.Radius * 2 |
53 HHGear^.dX.isNegative:= hwRound(tX) > leftX + HHGear^.Radius * 2 |
54 end; |
54 end; |
55 |
55 |
56 if (HHGear^.Hedgehog^.CurAmmoType = amParachute) and (HHGear^.dY > _0_39) then |
56 if (HHGear^.Hedgehog^.CurAmmoType = amParachute) and (HHGear^.dY > _0_39) then |
57 begin |
57 begin |
58 DeleteGear(Gear); |
58 DeleteGear(Gear); |
158 ((TestCollisionXwithGear(HHGear, 1) <> 0) or (TestCollisionXwithGear(HHGear, -1) <> 0)) then |
158 ((TestCollisionXwithGear(HHGear, 1) <> 0) or (TestCollisionXwithGear(HHGear, -1) <> 0)) then |
159 begin |
159 begin |
160 PlaySound(sndRopeRelease); |
160 PlaySound(sndRopeRelease); |
161 RopeDeleteMe(Gear, HHGear); |
161 RopeDeleteMe(Gear, HHGear); |
162 HHGear^.X:= tX; |
162 HHGear^.X:= tX; |
163 HHGear^.dX.isNegative:= hwRound(tX) > LongInt(leftX) + HHGear^.Radius * 2; |
163 HHGear^.dX.isNegative:= hwRound(tX) > leftX + HHGear^.Radius * 2; |
164 exit |
164 exit |
165 end; |
165 end; |
166 |
166 |
167 tX:= HHGear^.X; |
167 tX:= HHGear^.X; |
168 HHGear^.dX.QWordValue:= HHGear^.dX.QWordValue shl 2; |
168 HHGear^.dX.QWordValue:= HHGear^.dX.QWordValue shl 2; |