Witam. Problem z histerezą polega na tym że histerezę ustalasz w liniach wykonywanych tylko raz po starcie procka, dlatego ona zawsze będzie wynosić 0+5 (zmienna przechowująca temperaturę zmierzoną po starcie programu będzie 0). zmienną histerezy musisz umieścić w pętli aby byłą aktualizowana cały czas wraz ze zmianą temperatury. Pozdrawiam
Pytana do układu: 1. P1 i P2 podciągnięte do plusa za pomocą rezystorów? Bo w programie nie masz "włączonego" wewnętrznego podciągnięcia? Jeden z twoich problemów to: Po naciśnięciu guzika zmniejszającego wartość spada ale dzieje się to bardzo powoli tak jak by układ się przycinał na czas odczytu temp. nie dziw się ponieważ w funkcji Odczyt_t podczas...
Ja tego kodu nie przepisywałem, nie miałem takiej potrzeby. Inne listingi z Ne przepisywałem, zawsze miałem problemy z przepisywaniem, ale zawsze po dokładnym sprawdzeniu okazywało się że to ja popełniłem błąd. Radzę Tobie sprawdzić kod po raz kolejny aż zacznie działać. Ci widać na wyświetlaczu ? Jakim Bascomem AVR kompilujesz, 1.11.7.4 ? To ważne...
Proponuje dodać dodatkową zmienną pomocniczą której zadaniem będzie pamiętanie że program zaczął działać nie jestem pewien tego rozwiązania z bascomem miałem doczynienia dość dawno temu ale możesz spróbować tego $regfile = "attiny25.dat" $crystal = 4000000 Config Portb.3 = Output 'przekażnik Config Portb.2 = Input 'włącznik typu microswitch...
Witam... Ja bym nie bawil sie w komparator i ... tylko wzioł cfrowy termometr 1-wire np DS1822, DS1821(swoją drogą da sie go zaprogramować jako termostat) no ale można zrobić to w rózny sposób, wracam do tematu postu... Przerwanie od komparatora w BASCOM Config Aci = On , Compare = Off , Trigger = Toggle On Aci Przerw Enable Interrupts Enable Aci coś...
A tak na marginesie BASCOM i magistrala 1W dallasa to chyba jest jakieś nieporozumienie. Na tym sie po prostu nie dało zrobić wyświetlania na wyświetlaczach LED dobrego multiplexa. Wcieleni wiedzą o CLI :-). Mogę dać obsługę 1W z dallsaem 18B20 w ASMie na AVRa. Pozdrawiam
Jeszcze pytanie, co to jest ta histereza i jak ją zastosować? To jest dopuszczalny spadek temperatury, który jest akceptowalny przed ponownym włączeniem termostatu. Przykładowo termostat jest ustawiony na 40 stopni, a histereza na 2 stopnie. Gdy temperatura osiągnie 40 stopni grzałka przestanie grzać. A zacznie grzać dopiero gdy spadnie poniżej (40°-2°)...
Podejrzewam że problem jest z odbiorem danych z pilota. BASCOM i GETRC5 nie za bardzo sobie z tym radzi. No i czy masz na pewno pilota RC5? Dodano po 1 Zobacz to: [syntax=basic4gl] $regfile "m8def.dat" 'konfiguracja mikroprocesora $crystal = 4000000 'konfiguracja kwarcu Config Portb = &B11111111 Portb = &B11111111 Config Portc = &B1111101...
Witam.Pan Mirley napisał mi program do prostego termostatu.2 diody led (czerwona się świeci jak grzałka grzeje,a zielona się świeci jak grzałka nie grzeje).Temperatura załączania grzałki jest ustawiana w programie (w kodzie w bascomnie) o raz histereza 2C.Przekaźnik podczepiony pod port scalaka.Tak samo DS18b20.Mój problem polega na tym, że mi to nie...
To może pokaż cały kod, ponadto po licha czytasz z 1wire 9 bajtów? I czy na pewno nie pomyliłeś VCC z GND (w datasheet jest widok od dołu kości)
tu link do termometru http://as.rumia.edu.pl/artur/A/Bascom/Te... dopisać do tego kawałek w którym ustawiasz punkt zał/wył i stawiasz warunki jeśli temperatura > od zadanej to ...... jeśli mniejsza to......
Osobiście uważam, że jeśli to ma być zwykły termostat, to nie ma nad czym się zastanawiać. Szczególnie w BASCOMie gdzie są gotowe wszystkie potrzebne rzeczy jak obsługa LCD i 1-Wire. Pamiętaj tylko o histerezie mierzonej temperatury.
http://obrazki.elektroda.pl/5053717900_1... Miałem ostatnio potrzebę zrobić mały termostat, który będzie dość przyzwoicie trzymał temperaturę, a warunkiem było jej nie przekraczanie. Pomyślałem, że zanim go oddam to jeszcze go zdążę tu opisać... a i będzie kolejny przykład, że Attiny 13 potrafi więcej niż tylko miganie diodą :-D Było...
Laminatorem do produkcji płytek posługuję się już od lat. Cały czas tym samym, kupionym niegdyś w Tesco modelem z wałkami grzanymi od środka i plastikową przekładnią, która jednak okazała się być bardzo trwała, w przeciwieństwie do obudowy laminatora, która się z czasem mocno powichrowała, dodatkowo sterowanie dorobione kiedyś okazało się być też kiepskim...
Witam Piszę do was bo nie mogę rozpracować histerezy w poniższym kodzie programu. Program działa prawidłowo ale jest mały problem. Histereza zawsze działa, a raczej jej brak (załączanie i wyłączanie) działa równo przy 30 stopniach. Potrzebuję aby histereza była ustawiona na 5 stopni. Proszę pomóżcie mi wyeliminować ten problem. Program musi mieć funkcję...
Jasne, że się da :) np tak: If Pind.1 = 1 And Pind.2 = 1 Then Waitms 500 'oczekiwanie żeby odrazu nie wyjść z pętli Do 'nieskończona pętla Lowerline 'ustawienie kursora Lcd "Histereza:" ; H ; Chr(0) ; "C" 'wyświetlenie histerezy If Pind.1 = 1 Then 'jeśli guzik wciśnięty to zwiększ H = H + 1 Waitms 200 'odczekaj chwile,...
Witam W ramach dalszego eksperymentowania z AVR i Bascom popełniłem połączenie odczytu z DS18B20 z sterowaniem wyjściem uC ( przez tranzystor FET ) + dodatkową atrakcję - buzer, który sygnalizuje wł/wył tranzystora/wyjścia. Chciałem dodać możliwość zmiany temp max i min, przez proste menu. Menu zrobiłem w oparciu inny mój kod obsługujący ustawianie...
Nie wiem czy chcesz się nauczyć czy potrzebujesz program. Na początek te uwagi: 1. Nie wiem co tam robi dyrektywa $eeprom. Jest niepotrzebna w tym kodzie 2. Zmienna Ds jest zwiększana w przerwaniu niezależnie od tego czy jesteś w Menu czy nie. Tak więc po powrocie z Menu już na pewno nie zdążysz załapać się na warunek If Ds = 2 i wyzerować jej wartość....
Config Portb.0 = Output to mi się nie podoba... dlaczego Bascom pozwolił na skompilowanie tego? Nie jestem geniuszem, ale tam chyba powinno być config pinb.0 = output Bo taki jest Bascom .... Racja, a dokładniej : ..... Syntax CONFIG PORTx = state CONFIG PINx.y = state ...... You can also set a single port pin with the CONFIG PIN = state, statement....
Witam, zwracam się z prośbą o rozwiązanie mojego problemu. Niedawno zacząłem interesować się programowaniem mikrokontrolerów w języku bascom. Mój ostatni projekt który wykonałem to jedno kanałowy termostat do wytrawiarki pcb. Problem polega na tym, iż po po wielokrotnym naciskaniu przycisków na wyświetlaczu lcd zaczynają pojawiać się tzw. "krzaczki"...
temperatura początkowwa na jakom jest ustawiony termostst czyta swicze Widzę że kolega ma problem z pisaniem w języku polskim ale do rzeczy... 1wr ma być call 1wr . Założę się że program nie jest twój... Patrząc dalej: If Tust1 > Tust Then Portb.2 = 1 znowu nie zadziała... Co do histerezy to lepiej zrealizuj ją tak: Temp = Temperatura(1)...
Jeśli uwziąłeś się na PID to ok ale termostat z przekaźnikiem to sterowanie ON OFF. Sprawdzasz więc czy temp. jest mniejsza od zadanej to załączasz, jeśli większa to wyłączasz uwzględniając histerezę. Programów w sieci termostat jest wiele.
No tak, bo ja nie mam w zamiarze mieć alarmu dźwiękowego. Więc usuń z programu także deklaracje odnosnie wymiarowania zbędnych zmiennych i uzupełnij poprawki j.w. Wytestuj program w symulatorze running "step into code" (F8) i w odpowiednich momentach kodu uzupełniaj 'ręcznie' zmiany logiczne pinów a także symulowane wartości zmiennych (np: odczyt temperatury...
Zastosowanie sterownika z mikroprocesorem i do tego taki wyświetlacz to moim zdaniem przerost formy nad treścią. Ja mam zwykły termostat na WO, na stałe ustawioną temperaturę na 45°C i dwie LED do sygnalizacji obecności zasilania i pracy grzałki. Ale jest to tylko moje zdanie i każdy robi jak uważa. Co do pojemnika to zrobiłem go z akrylu o grubości...
Sorry. To jest termostat na DS18B20. W programie wydaje mi się , że jest wszystko dobrze, ale w praktyce coś histereza mi nie działa. Proszę o podpowiedzi.
www.elektroda.pl/rtvforum/topic1179898.h... w 1 poscie jest schemat podłączenia , czy tak może być ?? mam naprawdę gorąco prośbę czy może ktoś napisać kawałek kodu odpowiadający za wysłanie i odbieranie 2 zmiennych typu integer np dom = 67 strych =76 między dwoma atmega dalej już sobie poradzę . nie prosił bym o pomoc ale Internet mam tylko w telefonie...
no w eepromie to bankowo, tylko pytanie - jak z poziomu Bascom'a zapisać coś w eepromie procesora ? Czy musi być do tego użyty zewnętrzny eeprom ? Z helpu BASCOM Dim Store As Eram Byte , B As Byte B = 10 'assign value to b Store = B 'value is stored in EPROM ! B = Store 'get the value back proponuję też obejrzeć rozkaz writeeeprom
Spotkał mnie dokładnie taki sam problem - podczas ustawiania temperatury, po przekroczeniu wartości 100 stC (idąc w dół) program wychodzi z menu, natomiast histerezy wcale nie dało sie ustawić. Dodam, że jest to oprogramowanie kitu AVT3025. Używałem oprogramowania Bascom w wersji 1.11.8.0. Zmieniłem je na wersję 2.0.7.1 i to rozwiązało problem. Teraz...
Szanowni Koledzy Zaczynam "przygodę z mikrokontrolerami" Jako, że będę wykorzystywał "wiedzę" do celów "osobistych" stąd Bascom Napisałem już termostat na DS13b20 i działa Przy pomocy tego samego układu (a jest w nim jeszcze ok 4 kb wolego miejsca) chciałbym móc regulować napięciem na jednym z portów (PodrtD.5) Jak dotąd nauczyłem sie obsługi dołączonych...
Byłby ktoś w stanie mi z tym pomóc? Miałoby to wyglądać tak: * sterowanie wentylatorami czasowo * sterowanie poprzez odczyt temeratury 2 osobne funkcje (działa albo jedno albo drugie). Do tego co mam dołożenie wł/wył czasowego (w zupełności wystarczy najprostsze z możliwych) OK, Popatrz na swój program; sterujesz ustawienia trzema przyciskami, z których...
Podałem wyraźnie, że oprogramowanie napisałem w WinAVR ;) Nie uznaję czegoś takiego jak bascom (wystarczyło mi raz w życiu się na nim przejechać...). Przedstawię "odchudzone" kody źródłowe - aby były całkowicie funkcjonalne należy troszkę dopisać. Ogólna idea jest przedstawiona. Sam main w programie jest niewielki. Dla przykładu pokażę jak zrealizowałem...
wymieniłem procesor i zamieniłem kolejność kodu z: [syntax=basic4gl] Config Portc = Input DDRC = &B0000000 PORTC = 0 Config Adc = Single , Prescaler = Auto , Reference = Avcc[/syntax] na: [syntax=basic4gl] Config Adc = Single , Prescaler = Auto , Reference = Avcc Config Portc = Input DDRC = &B0000000 PORTC = 0 [/syntax] coś pomogło :) chyba zmiana kodu...
Witam Chciałbym zapytać jak pogodzić obsługę czujnika temperatury DS 18b20 z pracą przerwania INT wyzwalanego impulsem przejścia przez zero. Jak wiadomo żeby DS wypluł z siebie temperaturę trzeba wstrzymać program na ok 700 ms. Przerwania są generowane co 10ms, dodatkowo przerwanie powoduje wyskoczenie z głównej pętli np w czasie wysyłania komend do...
Ten "load" na schemacie jest podłączony pod "sieciowe" 230V? Kurcze, powinienem był usunąć to bo tego aktualnie nie ma, tam mam diodę LED do celów testowych bo ma to być termostat a ten "load" miał symbolizować element wykonawczy podłączony do sieci. 1. Eclipse odradzam - już lepiej Atmel Studio. 2. BASCOM ma czasem opcję ustawiania fusebitów automatycznie...
Jeśli idzie o ceny to chyba kolega lekko przesadził. Polecam sklep na www.lispol.com gdzie np. 2051 - 4,99 DS18B20 - 11,00 DS1800 - 12,00 ATMega8L - 16,99 Co do sprzętu w przypadku obsługi PCF8591 to optymalnym rozwiązaniem byłoby zastosowanie 89C4051 (9,20) +PCF(12,00) +LM-y(ok 15,00) - co daje kwotę 36 zł. Parę zł drożej byłoby zastosować DS-y , ale...
Może to Ci pomoże nie tak dawno zrobiłem termometr korzystajac z pomocy kolegów z tego forum,i działa mierzy temperature w 4 punktach,tylko numery DS-ów musiałem wpisać na sztywno.Zaczełem jeszcze pracować nad funkcą termostatu ale jej nie dopracowałem. $crystal = 11059200 Config Lcd = 16 * 2 $large Deflcdchar 1, 4, 10, 4, 32, 32, 32, 32, 32 Dim T1...
Prześledźmy kod.... przyjmijmy ze: G=20 temperatura jest 19 sprawdzasz warunek If Temperatura(1) < G Then temp jest < G wiec załączasz grzałkę ale dalej zwiększasz G+1 więc G=20 sprawdzasz następny warunek If Temperatura(1) >= G Then który też jest spełniony bo G=20 jest >=temperatura i wyłączasz grzałkę jak to zrobić? pomyśl jeszcze trochę...
[syntax=basic4gl]$regfile = "m8def.dat" $crystal = 8000000 Dim Sbcd As Byte Dim Mbcd As Byte Dim Gbcd As Byte Dim S As Byte Dim M As Byte Dim G As Byte Dim Corobic As Byte Dim Wart_ac1 As Word 'zmienne do pomiaru temperatury Dim Nap_lm35 As Single Dim Wart_temp As String * 3 Dim Grzalka As Bit Config Pind.0 = Input Config Pind.1 = Input Portd.0 = 1...
Tu masz projekt takiego urządzenia. http://www.portalnaukowy.edu.pl/index.ph...
Jest to program do Chłodzenia wodnego komputera. Szkoda teraz wyjaśniać bo cały czas się zmienia. Ale w skrócie: napięcie-- pomiar V zasilania chłodnicy. temp-- Temperatura płynu chłodzącego + termostat 3 biegowy. poziom wys-- wskaźnik poziomu płynu w zbiorniczku. A to ostatnie ma pokazywać przepływ cieczy. Dzięki HOSE2 ,przecież to proste ,nie wiem...
http://obrazki.elektroda.net/46_12012883... Ten mały projekt może z powodzeniem zostać podłączony pod portD AVR 2313. Wykorzystuje on układ firmy Dallas DS1621 (termometr i termostat) Mierzy on temperaturę w zakresie -55°C do 125°C z rozdzielczością 0.5°C i nie wymaga ani skalowania ani zewnętrznych komponentów. Ma także wbudowany termostat z programowalnymi...
Już niby mam wszystko, tylko że nie wiem dlaczego wyświetlacz nie działa po wgraniu programu.. [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 8000000 '***************************************... Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portd.2 , Db5 = Portd.3 , Db6 = Portd.4 , Db7 = Portd.5 , E = Portd.1...
http://obrazki.elektroda.net/66_12118254... Witam, Podstawowym celem tego projektu było - co tu dużo ukrywać - lenistwo. Prawie każdy odwiedziający to forum wie co to wytrawiarka, do czego służy i jak się ją używa. Było nawet tutaj prezentowanych kilka projektów, które po części, nieco automatyzowały ten proces. Nosiłem się od dłuższego czasu...
Witam ! Na końcu tej linii (linia 151): For B = 1 To 15; jest nie potrzebny średnik, usuń go Pozdrawiam. Stefan
Związek odczyt1 z "Z" ma taki iż testuje bity wyczytalem to z pomocy w bascomie. Jestem początkującym więc hcętnie mile widziana porada. A jakiego typu jest Z :?: Byte,Word,itp. Skoro chcesz odczyteć 120 bit ze zmiennej T , to T jest prawdobodobnie typu super-hiper-extra-looooooong :D Żartowałem ;) Poza tym , po co komplikujesz proste zadanie :?: Dim...
nie znam sie na bascomie ale to co mowisz o dzialaniu programu wyglada tak jabys tylko raz na poczatku odczytywal temperature wiec moze spróbuj zapetlic program aby robil to w nieskonczonosc
Nie wydaje mi sie dobrym pomyslem uzycie LM317 jako zrodla pradu dla pt100, gdyz nie ma on dobrej stabilzacji temperaturowej. Autorowi nie zależy na super dokładności, więc czemu nie? Napięcie odniesienia LM317 zmienia się o mniej niż 0.5% w zakresie temperatur -25°..75°C. Problem jest za to inny, LM317 nie może pracować z dowolnie małym prądem. Minimalny...
Skorzystam z twojej podpowiedzi i najpierw spróbuje na diodach. Pozdrawiam
Witam! Mam taki problem: Skleciłem oto taki kod i nie bardzo działa $regfile = "m16def.dat" $crystal = 16000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portd.3 , Rs = Portd.2 Config Porta = Input : Porta = &B11111111 Config Portb = Output : Portb = &B11111111 S1...
Witam Proponuje poczytać o wyświetlaniu na wyświetlaczach LED 7 segm. Znacznie prościej wykorzystać w tym projekcie wyświetlacz LCD 1x16 znaków Cena na all. 9-12 zł. Tego mógłbym sie nawet podjąć :) Ten program jest w moim odczuciu przekombinowany Napisz na prv podeślę Ci programik w Bascom dobrego działającego termostatu - na lcd 2x16 z ustawieniami...
bascom termostat bascom histereza termostat ds18b20 termostat bascom
moduł komfortu mazda mobilny antena wskaźnik paliwo fabia
mercedes adblue hisense 65a7kq
Światła stopu i pozycyjne nie działają w Volvo XC90 2004 - przyczyny Czy pralka Haier X11 z Niemiec ma polski język?
