equal
deleted
inserted
replaced
1123 cLaserSighting:= true; |
1123 cLaserSighting:= true; |
1124 |
1124 |
1125 if (GameFlags and gfArtillery) <> 0 then |
1125 if (GameFlags and gfArtillery) <> 0 then |
1126 cArtillery:= true; |
1126 cArtillery:= true; |
1127 |
1127 |
1128 if not hasBorder and ((Theme = 'Snow') or (Theme = 'Christmas')) then |
1128 if not hasBorder and ((Theme = 'Snow') or (Theme = 'Christmas')) and ((cReducedQuality and rqLowRes) = 0) then |
1129 begin |
1129 begin |
1130 for i:= 0 to Pred(vobCount*2) do |
1130 for i:= 0 to Pred(vobCount*2) do |
1131 AddGear(GetRandom(LAND_WIDTH+1024)-512, LAND_HEIGHT - GetRandom(1024), gtFlake, 0, _0, _0, 0); |
1131 AddGear(GetRandom(LAND_WIDTH+1024)-512, LAND_HEIGHT - GetRandom(LAND_HEIGHT div 2), gtFlake, 0, _0, _0, 0); |
1132 disableLandBack:= true |
1132 disableLandBack:= true |
1133 end |
1133 end |
1134 end; |
1134 end; |
1135 |
1135 |
1136 procedure doMakeExplosion(X, Y, Radius: LongInt; Mask: LongWord); |
1136 procedure doMakeExplosion(X, Y, Radius: LongInt; Mask: LongWord); |