Сообщений в теме: 1974

[dimon-k714]

program bakometr;

const
stNormal : byte = 1;
stCalibr : byte = 2;
AdrHi : byte = 1;
litr : array [0..AdrHi] of byte = (0,150);

var
C1 : sbit at porta.5;
C2 : sbit at porta.1;
C3 : sbit at porta.2;

SW : sbit at porta.3;
i, j, cc: byte;
V : word; absolute 0x40;
Vhi : byte; absolute 0x41;
VLo : byte; absolute 0x40;
V100 : word;

L100, L10, L1 : byte;
dat : array [0..AdrHi] of byte;
mode : byte;
calibrN : byte;
sign : byte;

procedure Razr(V : integer);
begin
sign := V < 0;
sign := 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
L1:=(L1 div 5)*5
end;

procedure Led(i: short);
begin
if I=0 then begin
portc:=$00;
porta.4:=1;
end;
if I=1 then begin
portc:=$2D;
porta.4:=1;
end;
if I=2 then begin
portc:=$22;
porta.4:=0;
end;
if I=3 then begin
portc:=$28;
porta.4:=0;
end;
if I=4 then begin
portc:=$0D;
porta.4:=0;
end;
if I=5 then begin
portc:=$18;
porta.4:=0;
end;
if I=6 then begin
portc:=$10;
porta.4:=0;
end;
if I=7 then begin
portc:=$09;
porta.4:=1;
end;
if I=8 then begin
portc:=$00;
porta.4:=0;
end;
if I=9 then begin
portc:=$08;
porta.4:=0;
end;
end;

procedure delay10;
begin
delay_ms(10);
end;

procedure ReadData;
begin
for i := 0 to AdrHi do dat[i]:=EEPROM_Read(i);
end;

begin
porta := %00000000;
trisa := %11001001;
portc := %11111111;
trisc := %00000000;

/////////////////////////////////////////////////////
delay_ms(100); ////здесь пишеш сколько мс пауза!! сечас 100 мс!!
//////////////////////////////////////////////////////


wpua := %00000001;
cmcon := %00000111;
ansel := %00000001;
adcon0:= %00000000;
adcon1:= %00110000;

mode:=stNormal;
ReadData;
ADC_Init;
i := 0;
while true do
begin
inc(I);
if mode = stNormal then
begin
if (i.7) and (V<6) then
begin
C1:=0;
C2:=0;
C3:=0;
end;
if i=0 then
begin
V:=ADC_Read(0);
V:=V shr 2;
if V>=dat[AdrHi]
then V:=litr[adrHi]
else
begin
if V<=dat[0]
then V:=litr[0]
else
begin
for j:=0 to AdrHi-1 do
if (V>=dat[j]) and (V<dat[j+1]) then cc:=j;
if cc=AdrHi
then V:=Litr[AdrHi]
else
begin
V:= (V-dat[cc]);
j:=(Litr[cc+1]-Litr[cc]);
V:= V * j;
j:=(dat[cc+1]-dat[cc]);
V:= V / j;
V:= V + litr[cc];
end;
end;
end;

Razr(V);
(*
sign := V < 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
*)
//L10 := V div 10;
//L1 := V mod 10;

if (SW = 0) then
begin
delay_ms(3000);
begin
C1 := 1;
C2 := 1;
C3 := 1;
portc := $3B;
porta.4 := 1;

calibrN := 0;
mode := stCalibr;
delay10;
repeat until SW = 1;
end;
delay10;
end;
end;
end;

if mode = stCalibr then
begin
Razr(litr[calibrN]);
(*
//sign := litr[calibrN] < 0;
L100 := litr[calibrN] div 100;
V100 := litr[calibrN] mod 100;
L10 := V100 div 10;
L1 := V100 mod 10;
*)
if i > 127 then
begin
C1 := 0;
C2 := 0;
C3 := 0;
end;
if SW = 0 then
begin
delay10;
repeat until SW = 1;
delay10;
V:=adc_read(0);
V:=V shr 2;
EEPROM_Write(calibrN,VLo);
inc(calibrN);
if calibrN>AdrHi then
begin
mode:= stNormal;
CalibrN:=0;
delay10;
delay10;
delay10;
delay10;
ReadData;
end;
end;
end;

delay_ms(3);
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.

[dimon-k714]

program bakometr;

const
stNormal : byte = 1;
stCalibr : byte = 2;
AdrHi : byte = 1;
litr : array [0..AdrHi] of byte = (0,150);

var
C1 : sbit at porta.5;
C2 : sbit at porta.1;
C3 : sbit at porta.2;

SW : sbit at porta.3;
i, j, cc: byte;
V : word; absolute 0x40;
Vhi : byte; absolute 0x41;
VLo : byte; absolute 0x40;
V100 : word;

L100, L10, L1 : byte;
dat : array [0..AdrHi] of byte;
mode : byte;
calibrN : byte;
sign : byte;

procedure Razr(V : integer);
begin
sign := V < 0;
sign := 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
L1:=(L1 div 5)*5
end;

procedure Led(i: short);
begin
if I=0 then begin
portc:=$00;
porta.4:=1;
end;
if I=1 then begin
portc:=$2D;
porta.4:=1;
end;
if I=2 then begin
portc:=$22;
porta.4:=0;
end;
if I=3 then begin
portc:=$28;
porta.4:=0;
end;
if I=4 then begin
portc:=$0D;
porta.4:=0;
end;
if I=5 then begin
portc:=$18;
porta.4:=0;
end;
if I=6 then begin
portc:=$10;
porta.4:=0;
end;
if I=7 then begin
portc:=$09;
porta.4:=1;
end;
if I=8 then begin
portc:=$00;
porta.4:=0;
end;
if I=9 then begin
portc:=$08;
porta.4:=0;
end;
end;

procedure delay10;
begin
delay_ms(10);
end;

procedure ReadData;
begin
for i := 0 to AdrHi do dat[i]:=EEPROM_Read(i);
end;

begin
porta := %00100110;
trisa := %11001001;
portc := %00000000;
trisc := %00000000;

/////////////////////////////////////////////////////
delay_ms(100); ////здесь пишеш сколько мс пауза!! сечас 100 мс!!
// переписано под ОА!
//////////////////////////////////////////////////////

porta := %00000000;
portc := %11111111;
wpua := %00000001;
cmcon := %00000111;
ansel := %00000001;
adcon0:= %00000000;
adcon1:= %00110000;

mode:=stNormal;
ReadData;
ADC_Init;
i := 0;
while true do
begin
inc(I);
if mode = stNormal then
begin
if (i.7) and (V<6) then
begin
C1:=0;
C2:=0;
C3:=0;
end;
if i=0 then
begin
V:=ADC_Read(0);
V:=V shr 2;
if V>=dat[AdrHi]
then V:=litr[adrHi]
else
begin
if V<=dat[0]
then V:=litr[0]
else
begin
for j:=0 to AdrHi-1 do
if (V>=dat[j]) and (V<dat[j+1]) then cc:=j;
if cc=AdrHi
then V:=Litr[AdrHi]
else
begin
V:= (V-dat[cc]);
j:=(Litr[cc+1]-Litr[cc]);
V:= V * j;
j:=(dat[cc+1]-dat[cc]);
V:= V / j;
V:= V + litr[cc];
end;
end;
end;

Razr(V);
(*
sign := V < 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
*)
//L10 := V div 10;
//L1 := V mod 10;

if (SW = 0) then
begin
delay_ms(3000);
begin
C1 := 1;
C2 := 1;
C3 := 1;
portc := $3B;
porta.4 := 1;

calibrN := 0;
mode := stCalibr;
delay10;
repeat until SW = 1;
end;
delay10;
end;
end;
end;

if mode = stCalibr then
begin
Razr(litr[calibrN]);
(*
//sign := litr[calibrN] < 0;
L100 := litr[calibrN] div 100;
V100 := litr[calibrN] mod 100;
L10 := V100 div 10;
L1 := V100 mod 10;
*)
if i > 127 then
begin
C1 := 0;
C2 := 0;
C3 := 0;
end;
if SW = 0 then
begin
delay10;
repeat until SW = 1;
delay10;
V:=adc_read(0);
V:=V shr 2;
EEPROM_Write(calibrN,VLo);
inc(calibrN);
if calibrN>AdrHi then
begin
mode:= stNormal;
CalibrN:=0;
delay10;
delay10;
delay10;
delay10;
ReadData;
end;
end;
end;

delay_ms(3);
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.

[dimon-k714]

program bakometr;

const
stNormal : byte = 1;
stCalibr : byte = 2;
AdrHi : byte = 15;
litr : array [0..AdrHi] of byte = (0,10,20,30,40,50,60,70,80,90,100,110,120,130,140,150);

var
C1 : sbit at porta.5;
C2 : sbit at porta.1;
C3 : sbit at porta.2;

SW : sbit at porta.3;
i, j, cc: byte;
V : word; absolute 0x40;
Vhi : byte; absolute 0x41;
VLo : byte; absolute 0x40;
V100 : word;

L100, L10, L1 : byte;
dat : array [0..AdrHi] of byte;
mode : byte;
calibrN : byte;
sign : byte;

procedure Razr(V : integer);
begin
sign := V < 0;
sign := 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
{L1:=(L1 div 5)*5}
end;

procedure Led(i: short);
begin
if I=0 then begin
portc:=$02;
porta.4:=0;
end;
if I=1 then begin
portc:=$1F;
porta.4:=0;
end;
if I=2 then begin
portc:=$08;
porta.4:=1;
end;
if I=3 then begin
portc:=$18;
porta.4:=0;
end;
if I=4 then begin
portc:=$15;
porta.4:=0;
end;
if I=5 then begin
portc:=$30;
porta.4:=0;
end;
if I=6 then begin
portc:=$20;
porta.4:=0;
end;
if I=7 then begin
portc:=$16;
porta.4:=0;
end;
if I=8 then begin
portc:=$00;
porta.4:=0;
end;
if I=9 then begin
portc:=$10;
porta.4:=0;
end;
end;

procedure delay10;
begin
delay_ms(10);
end;

procedure ReadData;
begin
for i := 0 to AdrHi do dat[i]:=EEPROM_Read(i);
end;

begin
porta := %00000000;
trisa := %11001001;
portc := %00000000;
trisc := %00000000;
wpua := %00000001;
cmcon := %00000111;
ansel := %00000001;
adcon0:= %00000000;
adcon1:= %00110000;

mode:=stNormal;
ReadData;
ADC_Init;
i := 0;
while true do
begin
inc(I);
if mode = stNormal then
begin
if (i.7) and (V<10) then
begin
C1:=0;
C2:=0;
C3:=0;
end;
if i=0 then
begin
V:=ADC_Read(0);
V:=V shr 2;
if V>=dat[AdrHi]
then V:=litr[adrHi]
else
begin
if V<=dat[0]
then V:=litr[0]
else
begin
for j:=0 to AdrHi-1 do
if (V>=dat[j]) and (V<dat[j+1]) then cc:=j;
if cc=AdrHi
then V:=Litr[AdrHi]
else
begin
V:= (V-dat[cc]);
j:=(Litr[cc+1]-Litr[cc]);
V:= V * j;
j:=(dat[cc+1]-dat[cc]);
V:= V / j;
V:= V + litr[cc];
end;
end;
end;

Razr(V);
(*
sign := V < 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
*)
//L10 := V div 10;
//L1 := V mod 10;

if (SW = 0) then
begin
delay_ms(3000);
begin
C1 := 1;
C2 := 1;
C3 := 1;
portc := $3B;
porta.4 := 1;

calibrN := 0;
mode := stCalibr;
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
delay_ms(2000);/// тоєсть ~2 сек
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

repeat until SW = 1;
end;
delay10;
end;
end;
end;

if mode = stCalibr then
begin
Razr(litr[calibrN]);
(*
//sign := litr[calibrN] < 0;
L100 := litr[calibrN] div 100;
V100 := litr[calibrN] mod 100;
L10 := V100 div 10;
L1 := V100 mod 10;
*)
if i > 127 then
begin
C1 := 0;
C2 := 0;
C3 := 0;
end;
if SW = 0 then
begin
delay10;
repeat until SW = 1;
delay10;
V:=adc_read(0);
V:=V shr 2;
EEPROM_Write(calibrN,VLo);
inc(calibrN);
if calibrN>AdrHi then
begin
mode:= stNormal;
CalibrN:=0;
delay10;
delay10;
delay10;
delay10;
ReadData;
end;
end;
end;

delay_ms(3);
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.

[Gipsy]

А почтовыми ящиками один я пользуюсь для обмена информацией? Или сейчас новая фишка. - добавить строчку и сразу же весь исходник на форум постить? :)

[yura-ua]

народ,на девятке какой датчик?0 ом-пустой или полный?кто делал,подскажите,спасибо

[sanyasanevich]

народ,на девятке какой датчик?0 ом-пустой или полный?кто делал,подскажите,спасибо

360 ом пустой. 10 ом полный.

[master777]

program bakometr;

const
stNormal : byte = 1;
stCalibr : byte = 2;
AdrHi : byte = 15;
litr : array [0..AdrHi] of byte = (0,10,20,30,40,50,60,70,80,90,100,110,120,130,140,150);

var
C1 : sbit at porta.5;
C2 : sbit at porta.1;
C3 : sbit at porta.2;

SW : sbit at porta.3;
i, j, cc: byte;
V : word; absolute 0x40;
Vhi : byte; absolute 0x41;
VLo : byte; absolute 0x40;
k, V100 : word;

L100, L10, L1 : byte;
dat : array [0..AdrHi] of byte;
mode : byte;
calibrN : byte;
sign : byte;

procedure Razr(V : integer);
begin
sign := V < 0;
sign := 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
{L1:=(L1 div 5)*5}
end;

procedure Led(i: short);
begin
if I=0 then begin
portc:=$02;
porta.4:=0;
end;
if I=1 then begin
portc:=$1F;
porta.4:=0;
end;
if I=2 then begin
portc:=$08;
porta.4:=1;
end;
if I=3 then begin
portc:=$18;
porta.4:=0;
end;
if I=4 then begin
portc:=$15;
porta.4:=0;
end;
if I=5 then begin
portc:=$30;
porta.4:=0;
end;
if I=6 then begin
portc:=$20;
porta.4:=0;
end;
if I=7 then begin
portc:=$16;
porta.4:=0;
end;
if I=8 then begin
portc:=$00;
porta.4:=0;
end;
if I=9 then begin
portc:=$10;
porta.4:=0;
end;
end;

procedure delay10;
begin
delay_ms(10);
end;

procedure ReadData;
begin
for i := 0 to AdrHi do dat[i]:=EEPROM_Read(i);
end;

begin
porta := %00000000;
trisa := %11001001;
portc := %00000000;
trisc := %00000000;
wpua := %00000001;
cmcon := %00000111;
ansel := %00000001;
adcon0:= %00000000;
adcon1:= %00110000;
k:=10000;
while k>0 do
begin
C1:=1;
C2:=0;
C3:=0;
Led(8);

C1:=0;
C2:=1;
C3:=0;
Led(8);

C1:=0;
C2:=0;
C3:=1;
Led(8);
k:=k-1;
end;
mode:=stNormal;
ReadData;
ADC_Init;
i := 0;
while true do
begin
inc(I);
if mode = stNormal then
begin
if (i.7) and (V<10) then
begin
C1:=0;
C2:=0;
C3:=0;
end;
if i=0 then
begin
V:=ADC_Read(0);
V:=V shr 2;
if V>=dat[AdrHi]
then V:=litr[adrHi]
else
begin
if V<=dat[0]
then V:=litr[0]
else
begin
for j:=0 to AdrHi-1 do
if (V>=dat[j]) and (V<dat[j+1]) then cc:=j;
if cc=AdrHi
then V:=Litr[AdrHi]
else
begin
V:= (V-dat[cc]);
j:=(Litr[cc+1]-Litr[cc]);
V:= V * j;
j:=(dat[cc+1]-dat[cc]);
V:= V / j;
V:= V + litr[cc];
end;
end;
end;

Razr(V);
(*
sign := V < 0;
L100 := V div 100;
V100 := V mod 100;
L10:= V100 div 10;
L1 := V100 mod 10;
*)
//L10 := V div 10;
//L1 := V mod 10;

if (SW = 0) then
begin
delay_ms(3000);
begin
C1 := 1;
C2 := 1;
C3 := 1;
portc := $3D;
porta.4 := 1;

calibrN := 0;
mode := stCalibr;
delay10;
repeat until SW = 1;
end;
delay10;
end;
end;
end;

if mode = stCalibr then
begin
Razr(litr[calibrN]);
(*
//sign := litr[calibrN] < 0;
L100 := litr[calibrN] div 100;
V100 := litr[calibrN] mod 100;
L10 := V100 div 10;
L1 := V100 mod 10;
*)
if i > 127 then
begin
C1 := 0;
C2 := 0;
C3 := 0;
end;
if SW = 0 then
begin
delay10;
repeat until SW = 1;
delay10;
V:=adc_read(0);
V:=V shr 2;
EEPROM_Write(calibrN,VLo);
inc(calibrN);
if calibrN>AdrHi then
begin
mode:= stNormal;
CalibrN:=0;
delay10;
delay10;
delay10;
delay10;
ReadData;
end;
end;
end;

delay_ms(3);
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.

[chaynik]

Не прошло и пол года как решился я вчера поставить таки девайс на свой автомобиль. Сделал товарищу на таврию у него успешно работает. У меня же выявилась проблема, после тарировке меньше 15 литров не показывает, начинают мигать нули. сам пока не разбирался. Что навскидку может быть? Автомобиль ваз 2109

Померял напругу на 13 ноге, она при пустом баке больше чем на 12й. поэтому и хрень такая. У меня 09 1989 года. Может сопротивления другие хз. решил делитель препаять попробую отпишусь

[chaynik]

Померял напругу на 13 ноге, она при пустом баке больше чем на 12й. поэтому и хрень такая. У меня 09 1989 года. Может сопротивления другие хз. решил делитель препаять попробую отпишусь

Поменял местами в делителе 13 ноги резисторы 10 и 20 кОм. стало всё на место.

[Малярек]

Поменял местами в делителе 13 ноги резисторы 10 и 20 кОм. стало всё на место.

в общем ты поменял 10кОм на 13 ноге, 20кОмами? А делитель в 1.5 кОм, оставил прежним?

[chaynik]

в общем ты поменял 10кОм на 13 ноге, 20кОмами? А делитель в 1.5 кОм, оставил прежним?

На схеме делитель из резисторов 10 и 20 кОм. Полтора кОм нет вообще.

[Малярек]

На схеме делитель из резисторов 10 и 20 кОм. Полтора кОм нет вообще.

Как нету, ты по какой делал схеме? По этой?

Прикрепленные файлы

•  s21002631.jpg   25.73К

[chaynik]

Как нету, ты по какой делал схеме? По этой?

Нет, это старая схема, на первой странице есть другая, с другой прошивкой. Различие в том что старая схема меняет показания от напряжения сети, а вторая нет.

Я вот подумал, моя проблема могла появиться из за плохой "земли" или паразитного сопротивления по линии "массы" от датчика, до платы "бакометра". Тогда напруга могла быть завышена на 13 ноге. Я просто "затоптал проблему ногами" изменив К. передачи делителя. Буду копать ещё.

[Малярек]

Нет, это старая схема, на первой странице есть другая, с другой прошивкой. Различие в том что старая схема меняет показания от напряжения сети, а вторая нет.

Я вот подумал, моя проблема могла появиться из за плохой "земли" или паразитного сопротивления по линии "массы" от датчика, до платы "бакометра". Тогда напруга могла быть завышена на 13 ноге. Я просто "затоптал проблему ногами" изменив К. передачи делителя. Буду копать ещё.

Эта та что с опорным напряжением? Кинь ссылку на нее, а то может не ту нашел…

[sanyasanevich]

проверка бакометра. движение по ямам на ваз 2108 в баке 7-8 литров.----

[Малярек]

По какой же все таки схеме делать чтобы все нормально работала, а то тут куча....Подскажите пожалуйста, кому не сложно…

[sanyasanevich]

По какой же все таки схеме делать чтобы все нормально работала, а то тут куча....Подскажите пожалуйста, кому не сложно…

[sanyasanevich]

мне вот эта подошла. только родной указатель топлива полностью надо отключить!

Прикрепленные файлы

•  бакометр001.JPG   29.88К

[Малярек]

Спасибо большое, буду пробовать!) Хорошо хоть детали чуть поменять надо, а не схему
Кстати, я делал по самой первой схеме, и мне приходилось тоже, отключать от питания родной шкалик, в итоге питание идет со схемы. Скажи, у тебя показывает все ниже 5 л значения? И при включении габаритов, значения не меняются? А то у меня было такое, что при стоянке и заводке авто, все нормально, а вот стоило включить габариты при заведенной машине, то сразу значения менялись!

[sanyasanevich]

Спасибо большое, буду пробовать!) Хорошо хоть детали чуть поменять надо, а не схему />/>/>
Кстати, я делал по самой первой схеме, и мне приходилось тоже, отключать от питания родной шкалик, в итоге питание идет со схемы. Скажи, у тебя показывает все ниже 5 л значения? И при включении габаритов, значения не меняются? А то у меня было такое, что при стоянке и заводке авто, все нормально, а вот стоило включить габариты при заведенной машине, то сразу значения менялись!

на счет ниже 5 литров- это у тебя скорее всего сам датчик в баке не видит остаток менее 5 литров.мой датчик что при 0 литрах что при 800 грамм показывает 360 ом. после 800 грамм показания начинают меняться. я бы посоветовал тебе снять датчик с бака почистить его опустить поплавок до конца вниз подсоединить тестер и начинать поднимать поплавок и следить за показаниями. они должны сразу меняться. если нет то подгибай язычок. и еще полезно вот это знать ( http://www.lada.cc/a…=article&id=125 ) см.фото 001. у меня при калибровке случайно получалось двойное нажатие на кнопку бакометра и приходилась опять сливать весь бензин и так несколько раз. потом я психанул и собрал реостат на 500 ом см.фото 002. короче вместо бакометра подсоединил тестер заливал по литру и записывал показания датчика. потом на реостате отметил эти показания и настроил бакометр.а вообще при калибровке лучше выпаять кондер на 470мкф. а после калибровки впаять.... а насчет габаритов это по любому у тебя плохая масса на бензобаке!!! которая скорее всего берется от туда же от куда и масса для габаритов

Прикрепленные файлы

•  001.jpg   83.44К
•  002.jpg   157.93К