Termostat

[Feko]

Jel pravio tko ovaj termostat
http://www.cmail.cz/doveda/konstrukce/term84/index.htm
Senzor 'SMT 160-30' bi mogao biti problem...na brzaka sam tražio no izgleda da ga ima samo u
http://altpro.hr/index.asp i košta 57 kuna +PDV...djeluje mi preskupo...
ima li netko nešto slično i provjereno

[Shenda]

To bi ti za inkubator

Zašto ne bi prirodno, nađeš neku koku da ti sjedi na jajima...

[Feko]

nije za inkubator
...za elek. konverter...ima menanički termostat pa ga hoćemo unaprijediti

[Shenda]

Feko...

Nemoj popravljati ono što radi

Ali ako baš hočeš... pogledaj termometre sa DS18S20 ->

http://www.maxim-ic.com/quick_view2.cfm/qv_pk/2815

... vidio sam negdje i shemu sa PIC-em, tako da nije problem to odraditi. Maxim daje samples... Mislim i da ih ja imam par u garaži

[Feko]

Opet ti sa svojom garažom...oš se mijenjat za garažu moja je nova, još ne ožbukana
...šalu na stranu, budem vidio...mislim da ja imam negdje (u garaži) LM35 pa možda sa njime odradim.
@Shenda, kad je iventura u tvojoj garaži da dođemo pomoć, puno je to posla za tebe samog

[Smjesko]

Sigurno zenina seka pomaze pri inventuri u garazi, tako da za Feku nema mjesta - "tesna garaza".

[Shenda]

Zamjena garaže ne dolazi u obzir - tvoja je daleko

Inventura??? Bože sačuvaj... Nemam ni volje ni vremena, a ni potrebe za bilo kakvim popisom... Inače, bilo kakve tete su uglavnom nepoželjne u garaži , a ženin rod napose Mislim da je to razumljivo...

[Feko]

Vjerojatno se ovo bude radilo: http://home.12move.nl/vansteenis/Thermostat.pdf
narucio sam neke stvari iz Maxim-a pa i DS1820...kad stigne stigne

[Smjesko]

Feko, jesi li skinuo hex za ovaj termometar?

[Feko]

pa naravno ...trebaš

edit:
imaš PM

[Feko]

Evo, PCB gotov...jednostrani
Nece raditi preko releja nego preko trijaka koji je drajvan a galvanski odvojen sa MOC3041.
Za sada samo nacrt vodova dok ne prekontroliram i upisem vrijednosti elemenata

[Feko]

danas mi ništa neide od ruke ....problemi, problemi

Sastavio ga...no prikazuje temperaturu sobe 198 stupnjeva a u sobi je 24 stupnjeva
U meniju ima samo 'set temperature' i 'hysteresis' no kako ga izbaždariti na točnu vrijednost temperature
Izgleda da je to riješeno u samom hex-u u PIC-u no očito moji 18B20 nisu isti kao 18S20 koji treba biti
...ili je možda nešto drugo u pitanju
Ima li tko ideju šta bi moglo biti

...da, zaboravih reći...reagira ma temperatutu i sve djeluje da radi OK, no ipak nije

[Feko]

e, jebi ga
The 1820 delivers the temperature as 9 bits in 2 complements format (but you
only read 8 bits and skips the sign). The temperature is returned in 1/2
degrees C resolution.

elem, treba promijeniti kod
..Daklem, gore u principu piše da 1820 vraća temperaturu s 9 bitova, ovaj s 12, pa ih krivo čita.
ili sam u krivu??

[Feko]

Ako je samo ovo problem...
OWOut DQ, 1, [$CC, $44] ' Start temperature conversion
WaitLoop: OWIn DQ, 4, [Count_Remain] ' Check for still busy converting
If Count_Remain = 0 Then WaitLoop ' Busy
OWOut DQ, 1, [$CC, $BE] ' Read the temperature
OWIn DQ, 0, [Temperature.LowByte, Temperature.HighByte, Skip 4, Count_Remain, Count_Per_C]
Temperature = (((Temperature >> 1) * 100) - 25) + (((Count_Per_C - Count_Remain) * 100) / Count_Per_C)
if Temperature > 32767 then
Temperature= ~Temperature
V= 10000 - Temperature ' 25 C=12500 0 C=10000 -10 C=9000
else
V= 10000 + Temperature
EndIf

Točnije, onaj dio s množenjima i oduzimanjima
...to je kod za 1820 i ako je netko programirao za 18B20 ako zna šta i kako to zamijeniti i podesiti???

...evo tu je sve: http://rapidshare(dot)com/files/183975079/termostat.rar

edit:
Još detaljnije, 9-bitna rezolucija mu vraća temperaturu u koracima od 0.5 stupnjeva, 12bitna mu vraća na 0.0625 C

upomoć

[Feko]

...ili da mi netko pošalje DS18S20

[race king]

http://www.kronos.hr/advanced_search_re ... 20&x=0&y=0

[pedja089]

@Feko ala si se raspisao
e ovako. problem je verovatno u prikazu na displeju. jer je moguce da je ds izmerio 19.8 stepeni, a prikazano je kao 190.
ili je mozda problem u ovom redu
Temperature = (((Temperature >> 1) * 100) - 25) + (((Count_Per_C - Count_Remain) * 100) / Count_Per_C)
uporedi racunanje temperature iz datasheeta za 18b20, i 18s20.

[Feko]

http://www.kronos.hr/advanced_search_result.php?search_in_description=1&keywords=ds+18s20&x=0&y=0

toliko sam dugo cekao...ne dam 35 kuna

[Feko]

svakako je odstupanje ako je 190=19...a u sobi je 24

U datašitu nigdje ne piše "pomnoži to s ovim da bi dobio temperaturu".
Ima primjere šta baca binarno ili heksadecimalno, ali to mi ništ ne pomaže
..Piše samo da daje temperaturu u celzijevcima, da se za fahrenheite treba konvertirat, pa mi ništa nije jasno

[Feko]

RiJEŠENO !
http://www.picbasic.co.uk/forum/showthread.php?t=10345
Samo iz sourcea u drugom postu treba iskomentirati što što piše i otkomentirati drugo

...no mogu i dati novi hex