equal
deleted
inserted
replaced
194 |
194 |
195 DrawVisualGears(0); |
195 DrawVisualGears(0); |
196 |
196 |
197 // Waves |
197 // Waves |
198 {$WARNINGS OFF} |
198 {$WARNINGS OFF} |
199 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 256 + ((WorldDx + (RealTicks shr 6) ) and $FF), cWaterLine + WorldDy - 64, 0); |
199 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 125 + ((WorldDx + (RealTicks shr 6) ) mod 125), cWaterLine + WorldDy - 64, 0); |
200 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 256 + ((WorldDx - (RealTicks shr 6) + 192) and $FF), cWaterLine + WorldDy - 48, 0); |
200 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 125 + ((WorldDx - (RealTicks shr 6) + 100) mod 125), cWaterLine + WorldDy - 48, 0); |
201 {$WARNINGS ON} |
201 {$WARNINGS ON} |
202 |
202 |
203 DrawLand(WorldDx, WorldDy); |
203 DrawLand(WorldDx, WorldDy); |
204 // Water |
204 // Water |
205 r.y:= WorldDy + cWaterLine + 32; |
205 r.y:= WorldDy + cWaterLine + 32; |
224 |
224 |
225 DrawVisualGears(1); |
225 DrawVisualGears(1); |
226 |
226 |
227 // Waves |
227 // Waves |
228 {$WARNINGS OFF} |
228 {$WARNINGS OFF} |
229 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 256 + ((WorldDx + (RealTicks shr 6) + 64) and $FF), cWaterLine + WorldDy - 32, 0); |
229 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 125 + ((WorldDx + (RealTicks shr 6) + 25) mod 125), cWaterLine + WorldDy - 32, 0); |
230 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 256 + ((WorldDx - (RealTicks shr 6) + 128) and $FF), cWaterLine + WorldDy - 16, 0); |
230 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 125 + ((WorldDx - (RealTicks shr 6) + 50) mod 125), cWaterLine + WorldDy - 16, 0); |
231 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 256 + ((WorldDx + (RealTicks shr 6) ) and $FF), cWaterLine + WorldDy , 0); |
231 for i:= -1 to cWaterSprCount do DrawSprite(sprWater, i * 125 + ((WorldDx + (RealTicks shr 6) + 75) mod 125), cWaterLine + WorldDy , 0); |
232 {$WARNINGS ON} |
232 {$WARNINGS ON} |
233 |
233 |
234 // Turn time |
234 // Turn time |
235 if TurnTimeLeft <> 0 then |
235 if TurnTimeLeft <> 0 then |
236 begin |
236 begin |