www.elektronik.si

[electo]

Pozdravljeni!

Zanima me kako bi lahko v programu bascom napetost pretvoril v temparaturo in to (temparaturo) prikazal na LCD zaslonu (2×16 znakov).

Imam krmilno ploščo s mikroprocesorjem AT90USB646 na tel plošči imam vezane 4 analogne vhode na ketere bi priključil napetost iz temparaturne komore- (2 priključka + in - pol, enosmerna napetost).

Shema vezave analognih vhodov na krmilni plošči:
http://www.hopsasa/f/3j/jc/2iNQcU3J/analogni-vhodi.png
Shema vazave LCD zaslona na krmilni plošči:
http://www.hopsasa/f/1z/7v/2tJO56qr/lcd-zaslon.png

ko je v komori temparatura npr. 26*C je napetost na temparaturnem pretvorniku 2,25V
ostale napetosti in temparature v komori:
2,10V = 23,0*C
2,15V = 24,1*C
2,20V = 25,0*C
2,25V = 26*C
2,28V = 26,6*C
2,33V = 29,1*C
2,35V = 29,8*C
2,37V = 30,5*C
2,40V = 32,0*C

Vsaka pomoč je dobrodošla!

[int47]

-Inicializiraj I/O pine, LCD, ADC, spremenljivke
-sproži A/D pretvorbo
-počakaj, da se pretvorba zaključi
-preberi rezultat A/D pretvorbe
-preračunaj rezultat A/D pretvorbe v temperaturo
-Izpiši na LCD

Kje je problem?

[electo]

Ja problem je v tem, da z bascomu bolj malo časa programiramo in še ne poznam vseh ukazov in prav zato bi rabil vašo pomoč pri pisanju programa. Saj Inicializirati pine in izpisat na LCD zaslonu znam ampak kako pa bi lahko napetost pretvoril v temparaturo pa res nevem.

[PZUFIC]

[igo]

S katerim senzorjem si dobil tiste vrednosti? PT100, Pt1000, ... ?
Tiste vrednosti niso linearne.
Za začetek odspajkaj stran upore R11, R17, R23 n R27, ki močno kvarijo meritev analognih vrednosti. O tem smo nekje že razpravljali, da bi morali biti tam jumperji ali dip stikalca.

Nato izmeri nove vrednosti in jih vnesi v graf (kar na milimetrski papir). Dobil boš krivuljo dU/dT [V / °C]. Če ne bo linearna, imaš več možnosti.
- Lahko jo lineariziraš po segmentih.
if(100<=Tempizm and Tempizm<120) then // med 100 in 120 je koeficient k1
Tempizr=k1*Tempizm+A1 // izračuna vrednost za prikaz
if(120<=Tempizm and Tempizm<140) then // med 120 in 140 je koeficient k2
Tempizr=k2*Tempizm+A2 // izračuna vrednost za prikaz
...
- lahko napraviš s tabelo, ki vrne vrednost Tempizr v odvisnosti od Tempizm
- lahko izračunaš koeficiente polinomske funkcije, ki na danem odseku čim bolj ponazarja krivuljo
Tempizr = k1*Tempizm*Tempizm + k2*Tempizm + k3 + k4/Tempizm

Začneš torej z odspajkanjem in s ponovnimi meritvami.

[electo]

tisti upori so na krmilni pološči za analogne vhode oz priključki na ketere priključim napetost na temparaturnem pretvorniku ki se nahaja na temparaturni komori! in potem moram v bascom-u napetost ki je na analognem vhodu pretvoriti v temparaturo in to prikazati na LCD zaslonu na krmilni plošči.

[igo]

Pomiri se in napiši gornji prispevek še enkrat z vsemi ločili. Sedaj se namreč težko razbere, kaj paše skupaj. Pa mimogrede še odgovori na naslednje vrašanje:
Kateri "temperaturni pretvornik" se nahaja v komori? Pt100 ? Pt1000? NTC upor ? PTC upor ?

S to ploščico smo na tem forumu že imeli opravka in smo našli kar nekaj napak pri zasnovi. Ena izmed njih je ta. da tok, ki teče skozi ledice in zgoraj omenjene upore, popači analogne meritve, zato odspajkaj tiste upore. Če ploščica ni tvoja, jih odspajkaj in prilepi s selotejpom nekam na ploščico.

Šele ko boš dobil dejansko krivuljo napetost/temperatura , se lahko odločiš za izvedbo s tabelo ali s sprotnim računanjem.

Pri sprotnem računanju rabiš K1 in K2 (jih izračunaš na papirju iz izmerjenih vrednosti) Tempizr=K1 * Tempizm + K2 , nato pa v programu že uporabiš znani konstanti :

Tempizm = getadc(n) // n je ADC kanal 0 , 1 , 2 , 3
Tempizr = K1 * Tempizm // izračunana temperatura je K * izmerjena temperatura
Tempizr = Tempizr + K2 // izračunani temperaturi dodaš še konstanto
Za prikaz Tempizr na LCD si poglej sintakso ukaza Print v Help-u

[RGorazd]

Se pravi, če znaš pisati na lcd v bascomu, potem si že na pol poti.

dim ADCvrednost as word

CONFIG ADC = single, PRESCALER = AUTO

Start ADC

ADCvrednost = getadc(0) ' 0 = ADC0, 1 je ADC1...

Sedaj vsebuje spremenljivka ADCvrednost vrednost ADC, ki je bila v trenutku meritve

Izpišeš na lcd

LCD = ADCvrednost

In ta vrednost se giblje od 0...1023

v tvojem primeru bi ta vrednost bila: 0V = 0, 5V = 1023,

se pravi okoli 450 za 25°C.

In to na grobo gledano je tako:

1024/5 = 204 (se pravi imaš 1V razdjen na 204 vrednosti).
Če imaš 2,20V (25°C) je to 2,2*204 = 450

Če pa hočeš bolj natančno, boš pa moral stvari linearizirati s kako tabelo ali pa s pomočjo polinomov, tako kot so ti že razložili.

LP G

[electo]

Najprej hvala za vašo dosedajno pomoč! Glede temparaturnega pretvornika pa mislim, da nebom potreboval tako natančno meritev in da bo vredu ta, ki mi jo je RGorazd napisal.

Napisal sem program in ga prenesel na krmilno ploščo na analogni vhod krmilne plošče priključil napetost iz temparaturnega pretvornika ki se nahaja na komori in vse dela samo na LCD zaslonu mi namesto temparature prikaze število 473 pri temparaturi 25,5*C..... če se temparatura zviša se ta številka poveča, če pa se temparatura v komori zmanjša pa se ta številka zmanjša.

Link do slike programa v bascomu:
http://www.hopsasa/f/38/nz/1isJwo3F/zajeta-slika.png

Prosil bi za pomoč, pri pretvorbi te številke spremenim v temparaturo.

Hvala in lep pozdrav!

[Bizgec65]

Kelvin/Celsius?

[Bizgec65]

[electo]

Ja pa saj to vem, da je 25.5 ºC = 298.5 K mislu sem, kaj v programu moram spremeniti, da mi bo na LCD zaslonu namesto te številke ipisovalo temparaturo v stopinjah celzija.

[RGorazd]

Ja saj je logično...ti na LCD izpisuješ surovo vrednost ADC. Napravi še preračun. Preberi si še enkrat moj post, poglej kje se skriva zajec in ga ulovi.

LP G

[electo]

Sem probal že več načinov in mi se vedno ne izpiše temparature v stopinjah celzija res nevem kaj v programu naj spremenim

Merjenje:

Adcvrednost = Getadc(0)
Adcvrednost = 1023 - Adcvrednost

Adcvrednost = Adcvrednost / 204
Adcvrednost = Adc vrednost

Return

[igo]