equal
deleted
inserted
replaced
2304 |
2304 |
2305 HHGear := PHedgehog(Gear^.Hedgehog)^.Gear; |
2305 HHGear := PHedgehog(Gear^.Hedgehog)^.Gear; |
2306 HHGear^.State := HHGear^.State or gstNoDamage; |
2306 HHGear^.State := HHGear^.State or gstNoDamage; |
2307 DeleteCI(HHGear); |
2307 DeleteCI(HHGear); |
2308 |
2308 |
|
2309 Gear^.X := HHGear^.X; |
|
2310 Gear^.Y := HHGear^.Y; |
|
2311 |
2309 i := 2; |
2312 i := 2; |
2310 repeat |
2313 repeat |
2311 Gear^.X := Gear^.X + HHGear^.dX; |
2314 Gear^.X := Gear^.X + HHGear^.dX; |
2312 Gear^.Y := Gear^.Y + HHGear^.dY; |
2315 Gear^.Y := Gear^.Y + HHGear^.dY; |
2313 HHGear^.X := Gear^.X; |
2316 HHGear^.X := Gear^.X; |