equal
deleted
inserted
replaced
665 end; |
665 end; |
666 gtBirdy: begin |
666 gtBirdy: begin |
667 gear^.Radius:= 16; // todo: check |
667 gear^.Radius:= 16; // todo: check |
668 gear^.Health := 2000; |
668 gear^.Health := 2000; |
669 gear^.FlightTime := 2; |
669 gear^.FlightTime := 2; |
670 gear^.Z:= cCurrHHZ+1; |
670 gear^.Z:= cCurrHHZ; |
671 end; |
671 end; |
672 gtEgg: begin |
672 gtEgg: begin |
673 gear^.AdvBounce:= 1; |
673 gear^.AdvBounce:= 1; |
674 gear^.Radius:= 4; |
674 gear^.Radius:= 4; |
675 gear^.Elasticity:= _0_6; |
675 gear^.Elasticity:= _0_6; |