Но так как датчик емкостный, то значение будет иметь какой бензин и с какими присадками залили в бак.
По утвеждению автора датчика, разброс составляет 1.5%, что вроде-бы вполне приемлемо.
 
Но так как датчик емкостный, то значение будет иметь какой бензин и с какими присадками залили в бак.
1.5% очень даже приемлемо! Но все равно смущает что прошивка делалась под "ВАЗ бак 40 литров бензин А-92".По утвеждению автора датчика, разброс составляет 1.5%, что вроде-бы вполне приемлимо.

В проге много арифметики - на двух разрядах незаметно, а на 3 может и сказываться. Уведите индикацию на прерываня, а замеры показаний оставьте в основном цикле1.Когда 3 разряда, заметно мерцание.(когда 2 разряда всё Ок)
Добавьте в2.Как убрать -0- из 1 разряда когда он не нужен?
procedure Led(i: byte);символ пустого знака и проверяйте после расчетов условие L10=0, если да - то индицировать пробел
if porta.0 = 0 then4.Хотелось бы добавить Бип при нажатии кнопки и включении.

Здравствуйте. Подскажите можно ли прошить 16ф676 таким программатором? Шил им успешно 16ф876а. Так как он у меня есть хотел бы его использовать. Подскажите как его переделать нужно.
delay10();
    cc := i mod 3;
    if cc = 2 then begin
      C1 := 0;
      C2 := 0;
      {if sign then begin
        portc := $3B;
        porta.4 := 1;
      end else }
        Led(L100);
      C3 := 1;
    end else if cc = 1 then begin
      C1 := 0;
      C3 := 0;
      Led(L10);
      C2 := 1;
    end else
    begin
      C2 := 0;
      C3 := 0;
      Led(L1);
      C1 := 1;
    end;
  end;
end.
на это:delay10();
    cc := i mod 4;
    if cc = 0 then
    begin
      C1 := 0;
      C2 := 0;
        if (L100 = 0) then
        begin
          portc:= $3F;
          porta.4:=1;
        end
        else
        Led(L100);
      C3 := 1;
    end
    else
    if cc = 1 then
    begin
      C1 := 0;
      C3 := 0;
      Led(L10);
      C2 := 1;
    end
    else
    if cc = 2 then
    begin
      C2 := 0;
      C3 := 0;
      Led(L1);
      C1 := 1;
    end
    else
    if cc = 3 then
    begin
      C2 := 0;
      C3 := 0;
      C1 := 0;
    end;
  end;
end.


