Mirley - Elektronika i Programowanie

Do
D = Inkey()

If D > 0 Then
W(n) = D
Witam
Chciałbym zapyta czy w tej części kodu ustala się moment mrugania wyświetlacza przy przekroczeniu pewny granicy temperatury. chodzi mi o zmniejszenie progu do 50 *C

Incr N
If N = 3 Then
N = 1
Index = W(2) And &B11000000
Shift Index , Right , 6
If Index > 0 And Index < 4 Then
W(2) = W(2) And &B00111111
Temp(index) = W(2) * 256
Temp(index) = Temp(index) + W(1)
If Temp(index) >= 900 Then Mig_t(index) = 1 Else Mig_t(index) = 0
Gosub Przelicz
End If
End If
End If

Pozdrawiam
Robert

Należy zmodyfikować tylko linijkę:

 If Temp(index) >= 900 Then Mig_t(index) = 1 Else Mig_t(index) = 0

do postaci:

 If Temp(index) >= 500 Then Mig_t(index) = 1 Else Mig_t(index) = 0

i powinno działać

Witam
PD 2- PD 7 czy można wykorzystać te wyprowadzenia jako wyjścia .

Pozdrawiam

Oczywiście że można wykorzystać te wyprowadzenia. Mogą sterować czymś dodatkowym :)

Witam
Chciałbym aby trzy z nich uruchamiały się dla sygnalizacji buzera w raz z miganiem wyświetlacza.
Czy mógłbyś wskazać miejsce gdzie w procedurach musiałbym coś namieszać .

Pozdrawiam

W miejscu wywoływania procedury wyświetlania:

 If Wyswietlaj = 1 Then
     Gosub Wyswietl
 
      If Mig_t(1) > 0 Then
          If Mig = 1 Then Portd.7 = 0 Else Portd.7 = 1
      Else
          Portd.7 = 1
      End If
 
      If Mig_t(2) > 0 Then
          If Mig = 1 Then Portd.6 = 0 Else Portd.6 = 1
      Else
          Portd.6 = 1
      End If
 
      If Mig_t(3) > 0 Then
          If Mig = 1 Then Portd.5 = 0 Else Portd.5 = 1
      Else
          Portd.5 = 1
      End If
 
   Else
  ......

Takie coś powinno działać, chociaż na razie tego nie sprawdzałem. Jak będzie działać to daj znać

Witam
Dzięki może dzisiaj wypróbuje.

Pozdrawiam

Witam
Chodzi pewnie o ten fragment, ale mam jeszcze pytanie czy te procedury należy dodatkowo wstawić na początku ,czy pozmieniać w liniach?
Czy buzerki można podłączyć bezpośrednio czy standardowo przez tranzystor?
Che zrobić komunikacje RS na (433 .92 GOTOWYCH MODUŁACH) czy komunikacja w przypadku połączenia sterownika z led odbywa się w dwóch kierunkach czy wystarczy w jednym ?

Pozdrawiam
Robert

Ten fragment programu ktory napisałem ma sie znaleźć w części:

 If Wyswietlaj = 1 Then
     Gosub Wyswietl
                               <<<<<< miejsce umieszczenia
   Else
     Portc = 255
     Idle
   End If

Znajduje się to przed procedurą wyświetlania, umieszczoną na samym dole programu. Linijki dodatkowe ktore widać na wyższym wpisie mają być w zaznaczonym miejscu

Do buzzerow tranzystory pnp podłączone w standardowy sposob.

Komunikacja jest konieczna tylko do wyświetlacza

Witam

Buzzerki działają .jest ok.

Serdeczne dzięki

Pozdrawiam

Witam
Mam jeszcze jedną prośbę czy mógłbyś jeszcze dorobić reset tych sygnałów jednym przyciskiem.Dokładnie chodzi mi o to jak przekroczy poziom temp. a ktoś zareaguje ,to żeby nie wkurzało ucha .

Pozdrawiam
Robert

Proponuje proste rozwiązanie dla wyłączenia buzzera. Wyłączenie wyświetlania powinno wyłączyć buzzery i po sprawie :)

If Wyswietlaj = 1 Then
     Gosub Wyswietl
                <<<<<< miejsce umieszczenia wcześniejszej procedury
   Else
     Portc = 255
     Portd.7 = 1      <<<<dopisz
     Portd.6 = 1      <<<<dopisz
     Portd.5 = 1      <<<<dopisz
     Idle
   End If

Witam

Rozumiem iż ta procedura spowoduje wyłączenie całkowite wyświetlacza ,ale pytanie kiedy on się włączy z powrotem i w którym momencie się wyłączy czy zaraz jak zacznie migać .Jeżeli tak to nie osiągnę celu i buzery są bez sensu.

If Wyswietlaj = 1 Then             ????
     Gosub Wyswietl                ????
 
   Else                            ????
     Portc = 255                   ????
 
   End If                          ????

Mam jeszcze prośbę ,czy mógłbyś mi wytłumaczyć co oznaczają dane linie?
Bardzo proszę

Tak na marginesie zapomniałem dopisać że do portu b.7 mozna podłączyć przycisk. Teraz dopisałem odpowiednią linijkę w sekcji budowa. Przycisk ten zmienia wartość zmiennej "Wyświetlaj" na przeciwny po każdym naciśnięciu. Standardowo gdy nie ma przycisku zmienna "Wyswietlaj = 1", cyfry są wyświetlane i buzerry działają. Jeżeli przycisk zostanie naciśniety to "Wyswietlaj = 0" i zostanie wykonany fragment, ktory aktualnie ma u ciebie wyglądać tak:

     Portc = 255      'wygaszenie wyświetlacza
     Portd.7 = 1      'wyłączenie buzzera
     Portd.6 = 1      'wyłączenie buzzera
     Portd.5 = 1      'wyłączenie buzzera
     Idle             'przejście mikrokontrolera do trybu oszczędzania energii - uśpienia

Po ponownym nacisnięciu przycisku wszystko wroci do normalnego stanu

Witam . Czy mogę niezależnie mierzyć temperaturę (w tym ujemną )przy pomocy trzech czujników DS18B20 ? jeśli tak to gdzie je podłączyć i co zmienić ?

Ten układ nie mierzy temperatury a jedynie wyświetla dane odbierane od innego procesora. Pomiarem temperatury musi zajmować się inny uC (program nie jest skomplikowany). W tym projekcie należało by tylko zmienić program aby wyświetlał też ujemne temperatury odbierane przez Rs232.

Bardzo podoba mi się ta konstrukcja ale czy mógłby autor lub(ktoś)zmodyfikować urządzonko tak żeby było można mierzyć temperatury w zakresie -40 do 150st C na 3xds18b20 lub zamieścić nowy projekt.

Pomiar do 150 stopni jest nie możliwy bo ds ma max 125 stopni, a do pomiaru to raczej lepszy byłby drugi uC bo z obsługą jednocześnie wyśw LED i czujników DS (więcej niż jednego) są pewne problemy. Takie coś mogło by powstać dopiero gdzieś w październiku najwcześniej.

Może być od-30 do 100stC i jakie muszą być te dwa uC ? Ok poczekam do pazdziernika

trzeba wykonać dokładnie ten układ co tu jest przedstawiony, tylko zrobić jeszcze taki prosty układzik powiedzmy na Tiny2313 który będzie mierzył temperaturę i wysyłał do tego wyświetlacza po rs232 tak jak robi to procesor obrotnicy kolektora z którym u mnie współpracuje ten wyświetlacz

Układ ten zmontowałem i po wgraniu hex na wszystkich led świecią segmenty G. Czy mógłby Pan narysować schemat i dopisać tak żeby to współpracowało ? (jestem raczkujący ).Ja używam oscylator wewnętrzy czy muszę dać kwarc zewnętrzy do poprawnej pracy ? Czy mogę stosować przewody do DS-ów do 20metrów ?

Segmanty pokazują "-" jak nic nie jest wysyłane do wyświetlacza na tej pozycji. Skorzystaj z fragmentu:

Rs_wyslij:
 Incr Licz_help
 If Licz_help = 3 Then Licz_help = 0
 Select Case Licz_help
 Case 0:
   Help_word = T(1)
   Help_word.15 = 0
   Help_word.14 = 1
   Printbin Help_word
 Case 1:
   Help_word = T(2)
   Help_word.15 = 1
   Help_word.14 = 0
   Printbin Help_word
 Case 2:
   Help_word = T(3)
   Help_word.15 = 1
   Help_word.14 = 1
   Printbin Help_word
 End Select
Return

Zmienne T(x) typ word to temperatury pomnożone przez 10 (234 to 23,4 stopnia), reszta zmiennych to pomocnicze. Przewody do Ds mogą mieć 20m, możesz też pracować na wewnętrznym oscylatorze, tylko prędkość transmisji baud ustaw na 4800.

Witam. Czy powstało coś takiego na 3xds po pazdzierniku i czy jest nadzieja ? pozdr

Jeszcze nie powstało... napewno nie mam czasu aby zrobić urządzenie ale sam program można by napisać na podstawie innych urządzeń które robiłem. Nic nie obiecuje ale postaram się zmodyfikować program sterownika domowego z mojej strony tak aby wysyłał temperaturę po rs232 do tego wyświetlacza

Witam,
czy w takim rozwiązaniu 1 avr obsługa 7led 2 avr pomiar i komunikacja rs wystepuje migotanie wyswietlaczy? czy wyswietlanie jest stabilne w 100%
pozdrawiam
BIGjack

Nic nie miga ale procek zajmuje się tylko wyświetlaniem i odbieraniem, nic innego nie robi

Z tym miganiem, pytałem ponieważ po doświadczeniach z termometrami na ds-ach nigdy nie udało mi się w bascomie tak dobrac czasów aby nie było czasem jakiegoś mrugnięcia. Jeszcze mam pytanko czy przy komunikacji po rs-ie procki musza byc taktowane tym samym zegarem? jakie warunki muszą byc spełnione dla poprawnej komunikacji?

Muszą być te same parametry transmisji, boundrate, data bits oraz parity i bity stopu. Kwarce nie muszą być te same

Jestem w trakcie budowy termometra z kilkoma ds-ami jeden procek do odczytu a drugi do wyświtlania 6x7led procki mają się komunikować po rs232 i tu właśnie poległem. Na początku skupiłem się na danych tylko z jednego ds-a ale mam problem z odbiorem ponieważ wyświetla poprawnie temperature ale tylko przy pierwszym odczycie przy drugim juz jakieś losowe cyfry. Czy po odczycie powinienem wyczyścić bufor uart? jak poprawnie napisać procedurę odbioru z "nadajnika"

Z wysyłaniem nie ma problemu bo poprostu dajesz prointbin i wartość, gorzej z odbiorem bo trzeba odpowiednio odczytywać wartości. Ja wysyłam zawsze wartości większe od 0 i korzystam z polecenia Inkey. Jak jest wartość większa od 0 to zapisuje do kolejnych komórek tablicy, jak odczytam te 2 bajty, to zmienna N zostaje ustawiona na 1. Cały czas jest sprawdzana wartość zmiennej N. Jeśli przez jakiś czas utrzymuje się wartość różna od 1 to znaczy że nie odebrało dwóch bajtów a np 3 lub 1 i się licznik pokręcił, więc trzeba go skasować.

najlepiej dla odbioru jest zrobić jeszcze jeden próg wyżej a mianowicie zrobić jakiś protokuł transmisji. Mam tak w projekcie mirlighta. Wysyłam najpierw wartość 128 jako początek paczki, potem kolejne dane ale tak żeby wartość była nie większa niż 127 i na końcu sumę kontrolną. Dopiero jak się odebrała dobra ilość bajtów i suma się zgadza to dane są wykorzystywane a jak się nie zgadza to olewane :)

Pamiętaj że jak masz długi kabel to będziesz miał napewno problemy z transmisją. Czy dasz wolniejszą tym będzie lepiej. Jak masz kilka m kabla to zastosuj sobie bufory rs485, powinno działać o wiele lepiej

Witaj Mirley.
Chciałbym wykorzystać twój wyświetlacz.
2 linie po 5-6 cyfr ( Twój projekt jest 3x4 )
Proszę o informacje jak to ugryźć.
Zmienne musiały by być większe,
oraz chcę zastosować uln2803 & led'y 57mm wysokości.
Uln2803 sterowanie jest 1 a w projekcie masz stan świecenia 0 jak się nie mylę.

Tom