hedgewars/uWorld.pas
changeset 12097 ebe87b6ed182
parent 12072 10aad1cafc10
child 12210 442bab755bb4
equal deleted inserted replaced
12096:a79ab342bc84 12097:ebe87b6ed182
  1193             HorizontOffset:= HorizontOffset + ((ScreenBottom-SkyOffset) div 20);
  1193             HorizontOffset:= HorizontOffset + ((ScreenBottom-SkyOffset) div 20);
  1194 
  1194 
  1195         // background
  1195         // background
  1196         ChangeDepth(RM, cStereo_Sky);
  1196         ChangeDepth(RM, cStereo_Sky);
  1197         if SuddenDeathDmg then
  1197         if SuddenDeathDmg then
  1198             Tint(SDTint.r, SDTint.g, SDTint.b, $FF);
  1198             Tint(SDTint.r, SDTint.g, SDTint.b, SDTint.a);
  1199         DrawRepeated(sprSky, sprSkyL, sprSkyR, (WorldDx + LAND_WIDTH div 2) * 3 div 8, SkyOffset);
  1199         DrawRepeated(sprSky, sprSkyL, sprSkyR, (WorldDx + LAND_WIDTH div 2) * 3 div 8, SkyOffset);
  1200         ChangeDepth(RM, -cStereo_Horizon);
  1200         ChangeDepth(RM, -cStereo_Horizon);
  1201         DrawRepeated(sprHorizont, sprHorizontL, sprHorizontR, (WorldDx + LAND_WIDTH div 2) * 3 div 5, HorizontOffset);
  1201         DrawRepeated(sprHorizont, sprHorizontL, sprHorizontR, (WorldDx + LAND_WIDTH div 2) * 3 div 5, HorizontOffset);
  1202         if SuddenDeathDmg then
  1202         if SuddenDeathDmg then
  1203             untint;
  1203             untint;