Jak połączyć multipleksowanie LED na ATMEGA32 z odczytem DS18B20 w Bascom AVR?

Question

Cześć!
Mam problem z pogodzeniem obsługi 4 wyświetlaczy LED (multipleksowanych za
pomocą ATMEGA32) i odczytem temperatury z Dallasa

Programuje w BascomieAVR.
Jest możliwość korzystania z obsługi przerwań (TIMER0) w celu
multipleksowania wyświetlaczy i równocześnie "rozmawiać" szyną 1wire z
czujnikiem DS18B20 bez konieczności wyłączenia wyświetlaczy na czas odczytu
temp??

Dzięki za pomoc
Pozdrawiam
Marcin

GienekS · Answer

Jest możliwe pod warunkiem że z każdym slotem dla 1-Wire zmieścisz się między okresami multipleksowania wyświetlacza.

olekewaagata · Answer

Niekoniecznie, możesz po resecie DS-a zmienić wyświetlanie na następną cyfrę i dopiero robić odczyt temperatury (można podzielić jeszcze drobniej).

gotan · Answer

Jeżeli masz np 4 wyświetlacze to ustawiasz przerwanie do obsługi wyświetlaczy na 244 Hz i przy każdym wywołaniu zmieniasz cyfrę i świeci ona do następnego wywołania a w miedzyczasie wykonywane są polecenia programu czyli np odczyt ds 18b20. W ten sposób cyfra miga z czętotliwoscia 61 Hz co w zupełności wystarczy. Umieszczenie w takim układzie w programie funkcji wait czy waitms nie wpływa na wyświetlanie cyfr.

PioTherm · Answer

Ja też miałem ten problem, że ATMEGA32 była już tak "załadowana", że multipleksowanie 2 wyśw. 7-segmentowych w TIMERze na chwilę potrafiło się zaklockować. Problem rozwiązałem stosując drugi mały uP dedykowany tylko do wyświetlacza, ATTiny2313 za 5 zł ;-)

Procesory komunikują się komendami Bascomowymi SHIFTOUT SHIFTIN
ramka danych 32-bity.

Jeśli jesteś zainteresowany tym rozwiązaniem mogę udostępnić program do uP

euromatic · Answer

witam,
ja od dawna stosuję do ledowskich wyświetlaczy Cmosa 4094
działa to super i zajmuje mało wyjść procka( 3 lub 4) , wyświetlanie jest statyczne.
Jeżeli masz gotowy układ to potrenuj trochę z przerwaniami, ale i tak nie unikniesz migania podczas komunikacji z dallasem. cudów nie ma, procek nie może być w dwóch miejscach jednocześnie a oko ludzkie wyłapie tą przerwę.
jeżeli zgasisz segment podczas obsługi dallasa to oko wykryje spadek jasności led, jeżeli pozostawisz go zapalonym ( jedna cyfra!!!!) to zapali się jaśniej przez chwilkę, to też zawsze zostanie zauważone.
pozdrawiam

jacur · Answer

Ja robiłem multipleksowanie 8 cyfr i odczyt 2 ds_ów i jedynie co to trzeba liczyc CRC bo jesli przerwanie wystąpi w chwili komunikacji z ds_em to wyswietla głupoty. Pozatym zero migania lub przerw w działaniu wyswietlacza.

McRancor · Answer

Kiedyś ludzie robili to na 2051 i spokojnie i ładnie im to działało. Moja rada:
Zamiast ATMEGA32 użyj ATMEGA 128, nie będziesz musiał nic multipleksować, bo ma dość pinów. 4*8 = 32, do tego 2 na DSa =34 + klawiatura 4 przyciski mamy 38, więc jeszcze pare zostanie

LordBlick · Answer

W przewlekanych to ATmega8515 ma dostępnych 35 pinów do wykorzystania (PORTA - PORTD =- 4x8pin; PORTE - 3pin) Light'I

McRancor · Answer

Light'I < daj spokuj tylko 8KB - nie starczy na kod przecież

dj_rav_ · Answer

u Ciebie glownym problemem jest przymusowe czekanie na konwersje temperatury ktora moze wyniesc nawet kilkaset ms. Mozesz np. wyslac rozkaz do DS-a o rozpoczecie pomiaru a nastepnie po kilkudziesieciu(lub kilkuset-w zaleznosci od czestotliwosci przerwania timera) wyswietlen wyniku - co zajmie ok. kilkaset ms po prostu sprawdzac temperatue na czujniku i ponownie wyslac rozkaz powodujacy rozpoczecie pomiaru co zajmie ledwo 1ms. innym przypadku moze ci sie zdarzyc ze raz na np.10 pomiarow wyswietlic bledny wynik(mialem kiedys taki problem ktory zniknal po zrobieniu tego co napisalem wyzej)
pozdrawiam

LordBlick · Answer

No tak, zapomniałem że mowa o Bascomie... P.S. Swoją droga to Atmel mógłby wymyśleć taką rozszerzoną wersję ATmega1615/3215 Light'I

robson_s-ec · Answer

Ludzie momentami mnie PRZERAŻACIE.
Ja robiłem multipleksowanie 4 cyfr 7-segm., linijki swietlnej i klawiatury z DS1820 w systemie pod AT89C2051 i nie mam żadnych problemów - blokuje przerwanie po całym kompletnum obiegu wykonuje transmisję przez 1wire po czym wlaczam przerwanie i dziala mi TAAK.
p.s. nie uzywajmy bascoma i wszystko sie da

john_t · Answer

A gdyby TAK:
(od razu mówię że tego nie próbowałem) ... ale może ktoś z Was?

Ta sekwencja:

'Odczyt danych z przyrządu podlączonego do 1WIRE
Sub Odczyt_temp
1wreset 'inicjacja magistrali 1WIRE
If Err = 1 Then 'W Przypadku Braku czujnika coś tam wyświetl

End If
1wwrite &HCC 'żądanie zgloszenia się ukladu podlączonego do linii 1WIRE
1wwrite &H44 'Convert T
Waitms 255 'czekaj 255 milisekund
Waitms 255
1wreset
1wwrite &HCC 'żądanie zgloszenia się ukladu podlączonego do linii 1WIRE
1wwrite &HBE 'żądanie odczytania temperatury
T(1) = 1wread() 'odczytaj 1-szy bajt z 1WIRE
T(2) = 1wread() 'odczytaj 2-gi bajt z 1WIRE
1wreset
If T(2) = 0 Then
Tempr_real = T(1) / 2 'Obliczona dodatnia wartość temperatury forma DEC
Else
X = 256 - T(1)
Tempr_real = X / 2
Tempr_real = Tempr_real * -1 'Obliczona ujemna wartość temperatury forma DEC
End If
End Sub

bez Waitms 255 wykonuje się w czasie ok. 10.2 ms (na kwarcu 11,05MHz)
czyli głównym "czasożercą" jest podwójna komenda Waitms 255.
Pomyślałem sobie jakby tę komendę zastąpić inną procedurką w której wykonuje się multipleksowanie ???
Nie wiem czy dobrze myślę ale Waitms 255 potrzebne jest tylko dallasowi a procek może w tym czasie robić coś pożyteczniejszego niż czekać.
Co Wy na to, czy ktoś to testował ?

jacur · Answer

Pewnie ze ktoś to testował i nawet działa a dokładnie to odliczasz sobie czas na timer_ku i jak sie odliczy to odczytujesz dane z ds-a

pablo666gliwice · Answer

mam procesor mega8 na 4MHz do tego 3 wyswietlacze multipleksowane na przerwaniu timer0 (okolo 66Hz na jeden wyswietlacz) i niestety sa bledy w transmisji z dsa i to srednio co 10 odczytow Bez CRC uklad wariuje Dla unikniecia nieszczesnego polecenia wait 1 zliczam w przerwaniu ilosc przerwan i co 200 ustawiam pomocniczy bit ktory powoduje w petli glownej wyslanie polecenia odczytu a pozniej konwersji dzieki temu czujnik ma cala sekunde na konwersje

W celu unikniecia bledow transmisji mozna wylaczac przerwanie..ale wtedy wyswietlacze co sekunde migną.. ledwo widac ale denerwuje.

Promuję tematy:
01.01.2020 mikro UPS akwariowy z baterią Li ion

szymtro · Answer

Nie ma bata. Z ds na 1wire i multiplexem led musi mignać. I nie słuchajcie zadnych zapewnień że "mi nie miga". Napewno miga. rygory czasowe w ds to są us (mikrosekundy) i nie ma takiej możliwości żeby bascom się wyrobił.
Rozwiazanie? Zacząć stosować czujniki na I2C zamiast 1wire. Transmisja moze być całkowicie zatrzymana i nic to nie przeszkadza. Do tego komendy do i2c nie są az tak czasochłonne (w bascomie oczywiście) żeby cokolwiek migało. To tylko dwe linie portu i też można zasilić z lini danych (potrzebne dwie diody i kondensator). Do tego termometry na I2c Mozna kupić taniej niż ds na 1wire. DS1621, TMP100, TMP101, DS75 i inne podobne. One maja taki sam adres i taka samą obsługę (można zmieniać czujniki bez zmiany programu(nawet rozdzielczość)). A i również można podłączyć kilka czujników do jednej szyny danych.

zumek · Answer

Mylisz się , jest bat A da radę na 100m lub dalej Piotrek

szymtro · Answer

Zumek jesteś fachowcem, piszesz w asemblerze więc jesteś w stanie samemu napisać sobie obsługę 1wire z wykorzystaniem tajmera (co 17us)i specjalna tablicę komend. Ale pytanie dotyczyło zrobienia czegoś takiego w bascom avr.

Co do tych 10mm to sa specjalne układy tzw. nadajniki lini do I2C ale to nie o to chodzi. Podpinałeś kiedys ds1820 z 4,7K opornikiem podciagajacym na 20m kablu? I co udało się? Bo mi nie chciało zadziałąć - zawsze albo 0 stopni albo te magiczne 85 stopni.
Wiadomo ze na takie odległości tylko pętle prądowe i nic innego.

Do całej reszty pytajacych:
Teoretycznie dało by sie zrobić taką transmisje bez "migania" wyświetlaczy, ale.
Ale trzeba zrobić przerwanie od tajmera co ok 17us, i co przerwanie ładować kolejne bity z tabeli (albo ze słowa) na port wyjściowy.
Zumek moze i byłby w stanie coś takiego uruchomić ale początkujacy użytkownicy bascoma niestety nie poradzą sobie z takim zadaniem. Niestety przykro mi to stwierdzić ale prościej jest uruchomić wewnetrzny przetwornik A/D (to też nie jest proste) niż uruchomić 1wire razem z wyświetlaczami multipleksowanymi programowo(bez tego nieszczesnego migania). I wiem co mówię.

Zaquadnik · Answer

Hmmm... a nie prościej zastosować LCD ? :> Ileż sterowania wówczas odpada :]

UDMA · Answer

W nocie aplikacyjnej AN244 od Dallasa jest projekt drivera 1-wire dla kabli do 500m.

zumek · Answer

Nie,nie nie Miałem na myśli czysty Bascom Działa to mniejwięcej w taki sposób dla 4-ch 7-segmentowych LED-ów: Kod: text Rozwiń Zaznacz wszystko Kopiuj do schowka $crystal=11059200 $regfile=m32def.dat Dim Flaga As Bit ... do ... gosub wait_intr : 1wreset gosub wait_intr : 1wwrite&HCC gosub wait_intr : 1wwrite&HHH ... loop Multiplex_4ms: 'obsługa wyświetlaczy+licznik w dół+cośtam jeszcze =~1ms    reset Flaga Return ... wait_inr:    set flaga    bitwait flaga,RESET return ... Teraz mam pewność(?) , że przerwanie nie zakłóci transmisji na 1wire. Wystarczy tylko umiejętnie zbudować i przeanalizować kod , na okoliczność czasu w jakim się wykonuje(debugger AVRStudio).Nie twierdzę , że zawsze można tak postępować , ale w przypadku prostych zegarko-termometro-sterowników - jak najbardziej tak Piotrek

szymtro · Answer

Przerwanie żeczywiście wtedy nie zakłuci pracy 1wire ale sam odczyt 1wire zakłuci czestość występowania przerwania - it o jest powazym ograniczeniem w stosowaniu tego. Na ten problem równiez ja ostatnio wpadłem i nie udało się tego rozwiazać przyzwoicie. Moze atmega z najszybszym zegarem (20MHz) da radę ale jest to porywanie sie z motyka na księżyc. Zastanawia mnie też sytuacja rozbicia poleceń bascoma (1wreset itp) na podkomendy ale to też zachacza o napisanie komunikacji w asemblerze.
Co tu durzo mówic: Jezeli 1wire to polecam tylko i wyłącznie LCD - no chyba ze owe mruganie klient zaakceptuje "bez szemrania".

zumek · Answer

A w jaki sposób 1wire , zakłóci częstotliwość występowania przerwań Nie rozumiem Ostatecznie , można zastosować automat i obsługę 1wire upchać do procedury przerwania.Jeśli możesz , to pokaż jak obsługujesz przerwanie timera , w którym momencie mrugają Ci wyświetlacze , przy 1wreset czy przy a(1)=1wread(8) i iloma Mhz popędzasz proca Piotrek

szymtro · Answer

Muszę zrobić disable interrupts przed jakąkolwiek komendą 1wire a potem załaczyć. Albo wyłaczyć przerwania odczytać 1wire i dopiero załaczyć. To drugie jest gorsze bo powoduje dłuższe mignięcie wyświetlacza. Przy wyłączaniu przerwania tylko na jedna komendę 1wire wyświetlacz miga krócej ale jednak miga. Jak tego nie zrobie to odrazu mam bład komunikacji i albo 0 stopni albo 85. Proc to 90s2313 @ 10MHz. Sprawdzałem też na 89c2051 @ 24MHz i jest podobnie (tez miga, n=nie umiem powiedzieć czy dłuzej czy krócej). Projek musiałbyć juz oddany wiec na szybko zmieniłem płytkę i dałem czujnik na I2C i nie migało a klientowi nie przeszkadzał grubszy kabel do czujnika.

Nosio · Answer

Ja również miałem problem z multiplesowaniem wyświetlaczy i jednoczesnym odczytem 1wire.
Pomysł z wyłaczeniem przerwań od timera na czas transmisji 1wire okazał się prawidłowy. Ponieważ w trakcie pomiaru świeci się jeden wyświetlacz aby efekt był nie zauważalny możemy dokonywać pomiaru temeperatury rzadziej. Oto mój programik :

$regfile = "m8def.dat"
$crystal = 4000000
Config Portd = Output
Config Portb = Output
Config 1wire = Portb.0
Config Timer0 = Timer , Prescale = 256
Portb = &B11111111
Portd = &B11111110
Dim I As Byte
Dim D As Byte
Dim J As Byte
D = 11
J = 10
Dim D1 As Byte
Dim Trzyms As Byte
I = 0
Trzyms = 0
Dim Temperatura(2) As Byte
On Timer0 Wysw
Enable Interrupts
Enable Timer0
Load Timer0 , 150
Do
Disable Interrupts
1wreset
1wwrite &HCC
1wwrite &H44
Enable Interrupts
Waitms 750
Disable Interrupts
1wreset
1wwrite &HCC
1wwrite &HBE
Temperatura(1) = 1wread(2)
Temperatura(1) = Temperatura(1) / 16
Temperatura(2) = Temperatura(2) * 16
Temperatura(1) = Temperatura(1) + Temperatura(2)
If Temperatura(1) < 84 Then
D = Temperatura(1) \ 10
D1 = D * 10
J = Temperatura(1) - D1
End If
Enable Interrupts
Waitms 5000

Loop
End

Wysw:
Load Timer0 , 150
Set Portb.1
Set Portb.2
If I = 0 Then
Portd = Lookup(j , Kody7seg)
Reset Portb.2
I = 1
Else
Portd = Lookup(d , Kody7seg)
Reset Portb.1
I = 0
End If
Return

Kody7seg:
Data &B00000010 , &B01101110 , &B01000001 , &B01001000 , &B00101100 , &B00011000,
Data &B00010000 , &B01001110 , &B0000000 , &B00001000 , &B01110101 , &B00000101

don diego · Answer

Myślę, że autor tematu już rozwiązał swój problem:)

mirekk36 · Answer

Witam,

a ja jeszcze nieco inaczej rozwiązałem w czystym Bascomie to żeby nie było migotania i to przy użyciu pomiaru z 4 czunjników DS

.... rozwiązanie jest prawie identyczne jak podał kolega Zumek, tylko, że w przerwaniu lub w pętli głównej inkrementowana jest pewna zmienna i w zależności jakie wartości ona przyjmuje to w pętli głównej wysyłany jest rozkaz do czujników o rozpoczęciu pomiaru, natomiast po osiągnięciu kolejnej wartości wysyłany jest cyklicznie rozkaz do poszczególnych czujników w/s odczytu temperatury. Oczywiście wartości tej zmiennej trzeba tak dobrać aby zachować odstęp pomiędzy rozkazem pomiaru a odczytu na poziomie tych 750ms

i wszystko śmiga że hej

działa to z powodzeniem w moim projekciku
https://www.elektroda.pl/rtvforum/topic960729.html

wprawdzie nie obsługuje on wyświetlacza LED ale za to kody IR z pilota i zasada działania jest b.podobna, dzięki czemu żadnych zachiachów nie ma

jak więc widać nie ma co tak narzekać i psioczyć na biednego Bascoma, bo można w nim dużo zrobić tylko trza pokombinować

pozdrówka

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

MarasK · Answer

a jakby multipleksować wyświetlacze co 100us ? (timeslot dla dallasa) Rozumiem przez to, że tuż po nadaniu/odebraniu bitu przełączyć wyświetlacz i transmitować następny bit.

mirekk36 · Answer

MarasK -> ale przecież opóźnienia tzn to migotanie nie powstaje z powodu samej transmisji pomiędzy DS'ami tylko z tego powodu, że większość ludzi po wysłaniu polecenia pomiaru temperatury do czujników stosuje w tym miejscu pętlę opóźniającą 750ms aby po nie odczytać te temperatury i to tu jest pies pogrzebany. Bo obojętnie gdzie czy w przerwaniu, zy pomiędzy przerwaniami czy gdziekolwiek wstawi się tak na żywca takie opóźnienie to nie dziwne, że powstanie mała przerwa w wyświetlaniu już zauważalna dla oka

pozdr

Mam na sprzedaż:
13.11.2007 Wyświetlacz PLED(OLED) 2x16 WINSTAR WPI1602B-Y-JCS

Jak połączyć multipleksowanie LED na ATMEGA32 z odczytem DS18B20 w Bascom AVR?

Jak pogodzić multipleksowanie 4 wyświetlaczy LED na ATmega32 w Bascom AVR z jednoczesnym odczytem temperatury z DS18B20 bez wygaszania wyświetlaczy?

Post #1

Post #2

Post #3

Post #4

Post #5

Post #6

Post #7

Post #8

Post #9

Post #10

Post #11

Post #12

Post #13

Post #14

Post #15

Post #16

Post #17

Post #18

Post #19

Post #20

Post #21

Post #22

Post #23

Post #24

Post #25

Post #26

Post #27

Post #28

Post #29

Post #30

Podsumowanie tematu