hedgewars/GSHandlers.inc
changeset 9059 426aae3ffccd
parent 9045 6561c42399d3
child 9072 e7bcdf4f492f
equal deleted inserted replaced
9058:1d58ca61bdcd 9059:426aae3ffccd
  5274                                 begin
  5274                                 begin
  5275                                 hogs.ar^[i]^.Active:= true;
  5275                                 hogs.ar^[i]^.Active:= true;
  5276                                 if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] < 256 then
  5276                                 if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] < 256 then
  5277                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] := hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] + 1
  5277                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] := hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] + 1
  5278                                 else if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] = 256 then
  5278                                 else if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] = 256 then
  5279                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen]:= 200000;//cHedgehogTurnTime + cReadyDelay
  5279                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen]:= 200000-1;//cHedgehogTurnTime + cReadyDelay
  5280                                 end;
  5280                                 end;
  5281                 inc(Pos)
  5281                 inc(Pos)
  5282                 end
  5282                 end
  5283             else if (t > 400) and ((gY > cWaterLine) or
  5283             else if (t > 400) and ((gY > cWaterLine) or
  5284                     (((gX and LAND_WIDTH_MASK = 0) and (gY and LAND_HEIGHT_MASK = 0))
  5284                     (((gX and LAND_WIDTH_MASK = 0) and (gY and LAND_HEIGHT_MASK = 0))