equal
deleted
inserted
replaced
5124 end; |
5124 end; |
5125 |
5125 |
5126 if (Gear^.Pos = 1) and (GameTicks and $1F = 0) and (Gear^.Power < 255) then |
5126 if (Gear^.Pos = 1) and (GameTicks and $1F = 0) and (Gear^.Power < 255) then |
5127 begin |
5127 begin |
5128 inc(Gear^.Power); |
5128 inc(Gear^.Power); |
5129 if (Gear^.Power = 172) and (Gear^.Hedgehog^.Gear <> nil) then |
5129 if (Gear^.Power = 172) and (Gear^.Hedgehog^.Gear <> nil) and ((Gear^.Hedgehog^.Gear^.State and gstHHDeath) = 0) then |
5130 begin |
5130 begin |
5131 with Gear^.Hedgehog^.Gear^ do |
5131 with Gear^.Hedgehog^.Gear^ do |
5132 begin |
5132 begin |
5133 State:= State or gstAnimation; |
5133 State:= State or gstAnimation; |
5134 Tag:= 2; |
5134 Tag:= 2; |