tzn. rozbudowałem trochę wersja, jaką testowałem zwykły RS232, dodając obsługę układu do RS485. Próbowałem trochę z Inkey, ale tam znowu blokuje cały program - odczyt z zegara PCF8363 zatrzymuje się.
Nie pisałem nic na Rs485 ale mam kilka uwag do programu. Zacznij najpierw od poczytania w helpie bascoma, co robi dokładnie instrukcja Inkey() a dowiesz się że odbiera 1 bajt (jeden znak) z bufora. Sprawdzanie więc warunku B = "zaswiec" nie ma najmniejszego sensu. Nie wiem też po co przełączasz tyle razy układ w nadajnik <>odbiornik: ...... Reset...
1) Warunek jest taki że string zawsze musi mieć taka samą długość 2) Użyj funkcji MID aby powycinać ze stringa kawałki z poszczególnymi temp 3) I tutaj uwaga - konwersje string->liczby są pamięciożerne. Jeśli nie wykonujesz żadnych obliczeń temperatury itp to odebrany string wyświetl na lcd jako string a nie jako bajty. Poprostu funkcją MID porozcinaj...
Witam. Pytanie zasadnicze - jaki procesor posiada urzadzenie dokonujace pomiarow (slave) ? Bo rozumiem, ze mozesz go oprogramowac? Tak. To Atmega16. Jesli tak to właczasz po prostu przerwanie od odebranego znaku z UARTa i problem rozwiazany. Kombinowanie z Inkey? A może da się włączyć generowanie przerwania w połączeniu z Inpput?
RS232 i konwerter na RS485 Od strony uP standardowo zaczynam od: $crystal = 11059200 $baud = 9600 Odbiór danych przez instrukcje inkey a potem setest case Wysyłanie instrukcja Print . Nie korzystam z przerwań. Od strony PC zależy w czym piszesz program. W VB odbiór i wysyłanie przez MSComm1. (output lub input ) Jest sporo przykładów na elektrodzie....
Łap. Przypomniałem sobie że miałem dwie płytki z RS485 na pokładzie i komplet kabli z innego projektu(most RS poprzez ETHERNET). W każdym miejscu gdzie podłączam RS`a mam zawsze dwa gniazda więc mogę je łączyć albo podglądać terminalem. W kodach Slave ustawiasz adres stałą My_ID. Z racji tego, że na szybko, miałem tylko dwa to testowałem adresy 3 i...
Witam, od jakiegoś czasu opracowuję urządzenia komunikujące się po RS485 w protokole PELCO-D. Urządzenia komunikują się albo jedno albo dwukierunkowo-tutaj to nie istotne... Wszystko działa wyśmienicie i komunikuje się bez najmniejszego błędu gdy nadaje jedno z urządzeń. Urządzenie to nadajnik i odbiornik. Gdy nadają 2 nadajniki jednocześnie (jednocześnie...
mam odblokowane zobaczy wyżej w kodzie. Winą był Timer1 który generował przerwania. Zastosowałem do skanowania klawiatury zamiast Timera i przerwań pętle Doo i Loop oraz Inkey() jesli Inkey >0 to Input itd. Teraz działa jednak nadal jestem zmartwiony bo drugie urządzenie które buduje musi korzystać z Timera gdyż odlicza w sekundach czas 5 trybów w których...
Wszystko kupiłem i podłaczyłem edług schematu i jak wgrałem program d atmegów to nie było reakcji. Program miał zapalać diode i gasic jesli przycisne przycisk. Nadajnik: $regfile = "m8def.dat" $baud = 9600 $crystal = 4000000 Config Portb = Output Portb = &B00000000 Config Portc = Input Portc = &B11111111 '***** dekalracja zmiennych...
$regfile = "m128def.dat" $crystal = 16000000 $baud1 = 38400 Config Com2 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0 Dim Znak As String * 5 Open "com2:" For Binary As #2 Print #2 , "start" Wait 1 Pg: Input #2 , Znak Waitms 500 Print #2 , "Odebrano znak : " ;...
oki taki mam kod może coś tu mi nie gra :) nadajnik ' rs485 dla atmega8 - testowy nadajnik $regfile = "m8def.dat" $crystal = 1000000 $baud = 9600 Config Portd.2 = Output Config Serialin = Buffered , Size = 15 Declare Sub Odbior Dim Lok As Bit Dim Test As Bit Dim Zn As String * 1 Dim I As Integer Dim Adr_s As String * 5 Dim Adres As Byte Dim...
Witam, potrzebuję zrobić komunikację miedzy 2 procesorami ATmega16. Jeden wysyła zmienną typu Byte (Status) z informacją o stanie wejść, a 2 to odbiera. Natomiast 2 będzie wysyłał do 1 także zmienną Byte (Settings) z informacjami konfiguracyjnymi. Dodatkowo chciałbym wysyłać sumę CRC w obu kierunkach. Transmisja w obu kierunkach jednocześnie! Bity będą...
Witam, Mam mały problem z komunikacją między uC. Ale od początku. Schemat układu pochodzi z EP http://obrazki.elektroda.net/52_12696388... http://obrazki.elektroda.net/91_12696388... Samą komunikację udało mi się zestawić i działa bardzo dobrze (załączony kod poniżej). Master non stop odpytuje slave i jest git. I teraz mój problem,...
Witam. Nie dawno wybudowałem altanę na działce. http://obrazki.elektroda.pl/1427697700_1... http://obrazki.elektroda.pl/9627191600_1... Chciałbym w niej sterować gniazdkami, przyciskami do oświetlenia i oświetleniem. Każde gniazdko będzie miało podświetloną obwódkę wykonaną z pleksi, podświetlenie na diodach RGB sterowanych...
Witam. Chciałbym uzyskać efekt parametru echo on instrukcji input (mikrokontroler otrzymuje znaki po UART, i natychmiast wysyła je spowrotem) dzięki czemu na ekranie monitora portu COM będę miał wyświetlane wpisywane przez siebie znaki. Niestety używam konwertera http://obrazki.elektroda.pl/2797859300_1... Oczywiście w takim przypadku...
Czekam 100ms po instrukcji print dla 115K nic to nie pomoglo zmniejszylem predkosc do 9600 nadal nic ;/ kod nadajnika $regfile = "m32def.dat" $crystal = 14745600 $baud = 9600 Config Serialin = Buffered , Size = 10 , Bytematch = 13 '##### Definicja wyswietlacza ##################### Config Lcdpin = Pin , Db4 = Porta.4 , Db5 = Porta.5 , Db6...
Witam wszystkich. Mam dwa proste układy master i slave. Jeden nadaje drugi odbiera. Oba układy to ATmega8 + MAX485. Jedna strona MAX485 zaterminaowana 120R a druga poza 120R podciągnięta do masy i Vcc (linie A i B) opornikami 560R. Oba układy spięte z sobą skrętką długości 10cm. Wszystko jakby zgodnie z opisami. Kod nadajnika: $regfile = "m8def.dat"...
Witam serdecznie. Pisać w Bascomie zacząłem w lipcu br. To mój pierwszy program. Oto mój problem. Sieć Master-Slave na platformie RS485. Master - PC z dedykowaną aplikacją Slave - ATmega64 [syntax=basic4gl]'----------------------... Dim Tmpstr As String * 50 'dane odebrane Dim Tmpout As String * 50 'dane do wysłania '------------------------------------...
Witam Andy74 zakupiłem dzisiaj nawet nowego uP i jest to samo, błą weryfikacji. Jak mi przyjdzie jeszcze budować nowy programator, to się chyba zastrzelę, jakiś nie fart pod koniec tego tygodnia? A było tak pięknie RS485 działał, na SLAVE dałem wartość która się zmieniała i wysyłał ją do ATmegi, wszystko łądnie i pięknie, aż do momentu następnego proghramowania,...
Witam. Od pewnego czasu zajmuje się wykonaniem sterowania na mikro-kontrolerach AVR. Nadajnik pracuje na atmega 8 a odbiorniki na atmega 16. Mój system to zestaw 15 odbiorników i 1 nadajnika. Połączone jest to wszystko za pomocą magistrali RS485 za pośrednictwem Sn75176 z przełączaniem odbiór nadawanie. To tyle odnośnie układu docelowego. Do celów diagnostycznych...
Witam, chciałem spróbowac komunikacji na RS'sie - Atmega8 <-> Atmega8, ale przed tym spróbowałem zobaczyć, czy jak połącze linie transmisyjne TXD i RXD to czy transmisja będzie się odbywała dobrze. Po napisaniu poniższego programu ukazuje się napis “hello” ale oprócz tego jeszcze dwa inne znaki (niechciane) na symulacji w terminalu...
Witam! Usilnie próbuje opracowąć protokół komunikacji miedzy wieloma węzłami w sieci RS485 multimaster. Ramka wyglada tak: 1 bajt - długosć ramki 2 bajty - adres odbiorcy (word) 2 bajty - adres nadawcy (word) x bajtów - dane właściwie 1 bajt suma kontrolna z wszystkich poprzednich Transmisja odbywa się na prędkosci 19200bps przy użyciu transcieverów...
Witam! Usilnie próbuje opracowąć protokół komunikacji miedzy wieloma węzłami w sieci RS485 multimaster. Węzły zbudowane są za pomocą AtMega8. Ramka wyglada tak: 1 bajt - długosć ramki 2 bajty - adres odbiorcy (word) 2 bajty - adres nadawcy (word) x bajtów - dane właściwie 1 bajt suma kontrolna z wszystkich poprzednich Transmisja odbywa się na prędkosci...
Witam, Na własne potrzeby chciałem zbudować monitor temperatury z 4 dallasami 18B20. Dane są odczytywane z czujników po RS485 i wysyłane do mastera. Kiedy odpytuję czujniki po kolei, muszę czekać standardowe 750ms na odpowiedź każdego z nich, co nie zadowala mnie. Zależy mi na tym, aby po wysłaniu komendy odpytującej, każdy z czujników bezzwłocznie...
Witam Mój problem wiąże się z zaprogramowaniem "Echa" które obijało by sygnał w standardzie RS. Układ buduję w celu sprawdzania poprawności działania konwertera USB-RS485. Aby nie programować układu dla każdej szybkości transmisji chcę użyć pinów PB0-PB3 gdzie za pomocą zworki możliwy byłby wybór jednej z 4 przygotowanych szybkości transmisji: 921600,...
$regfile = "m2560def.dat" $crystal = 11059200 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5 ' Inicjalizacja wyświetlacza LC Cls ' Czyszczenie $baud = 9600 Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0 Config Serialin...
Witam Mam problem z przesyłaniem kilku zmiennych po RS485, tzn. wartość zmiennych przesyłana jest prawidłowo, ale w odbiorniku zmienne zamienione są miejscami. A mianowicie nadajnik wysyła np. zmienne a=504 b=129 c=292, a odbiornik odbiera je tak a=292 b=504 c=129. I nie mogę dojść dlaczego tak mi się dzieje. NADAJNIK [syntax=basic4gl]$regfile = "m32def.dat"...
Witam Mam taki programik opiszę tylko najważniesze elementy # konfiguracja timerów Config Timer0 = Timer , Prescale = 1024 Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm Disconnect , Prescale = 8 Config Serialin = Buffered , Size = 6 Enable Interrupts Enable Timer0 Timer0 = 61 On Timer0 Sekunda #główna petla programu do Config...
inkey bascom inkey odbiór bascom inkey
muzyk pendrive wzmacniacz stagg licznik błędów komórki
Parametry zasilacza Reloop Effex-2: 6V, 2500mA Schemat budowy wewnętrznej pompy myjącej Miele