hedgewars/uVisualGearsList.pas
changeset 13040 a87d3119c962
parent 12110 f214d6315b71
child 13329 e8801220c13f
equal deleted inserted replaced
13039:aed4b25ff242 13040:a87d3119c962
    61 var gear: PVisualGear;
    61 var gear: PVisualGear;
    62     t: Longword;
    62     t: Longword;
    63     sp: real;
    63     sp: real;
    64 begin
    64 begin
    65 AddVisualGear:= nil;
    65 AddVisualGear:= nil;
    66 if ((GameType = gmtSave) or (fastUntilLag and (GameType = gmtNet)) or fastScrolling) and // we are scrolling now
    66 if (GameType <> gmtRecord) and
    67    ((Kind <> vgtCloud) and (not Critical)) then
    67    (((GameType = gmtSave) or (fastUntilLag and (GameType = gmtNet)) or fastScrolling) and // we are scrolling now
       
    68    ((Kind <> vgtCloud) and (not Critical))) then
    68        exit;
    69        exit;
    69 
    70 
    70 if ((cReducedQuality and rqAntiBoom) <> 0) and
    71 if ((cReducedQuality and rqAntiBoom) <> 0) and
    71    (not Critical) and
    72    (not Critical) and
    72    (not (Kind in
    73    (not (Kind in