equal
deleted
inserted
replaced
115 end; |
115 end; |
116 |
116 |
117 function CheckCoordInWater(X, Y: LongInt): boolean; inline; |
117 function CheckCoordInWater(X, Y: LongInt): boolean; inline; |
118 begin |
118 begin |
119 CheckCoordInWater:= (Y > cWaterLine) |
119 CheckCoordInWater:= (Y > cWaterLine) |
120 or ((WorldEdge = weSea) and ((X < leftX) or (X > rightX))); |
120 or ((WorldEdge = weSea) and ((X < LongInt(leftX)) or (X > LongInt(rightX)))); |
121 end; |
121 end; |
122 |
122 |
123 function CheckGearsCollision(Gear: PGear): PGearArray; |
123 function CheckGearsCollision(Gear: PGear): PGearArray; |
124 var mx, my, tr: LongInt; |
124 var mx, my, tr: LongInt; |
125 i: Longword; |
125 i: Longword; |