equal
deleted
inserted
replaced
2089 ox:= Gear^.X; |
2089 ox:= Gear^.X; |
2090 oy:= Gear^.Y; |
2090 oy:= Gear^.Y; |
2091 Gear^.X:= Gear^.X + Gear^.dX; |
2091 Gear^.X:= Gear^.X + Gear^.dX; |
2092 Gear^.Y:= Gear^.Y + Gear^.dY; |
2092 Gear^.Y:= Gear^.Y + Gear^.dY; |
2093 DrawTunnel(oX, oY, Gear^.dX, Gear^.dY, 2, 6); |
2093 DrawTunnel(oX, oY, Gear^.dX, Gear^.dY, 2, 6); |
2094 CheckGearDrowning(Gear); |
2094 if(CheckGearDrowning(Gear)) then |
|
2095 begin |
|
2096 StopSound(sndPickhammer); |
|
2097 exit |
|
2098 end |
2095 end; |
2099 end; |
2096 |
2100 |
2097 t:= CheckGearsCollision(Gear); //fixes drill not exploding when touching HH bug |
2101 t:= CheckGearsCollision(Gear); //fixes drill not exploding when touching HH bug |
2098 if (Gear^.Timer = 0) |
2102 if (Gear^.Timer = 0) |
2099 or (t^.Count <> 0) |
2103 or (t^.Count <> 0) |