:: www.honda-club.cz :: Zobrazit téma - dj-bobr: Honda Civic 5G EG8 1992

M@jk

Členství: Gold

Příspěvky: 17752

dj-bobr

Členství: Žádné

		Zaslal: 25.11.2013 , 16:01
Dnes ráno jsem přijel po náročném a vyčerpávajícím víkendu z Otrokovic, kde jsme s týmem HTB celou neděli do nočních hodin pracovali na mém autě. Udělalo se toho fakt spoustu, kluci odvedli perfektní práci a projevili se jako totálně sehraná dvojka - kdo z vás by sundal a nandal převodovku za 25min? Míro a Ondro, díky moc za vše. Auto je jak vyměněné, drží na silnici, vůbec nehází při razantnějším zatáčení. Těším se na drsnější vyzkoušení po seřízení geometrie. Řazení je přesné a rychlé, převodovka neškrtá ani těsně před omezovačem. Brzdy jsou dávkovatelné, nejsou jedovaté, nekopou, nástup je čitelný. Co chtít víc? (ehm, třeba samolepku Silponix) V následujících příspěvcích popíšu, co se všechno dělalo - vždy jeden příspěvek na jednu oblast auta.

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 25.11.2013 , 16:02 Naposledy upravil dj-bobr dne 25.11.2013 , 16:10, celkově upraveno 1 krát.

Přední i zadní brzdy

- tak nějak celková kontrola
- čištění a promazání vodítek
- masa na deskách ještě dost, pakny už jsou na tom hůř
- sundání orezlého hicplechu
- výměna pravé přední hadice
- výměna brzdovky a samozřejmě kompletní odvzdušnění
- seřízení ruční brzdy
- zjištění, že by to chtělo výhledově obstarat pravou zadní trubičku Tak to valím bulvy

Celkově jsem čekal o dost horší výsledek kontroly brzd, s tímhle se nebojím jezdit. Letní dovádění na okruhu však zanechalo trochu stop na destičkách, zauvažuju nad Ferodo DS řadou - sériové TRW holt nejsou zrovna performance destičky.

hrubsi udrzba zadnich brzd IMG_0540.jpg, 119.57 kB

jemna udrzba prednich brzd IMG_0538.jpg, 92.46 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 25.11.2013 , 16:02 Naposledy upravil dj-bobr dne 25.11.2013 , 16:12, celkově upraveno 1 krát.

Řezání a vaření kapsičky na matku v nápravnici

Při manipulaci s předními rameny bylo zjištěno, že nejsou v nápravnici přibodované matky pro přišroubování zadních silentbloků spodních ramen. Co s tím, to se tak trochu nabízí - vyřezat flexou kapsičku, nabodovat matku, zavařit kapsičku zpátky, vystříknout dutinu voskem a zastříkat barvou..

01vyrezat dirku IMG_0583.jpg, 160.88 kB

02kvuli tehle potvore IMG_0587.jpg, 38.42 kB

03kuk na strejdu IMG_0588.jpg, 103.97 kB

04navarit matku IMG_0594.jpg, 94.77 kB

05a je zavareno IMG_0597.jpg, 81.02 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 25.11.2013 , 16:03 Naposledy upravil dj-bobr dne 25.11.2013 , 16:18, celkově upraveno 1 krát.

Generální oprava převodovky

Výchozí stav: převodovka, která hučí při jakémkoliv kvaltu a megahučí při trojce, zejména při brždění motorem. Dále pravděpodobně opotřebené spojkové ložisko, neboť šustí na volnoběh a při sešlápnutí spojkového pedálu šustění zeslábne a zmizí.
V kufru moje stará převodovka, která nehučí, ale nejde zařadit trojka.

Tak jsme to rozhodili.. bylo rozhodnuto o použití staré trojko-neřadící převodovky a opravě trojky. Synchron byl na kaši, přesuvník rovněž. Na magnetu byl onen synchron v prášku cože cože ?

(stačí zalít olejem a zamíchat..). Z vidličky řazení byl vyštíplý kus masa. Použily se díly z druhé převodovky, synchron dán dobrý použitý. Swaplo se taky kolečko zpátečky. Podmáznout silikonem, přidělat, nové ložisko, namazat vidličku, nasadit, nalít olej a bylo hotovo ..

01samotny obal IMG_0548.jpg, 107.12 kB

02vidlicka razeni na stare prevodovce IMG_0550.jpg, 97.29 kB

03synchron v prasku IMG_0551.jpg, 123.85 kB

04at zijou kolecka IMG_0554.jpg, 134.1 kB

05synchron trojky v riti IMG_0567.jpg, 88.96 kB

06poskladat dohromady IMG_0579.jpg, 128.99 kB

07podmaznout silikonem IMG_0582.jpg, 103.29 kB

08a samozrejme nove lozisko IMG_0609.jpg, 52.42 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 25.11.2013 , 16:03 Naposledy upravil dj-bobr dne 25.11.2013 , 16:24, celkově upraveno 1 krát.

Výměna ramen, všechny nové silentbloky a čepy

Nalisovány všechny originální silentbloky, vyjma zadních puků Yamato, silentů předních spodních ramen do nápravnice Silponix a silentů předních spodních "obloukových" ramen směrem dozadu, rovněž Silponix. Nové silenty jsou znát okamžitě - auto drží stopu, jde lépe řídit, zmizelo škubání při prudkém brždění - brzda nasazuje plynuleji.
Ramena swapnuta za opískované, zinkované a nalakované kusy - nádhera. Těhlice natřeny modrým Alkytonem, ať je to barevnější Úsměv

Čepy horní Yamato, dolní 555, všechny opatřeny mazivem - z továrny jsou jen lehce mastné. Čepy řízení jsem neměnil, ty jsou dobré - nedávno nové.

(chlapi, kdybyste tu fotku s tím vytloukáním čepu chtěli zcenzurovat nebo úplně odstranit, dejte mi vědět - budu respektovat)

01zinkovana a lakovana ramena IMG_0537.jpg, 111.01 kB

02zalez tam potvoro IMG_0530.jpg, 68.03 kB

03dvacet let rozdil IMG_0535.jpg, 95.92 kB

04zadni spodni rameno a tlumicovy nesilent IMG_0541.jpg, 91.72 kB

05jak vysadit cep IMG_0543.jpg, 92.98 kB

06zadni exsilent IMG_0545.jpg, 99.49 kB

07yamato IMG_0559.jpg, 80.77 kB

08osazeno IMG_0561.jpg, 97.92 kB

09i spodni cepy pujdou nove IMG_0611.jpg, 121.21 kB

10novy zadni velky silent IMG_0624.jpg, 81.49 kB

11sundat hadici a nahodit modrou tehlici IMG_0617.jpg, 63.05 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 25.11.2013 , 16:04 Naposledy upravil dj-bobr dne 25.11.2013 , 16:27, celkově upraveno 1 krát.

Repase řazení

Moje řazení trpělo velkou vůlí, kterou sice set přesného řazení Silponix značně snížil, ale stále byl znát velký vakl na spoji řadicí tyče. Odos neváhal a vysoustružil cosi, co sice neumím přesně nazvat, ale řazení je najednou naprosto jasné, kvalty precizně zapadají a vůle do stran je zcela minimální. Přitom to ale nebrání velmi rychlému řazení, nechá se to přeřazovat bleskově Úsměv

01nejdriv razeni sundat IMG_0578.jpg, 78.2 kB

02lehounky tuning IMG_0580.jpg, 81.74 kB

03lepsi fotka IMG_0581.jpg, 51.13 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 25.11.2013 , 16:04 Naposledy upravil dj-bobr dne 25.11.2013 , 16:30, celkově upraveno 1 krát.

Repase vnějšího homokinetického kloubu krátké poloosy

Od mirage21 jsem kdysi dávno koupil dobré poloosy se zdravými klouby a dlouhou jsme rovnou vyměnili, ale krátká vázla na pojistném kroužku, který se nakonec povedlo taky sehnat. K výměně už však nedošlo a poloosu jsem vozil čtvrt roku v kufru zabalenou ve vodotěsné fólii..

a tak jsem se rozhodl vyměnit tu krátkou poloosu, když už je rozebráno. Míra HTB bravurně zrepasoval homokloub - rozdělal ho na kuličky, vypral v benzínu, nové mazivo, složit, narazit (s kroužkem byl stejně opruz, ale nakonec podlehl a je tam) na poloosu a namontovat na auto. Z dlouhé poloosy jsme rovnou odflexovali ten gumový bazmeg, co to pod ním rádo hnije.

01zahrajem si kulicky IMG_0598.jpg, 125.11 kB

02kdo maze ten jede IMG_0599.jpg, 86.27 kB

03opruz s krouzkem IMG_0606.jpg, 45.26 kB

04eliminace gumy na poloose IMG_0610.jpg, 84.4 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Příspěvky: 4973

M@jk

Členství: Gold

Zaslal: 25.11.2013 , 16:17 Naposledy upravil M@jk dne 25.11.2013 , 16:58, celkově upraveno 1 krát.

dj-bobr napsal:

Dnes ráno jsem přijel po náročném a vyčerpávajícím víkendu z Otrokovic, kde jsme s týmem HTB celou neděli do nočních hodin pracovali na mém autě. Udělalo se toho fakt spoustu, kluci odvedli perfektní práci a projevili se jako totálně sehraná dvojka - kdo z vás by sundal a nandal převodovku za 25min? kouř

Míro a Ondro, díky moc za vše. Auto je jak vyměněné, drží na silnici, vůbec nehází při razantnějším zatáčení. Těším se na drsnější vyzkoušení po seřízení geometrie. Řazení je přesné a rychlé, převodovka neškrtá ani těsně před omezovačem. Brzdy jsou dávkovatelné, nejsou jedovaté, nekopou, nástup je čitelný. Co chtít víc? je to dobrý

(ehm, třeba samolepku Silponix)

V následujících příspěvcích popíšu, co se všechno dělalo - vždy jeden příspěvek na jednu oblast auta.

Ola,
Míra mi už referoval, jak to vše dopadlo. Mazec.
Velmi šťastný

Dovolil bych si říci, že setkání v Praze na pivu bylo osudové, což?
Myslím, že HTB je taková dvojka, která stylem svoji práce, ochotou, nabídnutými řešeními dokáže z majitele vozu udělat maximálně spokojeného člověka, který nebude zruinován a maximálně mu vykouzlí spokojený úsměv.
Dji,
GRATULUJI TI!!! Těším se na svezení.

Výsledky práce na Tvém autě už vím. Na svém snad ani raději nebudu ventilovat. Jediné mohu řici: "Těším se na první VTičko ..." VTEC

Příspěvky: 17752

Boo-Boo

Členství: Žádné

Příspěvky: 191

dj-bobr

Členství: Žádné

		Zaslal: 25.11.2013 , 16:39
M@jku, plná pravda. Ten úsměv, který se mi roztáhl na xichtě po najetí na dálnici a vyzkoušení manévrovacích schopností auta a zkoušení řazení, ten byl skoro až nechutnej cesta do Prahy byla krušná, dvě přestávky po 45min spánku byly nutné a do Prahy jsem přijel v 8 ráno, ale přežil jsem to. První letošní sníh mě potkal už v Otrokovicích a trochu taky na Vysočině.. Letos investice do auta však pomalu končí. Chtělo by to ještě přelepit zadní okno, navrtat díry do prahů a přimontovat plastové prahy, zakonzervovat nějak tu dírku v podlaze, udělat ventilové vůle a přetěsnit víko ventilů, vyměnit gumu okna řidiče a především vyměnit olejovou vanu a seřídit geometrii, ale jinak cajk.

Příspěvky: 4973

M@jk

Členství: Gold

Zaslal: 25.11.2013 , 16:40

dj-bobr napsal:

Ola,
tak to uděla to samé, co mne.

Vysoustružil totiž původní uložení tyče řazení, dal větší šroub - u mne v nerezu a bylo. Přitom si pamatuji, že nepotřebuješ přesné krátké řazení, ale myslím, že to strašně oceníš.
přátele

Jsme dnes na Hradčanské na odpolední (tj.do 20.10h), takže pokud by si mi chtěl ukázat, jak to jede, rád se svezu. Míra referoval.
Je to tam.

Příspěvky: 17752

odos

Členství: Žádné

Zaslal: 2.12.2013 , 0:21 Naposledy upravil odos dne 2.12.2013 , 0:32, celkově upraveno 1 krát.

dj-bobr napsal:

(ehm, třeba samolepku Silponix)

V následujících příspěvcích popíšu, co se všechno dělalo - vždy jeden příspěvek na jednu oblast auta.

Díky

nálepky budou. Strašně jsem se zasmál, když jsem četl větu: "Odos neváhal a vysoustružil cosi" Velmi šťastný

a nebo že Mira rozebral kloub "na kuličky" . Ty dovedeš pobavit...... Jinak ta fotka s tim vytloukanim čepu je fakt famózní. přátele

Příspěvky: 398

1997 Prelude VTEC

dj-bobr

Členství: Žádné

Příspěvky: 4973

odos

Členství: Žádné

Příspěvky: 398

1997 Prelude VTEC

dj-bobr

Členství: Žádné

Příspěvky: 4973

mirage21

Členství: Žádné

Příspěvky: 963

1993 Prelude

dj-bobr

Členství: Žádné

Příspěvky: 4973

M@jk

Členství: Gold

Příspěvky: 17752

dj-bobr

Členství: Žádné

Příspěvky: 4973

Fish

Členství: Žádné

Příspěvky: 1937

dj-bobr

Členství: Žádné

Příspěvky: 4973

M@jk

Členství: Gold

Příspěvky: 17752

dj-bobr

Členství: Žádné

Zaslal: 3.12.2013 , 23:57

M@jk už to viděl naživo, ostatní jen obrázek Úsměv

budíky a hodnoty samozřejmě fungují. Je to primárně spíš taková srandička na otestování komunikačního protokolu ECU OBD1 vůči počítači, abych mohl kód implementovat do palubního počítače s Arduinem a LCD displejem.

Zdrojový kód ve VB6 pošlu na vyžádání..

Potřebuji napíchnout vstřikovače na osciloskop, abych zkalibroval spotřebu/vytížení vstřiků vůči hodnotám z ECU - kdo máte? Nechci to zadarmo Úsměv

hondaecukom.png, 379.36 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 12.12.2013 , 1:36

Update palubního počítače:

Kašlu na osciloskop, zvukovka v notebooku s oddělovacím prvkem s optočlenem taky posloužila. Velmi letmá kalibrace vyšla - opravdu 57.6l/h plného průtoku vstřikovačů, fakt že jo, 240ccm .. výpočet vyšel v přesné korelaci s realitou.
Nacpal jsem kód pro komunikaci s ECU do Arduina (ať žije pracovní doba), vyvedl si lepší kablík z CN2 konektoru z ECU ven do auta a otestoval. Sorry za roztřesenost, jednou rukou řídit a druhou držet foťák není úplně triviální Úsměv

Budou se muset ještě dotahat nějaká analogová čidla - teplota oleje (potřebuju nutně adaptér na olejový filtr, nebo se dá někde k teplotě oleje dostat elegantněji - ponořit termistor do vany?), drát od budíků na ukazatel paliva (plovák), teplota venku a teplota vevnitř možná ..

Mám to většinu času strašně bohatý - kterým čidlem hejbat (piggyback metoda), abych to ochudil? Patrně asi teplotou vody nebo MAPem bych čekal.. (na druhou stranu, jezdí to na čistý E85 takřka stechiometricky, jen ty starty jsou horší a dokonce to při nich občas střelí do sání - viz foto, já věděl, že provizorní těsnění duct tapem nevydrží..)

Odkaz

palubpc1.jpg, 313.24 kB

palubpc2.jpg, 288.18 kB

strelba.jpg, 157.57 kB

Příspěvky: 4973

dj-bobr

Členství: Žádné

Zaslal: 16.12.2013 , 2:36

Trampoty s ECU a neexistující chybou 20

Stručně. Swapli jsme jednotky s Ondřejem (OGI), taky C5g, on má P28, já P1K, kompatibilní .. výsledek:
- u něj v autě chyby 36 a 41
- u mě v autě svítí kontrolka, ale nejde vyblikat nic
- zahoupal mi volnoběh při startu, jako kdyby to bylo Ondřejovo auto
- Ondřejovi auto nastartovalo hladce a volnoběh taky OK

takže Ondřej potřebuje asi přemapovat (resp. naladit), což je divný, jelikož P28 je původně na D16Z6 a on tam D16Z6 má (už i blok, nejen palici) to mi hlava nebere

a já mám chybu fakt někde v elektroinstalaci. podezřívám Purge Cut Solenoid Valve a 2-way valve, od jedné z nich jsem zahlídnul nezapojený konektor, zkusím tam vrazit pár ohmů odpor, aby si ECU myslela, že tam je něco zapojenýho (i když jestli to kontroluje sofistikovaněji, jako třeba v případě IACV, tak nevím nevím)

Podsvit a úprava budíků

Pomalu mi začaly odcházet LEDky v budících - ano, došlo na Štěpova slova, že 25mA těm ledkám neprospívá.. rozhodl jsem se tedy vypájet všechny LEDky podsvětlení budíků a nahradil jsem je LED pásky. Svítí to šíleně moc, budu muset udělat nějakou PWM regulaci (nebo aspoň reostat do série)..

Vyveden drátek FUEL pro palubní počítač.

Opraven utržený dráteček cívky palivoměru ve sdruženém budíku, zalito epoxidem. Nikdy ty šroubky na přimontování budíku k plošňáku nešroubujte moc intenzivně, zejména u palivoměru a teploměru!

Odstraněn pseudotuning otáčkoměru, návrat xérii.

Vytvořil jsem na místo kontrolky ABS ikonku potkávacích světel a vrazil tam ledku s hlavičkou nabarvenou zelenou lihovkou. Svítí to příjemně, ještě se to bude muset zapojit na příslušný okruh v elektroinstalaci auta.

Budu řešit ještě ikonku hladového oka (spínanou Arduinem), shift light (asi bodová červená ledka někde vedle budíkové kapličky pálící přímo do xichtu) a VTEC light (falešný pořádnej výtlem

- nad 5500ot. a 50% plynu se rozsvítí VTEC

)

Palubní počítač

Proběhla optimalizace kódu:
- tabulka hodnot místo polynomu pro výpočet teploty vody a vzduchu z napětí na příslušných čidlech
- VTEC light, SHIFT light
- napsán kód pro výpočet množství paliva v nádrži podle napětí z plováku včetně korekce údaje v závislosti na napětí baterie - holt napájecí napětí pro plovák není stabilizované, tak se to musí řešit softwarově..
- opravena chyba, že se podklad na LCD vykresloval při každém průběhu smyčky
- přepracován kód pro indikaci lambda sondy - napětí nad 1V = WARMING UP, napětí ještě vyšší = ERROR

Budu kalibrovat litry v nádrži - jak na to, abych měl napětí baterie stejné, jako za jízdy, a mohl po litrech tankovat? to mi hlava nebere

se bude muset nějak vymyslet..

Budu kalibrovat výpočet spotřeby - nevím ještě jak, ale je to nezbytné.

Získal jsem (díky M@jku) ještě jednu "kostru" budíků (tu bílou věc - vnitřek kapličky prostě), v plánu je zkusit zaimplementovat displej palubního počítače místo sdruženého budíku paliva a teploty.

Čím snímat teplotu oleje? Hodit čidlo do vany, nebo radši adaptér pod olejový filtr? Slyšel jsem, že často tečou Tak to valím bulvy

Umíte někdo Céčko a znáte Arduino? Hodilo by se mi, kdybyste mi někdo pročetl kód a upozornil na nějaké zásadní kopance.. nejsem programátor HaHaaa

kód:

#include <LiquidCrystal.h>
// LiquidCrystal lcd(12, 11, 10, 5, 4, 3, 2); // LCD 16x2 keypad shield
LiquidCrystal lcd(8, 10, 9, 4, 5, 6, 7); // LCD 20x4 modre
int stranka;
int tlacitko;
float DutyCycle;
float Speed;
int pinSHIFTLIGHT = 13; // pin na Shift light
int pinVTEC = 12; // pin na VTEC light
int pinHLAD = 11; // pin na hladovy voko
byte outArray[12]; // pole hodnot z ECU

int teploty[] = { 138, 135, 133, 130, 128, 126, 124, 122, 119, 117, 115, 114, 113, 111, 109, 107, 106, 104, 102, 101, 99, 98, 96, 95, 93, 92, 91, 90, 88, 87, 86, 85, 84, 82, 81, 80, 79, 78, 78, 77, 76, 75, 74, 73, 72, 71, 70, 70, 69, 68, 67, 66, 66, 65, 64, 64, 63, 62, 61, 61, 60, 59, 59, 59, 59, 58, 58, 57, 57, 56, 56, 55, 54, 54, 53, 53, 52, 52, 51, 50, 50, 49, 49, 48, 48, 47, 47, 46, 46, 45, 45, 45, 44, 44, 43, 43, 42, 42, 41, 41, 41, 40, 40, 39, 39, 38, 38, 38, 37, 37, 36, 36, 35, 35, 34, 34, 34, 33, 33, 33, 32, 32, 31, 31, 31, 30, 30, 29, 29, 29, 28, 28, 27, 27, 27, 26, 26, 25, 25, 25, 24, 24, 24, 23, 23, 22, 22, 22, 21, 21, 20, 20, 20, 19, 19, 18, 18, 18, 17, 17, 16, 16, 16, 15, 15, 14, 14, 14, 13, 13, 13, 12, 12, 11, 11, 11, 10, 10, 9, 9, 8, 8, 8, 7, 7, 6, 6, 5, 5, 5, 4, 4, 3, 3, 2, 2, 2, 1, 1, 0, 0, -1, -1, -2, -2, -3, -3, -4, -4, -5, -5, -6, -6, -7, -7, -8, -8, -9, -9, -10, -10, -11, -11, -12, -12, -13, -13, -14, -14, -15, -16, -16, -17, -17, -18, -18, -19, -20, -20, -21, -21, -22, -22, -23, -23, -24, -24, -25, -25, -26, -26, -27, -27, -28, -29 };

void VykresliPodklad() {
if (stranka == 1) {

lcd.clear();
lcd.setCursor(0,0);
lcd.print("RPM:----ot SP:---");
lcd.write(6); // k
lcd.write(7); // m/
lcd.write(8); // h
lcd.setCursor(0,1);
lcd.print("lean------------rich");
lcd.setCursor(0,2);
lcd.print("voda:--");
lcd.write(9);
lcd.print("C olej:---");
lcd.write(9);
lcd.print("C");
lcd.setCursor(0,3);
lcd.print("--.-");
lcd.write(3); // l/ - duplicita 1 a 3
lcd.write(2); // h
lcd.print(" --.-");
lcd.write(3); // l/
lcd.write(4); // 10
lcd.write(5); // 0
lcd.print(" --.-l");
}
if (stranka == 2) {

lcd.clear();
lcd.setCursor(0,0);
lcd.print("RPM:----ot SP:---");
lcd.write(6); // k
lcd.write(7); // m/
lcd.write(8); // h
lcd.setCursor(0,1);
lcd.print("TPS: --% MAP:---mbar");
lcd.setCursor(0,2);
lcd.print("IAT:--");
lcd.write(9);
lcd.print("C Ubat:--.-V");
lcd.setCursor(0,3);
lcd.print("--.-");
lcd.write(3); // l/ - duplicita 1 a 3
lcd.write(2); // h
lcd.print(" --.-");
lcd.write(3); // l/
lcd.write(4); // 10
lcd.write(5); // 0
lcd.print(" --.-%");
}
}

void setup() {

Serial.begin(38400); // PC setup komunikace
Serial1.begin(38400); // ECU setup komunikace

pinMode(53,INPUT_PULLUP); // aby nebyl potreba pullup odpor

pinMode(14,OUTPUT); // GND pro seriak
digitalWrite(14,LOW); // GND pro seriak

pinMode(pinSHIFTLIGHT,OUTPUT); // vystup pro Shift light
pinMode(pinVTEC,OUTPUT); // vystup pro VTEC
pinMode(pinHLAD,OUTPUT); // vystup pro hladovy voko

pinMode(3,OUTPUT); // kontrast
analogWrite(3,132); // kontrast lehce nad 50%

pinMode(2,OUTPUT); // podsviceni
analogWrite(2,192); // podsviceni 75%

lcd.begin(20, 4);
byte litryzahodinua[8] = {0b10000,0b10000,0b10001,0b10001,0b01010,0b00010,0b00100,0b00100};
byte litryzahodinub[8] = {0b10000,0b10000,0b00100,0b00100,0b00110,0b00101,0b00101,0b00000};
byte litrynastoa[8] = {0b10000,0b10000,0b10001,0b10001,0b01010,0b00010,0b00100,0b00100};
byte litrynastob[8] = {0b10000,0b10000,0b00000,0b01001,0b11010,0b01010,0b01001,0b00000};
byte litrynastoc[8] = {0b00000,0b00000,0b00000,0b00010,0b10101,0b10101,0b00010,0b00000};
byte kmzahodinua[8] = {0b10000,0b10000,0b10101,0b11001,0b10101,0b00000,0b00000,0b00000};
byte kmzahodinub[8] = {0b00000,0b00000,0b01001,0b11001,0b11001,0b00010,0b00100,0b00100};
byte kmzahodinuc[8] = {0b10000,0b10000,0b00000,0b01000,0b01000,0b01100,0b01010,0b01010};
byte stupen[8] = {0b00100,0b01010,0b00100, 0, 0, 0, 0, 0};

// lcd.createChar(1, litryzahodinua); duplicita s trojkou!
lcd.createChar(2, litryzahodinub);
lcd.createChar(3, litrynastoa);
lcd.createChar(4, litrynastob);
lcd.createChar(5, litrynastoc);
lcd.createChar(6, kmzahodinua);
lcd.createChar(7, kmzahodinub);
lcd.createChar(8, kmzahodinuc);
lcd.createChar(9, stupen);

lcd.setCursor(0,0);
lcd.print("HONDA onboard");
lcd.setCursor(0,1);
lcd.print("dj-bobr 2013");
delay(2000);
stranka = 1;
VykresliPodklad();
}

void loop() {

SendToECU:
int ECUlatency=3;
// ECU RAM pole vyznam
Serial1.write(0x1C); // 00 VSS = rychlost
delay(ECUlatency);
Serial1.write(0x17); // 01 INJ low
delay(ECUlatency);
Serial1.write(0x18); // 02 INJ high
delay(ECUlatency);
Serial1.write(0x10); // 03 RPM low
delay(ECUlatency);
Serial1.write(0x11); // 04 RPM high
delay(ECUlatency);
Serial1.write(0x20); // 05 lambda
delay(ECUlatency);
Serial1.write(0x1D); // 06 ECT = teplota vody
delay(ECUlatency);
Serial1.write(0x15); // 07 TPS = poloha plynu
delay(ECUlatency);
Serial1.write(0x14); // 08 MAP = podtlak v sani
delay(ECUlatency);
Serial1.write(0x1B); // 09 IAT = teplota nasavaneho vzduchu
delay(ECUlatency);
Serial1.write(0x1F); // 10 Ubatt = napeti baterie
delay(ECUlatency);
Serial1.write(0x19); // 11 IgnAdvance = predstih

delay(60); // nutno zkalibrovat

// lcd.setCursor(0,0);
// lcd.print(Serial1.available());
if(Serial1.available()<12) {delay(50);}
if(Serial1.available()<12) {delay(50);}
if(Serial1.available()<12) {delay(50);}
if(Serial1.available()<12) {Serial1.flush(); goto SendToECU;}

ReadFromECU:
for (int i=0; i<12; i++){
outArray[i] = Serial1.read();
}
Serial1.flush();

CteniTlacitka:
int oldStranka = stranka;
int tlacitko = digitalRead(53); // cteni stavu tlacitka "page"

if (tlacitko!=1) {stranka++;}
if (stranka==3) {stranka = 1;}
if (oldStranka!=stranka) {VykresliPodklad();}

Vypocty:

unsigned int RPM = 1875000/(outArray[3]+256*(outArray[4]));
if (RPM>9999) {RPM=0;}

unsigned int SPD = outArray[0];
if (SPD>199) {SPD=199;}

unsigned int TPS = map(outArray[7],22,234,0,100); // tezka empirie
if (TPS<0) {TPS=0;}
if (TPS>100) {TPS=100;}

unsigned int INJ = outArray[1]+256*outArray[2];

unsigned int lambda = outArray[5];

unsigned int ECTtemp = outArray[6];
unsigned int IATtemp = outArray[9];
// ultraprovizorium begins --- OBSOLETE ---
// int ECT = (0.0000001*ECTtemp*ECTtemp*ECTtemp*ECTtemp)-(0.00007*ECTtemp*ECTtemp*ECTtemp)+(0.0163*ECTtemp*ECTtemp)-(2.003*ECTtemp)+135.88; // zatim takhle, TODO: vyrobit vzorec
// int IAT = (0.0000001*IATtemp*IATtemp*IATtemp*IATtemp)-(0.00007*IATtemp*IATtemp*IATtemp)+(0.0163*IATtemp*IATtemp)-(2.003*IATtemp)+135.88; // zatim takhle, TODO: vyrobit vzorec
// ultraprovizorium ends
int ECT = teploty[outArray[6]];
int IAT = teploty[outArray[9]];

unsigned int TOIL = 255; // TODO: bude se snimat analogove, sehnat cidlo

float BATT = 6.5+(outArray[10] * 0.05); // melo byt by OK

// rovnice fuel: y(palivo) = 0,292x2 - 8,5932x + 47,684 kde x je napeti
// TODO : kalibrace, odporovy delic
int INfuel = map(analogRead(A0),0,1023,0,500);
float CorrectedFuel = INfuel/BATT*.1323;
float TFUEL = (0.292*CorrectedFuel*CorrectedFuel)-(8.5932*CorrectedFuel)+47.684;

float MAP = 142.3+(outArray[8] * 5.929166); // kalibrovat na mBar podtlaku?

float InjPulseWidth = (float)INJ / 452; // empirie, vychazi v milisekundach
float PeriodaOtacky = (1/((float)RPM/60))*1000; // vychazi v milisekundach na otacku motoru
float DutyCycle = 100*(InjPulseWidth/PeriodaOtacky);

float FullFlow = 57.6 * 4; // konstanta - optimalizace
float LitruZaHodinu = FullFlow * DutyCycle * .001;
float LitruNaSto = LitruZaHodinu/((float)SPD/100);

// vypis RPM
lcd.setCursor(4,0);
if(RPM==429) {goto SendToECU;} // disconnected, error!
if(RPM<1000) {lcd.print(" ");}
if(RPM<100) {lcd.print(" ");}
if(RPM<10) {lcd.print(" ");}
lcd.print(RPM);
if (RPM<6500) {noTone(pinSHIFTLIGHT);} else {tone(pinSHIFTLIGHT,3000);} // shift light
if ((RPM<5500) || (TPS<50)) {digitalWrite(pinVTEC,LOW);} else {digitalWrite(pinVTEC,HIGH);} // VTEC light

// vypis rychlosti
lcd.setCursor(14,0);
if (SPD<100) {lcd.print(" ");}
if (SPD<10) {lcd.print(" ");}
lcd.print(SPD);

// ---------------------------------------------------
// STRANKA 1
if (stranka==1) {

// vypis lambdy (pouze stranka 1)
lcd.setCursor(4,1);
lcd.print("------------");
int pozice = 4 + map(lambda,10,255,0,55); // TODO: vychytat presne; 52 = 1.04V
if (pozice>19) {lcd.setCursor(5,1); lcd.print(" ERROR! ");}
if ((pozice>15) && (pozice<19)) {lcd.setCursor(5,1); lcd.print("WARMING UP");}
if (pozice<16) {lcd.setCursor(pozice,1); lcd.print("*");}

// vypis teploty vody (pouze stranka 1)
lcd.setCursor(4,2);
if (ECT<100) {lcd.print(":");}
if (ECT<10) {lcd.print(" ");}
if(ECT!=135) {lcd.print(ECT);} else {lcd.setCursor(4,2); lcd.print(":--");}

// vypis teploty oleje (pouze stranka 1)
lcd.setCursor(15,2);
if (TOIL<100) {lcd.print(" ");}
if (TOIL<10) {lcd.print(" ");}
if(TOIL!=255) {lcd.print(TOIL);} else {lcd.setCursor(15,2); lcd.print("---");}

// vypis mnozstvi paliva (pouze stranka 1)
lcd.setCursor(15,4);
if (TFUEL<10) {lcd.print(" ");}
if(TFUEL>0) {lcd.print(TFUEL,1);} else {lcd.setCursor(15,4); lcd.print("--.-");}
if(TFUEL<5) {digitalWrite(pinHLAD,HIGH);} else {digitalWrite(pinHLAD,LOW);} // hladovy voko
}

// KONEC STRANKY 1
// ---------------------------------------------------

// STRANKA 2
if (stranka==2) {

// vypis TPS (pouze stranka 2)
lcd.setCursor(4,1); // bylo 3,1
if (TPS<100) {lcd.print(" ");}
if (TPS<10) {lcd.print(" ");}
lcd.print(TPS);

// vypis MAP (pouze stranka 2)
lcd.setCursor(13,1);
if (MAP<100) {lcd.print(":");}
if (MAP<10) {lcd.print("0");}
lcd.print(MAP,0);

// vypis teploty nasavaneho vzduchu (pouze stranka 2)
lcd.setCursor(3,2);
if (IAT<100) {lcd.print(":");}
if ((IAT>0) && (IAT<10)) {lcd.print(" ");}
lcd.print(IAT);

// vypis napeti baterie (pouze stranka 2)
lcd.setCursor(15,2);
if (BATT<10) {lcd.print(" ");}
lcd.print(BATT,1);

// vypis procent vstrikovacu (pouze stranka 2)
lcd.setCursor(15,4);
if (DutyCycle<20) {lcd.print("0");}
lcd.print(DutyCycle/2,1);
lcd.setCursor(19,4);
lcd.print("%");

}
// KONEC STRANKY 2
// ---------------------------------------------------

// COMMON STUFF

// vypis litru za hodinu
lcd.setCursor(0,4);
if (LitruZaHodinu<10) {lcd.print(" ");}
lcd.print(LitruZaHodinu,1);

// vypis litru na sto
lcd.setCursor(7,4);
if (LitruNaSto<10) {lcd.print(" ");}
if (LitruNaSto<100) { lcd.print(LitruNaSto,1); }
else { lcd.print("--.-"); }

}

Příspěvky: 4973

TRUcKER

Členství: Žádné

Příspěvky: 2948

1991 Civic

dj-bobr

Členství: Žádné

Příspěvky: 4973