hedgewars/GSHandlers.inc
changeset 8655 9fa380a18a65
parent 8634 5dcb1dc9e01b
child 8668 b04a3724e328
equal deleted inserted replaced
8654:f523e5e84772 8655:9fa380a18a65
  5199                                 begin
  5199                                 begin
  5200                                 hogs.ar^[i]^.Active:= true;
  5200                                 hogs.ar^[i]^.Active:= true;
  5201                                 if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] < 256 then
  5201                                 if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] < 256 then
  5202                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] := hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] + 1
  5202                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] := hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] + 1
  5203                                 else if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] = 256 then
  5203                                 else if hogs.ar^[i]^.Hedgehog^.Effects[heFrozen] = 256 then
  5204                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen]:= cHedgehogTurnTime + cReadyDelay
  5204                                     hogs.ar^[i]^.Hedgehog^.Effects[heFrozen]:= 150000;//cHedgehogTurnTime + cReadyDelay
  5205                                 end;
  5205                                 end;
  5206                 inc(Pos)
  5206                 inc(Pos)
  5207             end
  5207             end
  5208             else if (t > 400) and ((gY > cWaterLine) or
  5208             else if (t > 400) and ((gY > cWaterLine) or
  5209                     (((gX and LAND_WIDTH_MASK = 0) and (gY and LAND_HEIGHT_MASK = 0))
  5209                     (((gX and LAND_WIDTH_MASK = 0) and (gY and LAND_HEIGHT_MASK = 0))