545             Delete(s, 1, i);

   545             Delete(s, 1, i);

   546             i:= Pos(',', s);

   546             i:= Pos(',', s);

   547             vobVelocity:= StrToInt(Trim(Copy(s, 1, Pred(i))));

   547             vobVelocity:= StrToInt(Trim(Copy(s, 1, Pred(i))));

   548             Delete(s, 1, i);

   548             Delete(s, 1, i);

   549             vobFallSpeed:= StrToInt(Trim(s));

   549             vobFallSpeed:= StrToInt(Trim(s));

   551             end;

   550             end;

   552         end

   551         end

   553     else if key = 'sd-water-top' then

   552     else if key = 'sd-water-top' then

   554         begin

   553         begin

   555         i:= Pos(',', s);

   554         i:= Pos(',', s);

   591             Delete(s, 1, i);

   590             Delete(s, 1, i);

   592             i:= Pos(',', s);

   591             i:= Pos(',', s);

   593             vobSDVelocity:= StrToInt(Trim(Copy(s, 1, Pred(i))));

   592             vobSDVelocity:= StrToInt(Trim(Copy(s, 1, Pred(i))));

   594             Delete(s, 1, i);

   593             Delete(s, 1, i);

   595             vobSDFallSpeed:= StrToInt(Trim(s));

   594             vobSDFallSpeed:= StrToInt(Trim(s));

   597             end;

   595             end;

   598         end

   596         end

   599     else if key = 'rq-sky' then

   597     else if key = 'rq-sky' then

   600         begin

   598         begin

   601         if ((cReducedQuality and rqNoBackground) <> 0) then

   599         if ((cReducedQuality and rqNoBackground) <> 0) then