hedgewars/uWorld.pas
changeset 11895 19cb0de79287
parent 11887 083c12795632
child 11912 d3a852554aa7
equal deleted inserted replaced
11894:dd3cbbde7876 11895:19cb0de79287
  1191             HorizontOffset:= HorizontOffset + ((ScreenBottom-SkyOffset) div 20);
  1191             HorizontOffset:= HorizontOffset + ((ScreenBottom-SkyOffset) div 20);
  1192 
  1192 
  1193         // background
  1193         // background
  1194         ChangeDepth(RM, cStereo_Sky);
  1194         ChangeDepth(RM, cStereo_Sky);
  1195         if SuddenDeathDmg then
  1195         if SuddenDeathDmg then
  1196             Tint(SDTint, SDTint, SDTint, $FF);
  1196             Tint(SDTint.r, SDTint.g, SDTint.b, $FF);
  1197         DrawRepeated(sprSky, sprSkyL, sprSkyR, (WorldDx + LAND_WIDTH div 2) * 3 div 8, SkyOffset);
  1197         DrawRepeated(sprSky, sprSkyL, sprSkyR, (WorldDx + LAND_WIDTH div 2) * 3 div 8, SkyOffset);
  1198         ChangeDepth(RM, -cStereo_Horizon);
  1198         ChangeDepth(RM, -cStereo_Horizon);
  1199         DrawRepeated(sprHorizont, sprHorizontL, sprHorizontR, (WorldDx + LAND_WIDTH div 2) * 3 div 5, HorizontOffset);
  1199         DrawRepeated(sprHorizont, sprHorizontL, sprHorizontR, (WorldDx + LAND_WIDTH div 2) * 3 div 5, HorizontOffset);
  1200         if SuddenDeathDmg then
  1200         if SuddenDeathDmg then
  1201             untint;
  1201             untint;