Ja robiłem to z wykorzystaniem sms, kod jest oszczędny ale działał podczas zabawy z modułem GSM. O całym kodzie zapomnij. $crystal = 11059200 $baud = 115200 '... Poczatek: Do Loop Until Inkey() = "+" 'sprawdza nagłówek wiadomości Do Loop Until Inkey() = "C" 'sprawdza nagłówek wiadomości Do Loop Until Inkey()...
Pomęczyłem się trochę dzisiaj i chciałbym zapytać czy w dobrym kierunku idę. Poniżej dwa przykłady oraz próbki tego co uzyskałem. Przepraszam za jakość dźwięku. Niestety byłem zmuszony nagrać to przez mikrofon. Kod 1: [syntax=basic4gl]$regfile = "m32def.dat" $crystal = 20000000 $baud = 115200 Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up...
Wygląda na to że zaczyna działać: $regfile = "m16def.dat" $crystal = 8000000 $baud = 115200 Config Serialin = Buffered , Size = 10 Dim Uart As String * 10 , Napis As String * 10 Enable Interrupts Cls Do Uart = Inkey() If Err = 0 Then Napis = Napis + Uart End If If Napis = "123" Then Cls Locate 1 , 1 Lcd "123" End...
Buduje uklad programatora na bazie procesora 90S8515 i napotkalem na problem przy pisaniu programu w Bascomie. Przy przesylaniu danych do procesora (115200 baud) z predkoscia pisania na klawiaturze program dziala, ale gdy program na PC wysyla dane strumieniem do procesora wszystko sie wywala. Problem w tym ze przesylane dane sa binarne a nie znaki z...
http://www.compuphase.com/software_termi... - programik Termite. Fizycznie mój programator też potrafi pracować w trybie przejściówki RS232 >> port COM na USB... (multitool firmy SFAR) - nawiasem mówiąc bardzo fajne urządzonko :) (prosta transmisja bez kontroli - TX, RX, masa...) Dodano po 35 [syntax=vbnet]$regfile = "m8def.dat" $crystal =...
Mirkku - uda się z przykładem? Dodano po 1 $regfile = "m128def.dat" $crystal = 14745600 $baud = 115200 $hwstack = 150 'wartosc stosu $swstack = 150 'wartosc stosu $framesize = 150 'wartosc ramki Enable Interrupts Config Serialin = Buffered , Size = 130 , Bytematch = 13 Dim Ar(65) As Byte Dim I As Byte Dim J As Byte Do Loop Serial0charmatch:...
Poopuszczałeś trochę, a do tego literówki i dlatego wyrzucało błędy. Ten program kompiluje sie poprawnie. $regfile = "attiny2313.dat" $crystal = 11059200 $hwstack = 32 $swstack = 10 $framesize = 20 'DEKLARACJA ZMIENNYCH I PROCEDUR Dim Flaga As Bit , Flaga1 As Bit Dim Wylacz As Byte , Znak As Byte , Adres As Byte , Licznik As Byte Dim Znak1...
Dziękuję Koledze niveasoft za odpowiedź - będę testował rozwiązanie Kolegi. Trochę się bałem tego Inkey, bo ono mi zawsze coś blokowało, ale skoro jest informacja, że nie blokuje niczego to sama radość. Odnośnie mojego problemu, to wyszły dwie rzeczy: Thing_string = "GET https://api.thingspeak.com/update?ap... + Apikey + "&Field1="...
Witam Mam drobny problem z odczytem dany z com'a w QB64 DIM SHARED NAD AS STRING * 16 'Wysylane 'DIM SHARED ODB AS STRING * 1 'odbierane NAD = "AT" OPEN "COM3:115200,N,8,1,BIN,CS0,DS0&... FOR RANDOM AS #1 PUT #1, , NAD DO GOSUB Readdata LOOP Readdata: DIM L AS STRING * 1 k$ = "" DO IF LOC(1) THEN GET #1, ,...
Mam taki kłopot; korzystam w programie z transmisji z PC do mikrokontrolera vis RS232 (Atmega 2561, sprzętowy uart, 115200 b). W tym celu używam funkcji SERIALIN z opcją BYTEMATCH (znak CR). Bufor o długości 200 znaków. [syntax=vbnet]' port szeregowy do komunikacji z PC oraz modemem GSM Config Com2 = 115200 , Synchrone = 0 , Parity = None , Stopbits...
Witam mam taki problem potrzebuję wysyłać przez port com danie w taki sposób, aby były one traktowane jako znaki ASCII bo tylko takie mogę poprawnie odebrać mikroprocesorem. Z tego co zauważyłem jedynym działającym w przerwaniu od UARTa poleceniem odbioru, w bascom AVR jest inkey a to odbiera tylko znaki ASCII :/ No i tu pojawia się problem bo o ile...
Problem nielogowania się do sieci rozwiązałem. Jak to czasami bywa przyczyną był błąd montażowy na płytce. W tej chwili po załączeniu zasilania modem ładnie loguje się do sieci. Niestety to nie koniec problemów. Jak próbuję wysłać komendę "AT" z procesora przez UART do modemu do nie otrzymuje "OK" tylko wraca mi z powrotem "AT". Wydaje mi się że problem...
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,...
Mógł by ktoś udostępnić kod dla gps'u tego programowego bo nie chce mi hasac nie czyta mi GGA $regfile = "m8def.dat" $crystal = 7372800 $hwstack = 160 $swstack = 40 $framesize = 120 Baud = 115200 Config Serialin = Buffered , Size = 200 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portd.7 , Db5 = Portb.2 , Db6 = Portb.1 , Db7 = Portb.0 ,...
Podejrzewałem to jednak nie umiem zrobić detekcji 0 a mam jeszcze 4k wolne Coś bym zaadaptował z tego jednak nie rozumiem w pełni tego kodu a jak czegoś nie rozumiem nie stosuje Gdyby ktoś wypowiedzieć się mógł tak dla głąba jak to działa. Kod z tego forum nie mój. http://obrazki.elektroda.pl/3285358500_1... Pomoże mi jakaś dobra osoba , mogę...
Rozwiązań tyle ilu programistów. Znaki wyświetlane mają tak naprawde "przesunięte" wartości. Zero to 48 ale za to zmieści się "Spacja" pod numerem 32 :) http://obrazki.elektroda.pl/6942591300_1... http://obrazki.elektroda.pl/4310551500_1... http://obrazki.elektroda.pl/3248656500_1... Kod z tego testu [syntax=basic4gl]$regfile...
Z tymi wait'ami to już probowałem przeróżnych kombinacji i gdzie bym ich nie dał to i tak nie działa jak należy... Poniżej wrzucam cały kod programu tak, jak prosiłeś. $regfile = "m16def.dat" $crystal = 16000000 $baud = 115200 Config Lcdbus = 4 Config Lcd = 16 * 4 Config Lcdpin = Pin , Rs = Pc.0 , E = Pc.1 , Db4 = Pc.2 , Db5 = Pc.3 , Db6 =...
Ten program jest przepisany z Nowego Elektronika. Wszytko się zgadza. Nie da się skompilować. Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu .
Witam Testując kod Kolegi pusiek1974 do odbioru czasu i daty NTP, chciałem go rozbudować i dostosować do swoich potrzeb. Na początek jako, że kod używa Wait'ów, których chciałem się pozbyć, chciałem dodać wywołanie przez flagę od Timer'a. [syntax=vbnet]$regfile = "m16def.dat" $crystal = 8000000 $hwstack = 64 $swstack = 64 $framesize = 64 Baud = 19200...
inkey bascom rs485 inkey inkey odbiór
generator sygnału radiowego znaleźć fragment tekst iveco zacisk
korad ka3005d kalibracja hydrostatu
Jak podłączyć grzałkę 400V w instalacji trójfazowej? Vaillant turbo Tec pro VUW PL 202/3-3 M R1 - nie osiąga zadanej temperatury