bascom array

[Bascom] - Błąd Array expected przy wysyłaniu tablicy przez UART

Powinno być: [syntax=basic4gl]Printbin Send(1) ; 3 ' wyślij 3 elementy tablicy Send(), zaczynając od pierwszego elementu tablicy.[/syntax]

Tablica dwuwymiarowa w BASCOM – jak zadeklarować array[100,100] of byte?

W Bascomie tylko tablice jednowymiarowe, ale możesz przeszukiwać je z przesunięciem. Pamiętaj o dostępnej pamięci, bo tablica 10000 pozycji pewnie nie wejdzie w up... Pocztaj jeszcze o strukturze DATA.

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Jak zasymulować tablicę dwuwymiarową array[x, y] w BASCOM?

Nie znam Bascoma, więc zakładam, że tablic dwuwymiarowych tam się nie da zrobić. Aby takowe zasymulować, stwórz jedną, rozmiaru 1024*1024, a potem by znaleźć pozycję jakiejś danej na podst. współrzędnych: x*1024 + y.

Odbiór danych z urządzenia po rs232 - program w BASCOM AVR

Witam Jak wyłowić teraz dane XX z paczki B2 ??? Bascom: Array, Index e marcus

BASCOM DELPHI - jak wysłać liczbę Long w 4 bajtach

W delphi można jeszcze tak: var Liczba:LongInt; Bajty : array[0..3] of Byte absolute Liczba;

Bascom - Sekwencja mrugania diod na Atmega16 - problem z powrotem sekwencji

[syntax=vbnet]Lst = Array(&B11111110,&B11111101,&B11111011,&... do for each V in Lst ; tu wpisujesz do portu wartość V Waitms 100 next V loop[/syntax]

Jak zmienić stan pinu na przeciwny w Arduino IDE? Analogia do Toggle w Bascomie

Witam ! Dziękuję. Zainstalowałem starszą wersję 1.5.8. Edytowałem plik „preferences.txt”, zmieniłem linię dotyczącą znaków pisarskich na: editor.font=arial console,plain,22 Jest lepiej. W zasadzie takiego fontu o nazwie "arial console" nie ma w systemie Windows, więc nie jest pewne który z krojów czcionki z rodziny "Arial" został wybrany. W podanym...

Bascom AVR - Jak załadować string do istniejącej tablicy byte?

Tablicy nie, bo to różne typy. słowo2_array jest nałożone na słowo2 (string) więc musisz robić podstawienie słowo2 = słowo3 albo kopiować ze słowo3 poszczególne znaki do słowo2_array

ATMEGA2560[BASCOM] 4 uarty sprzętowe i odbiór ciągu znaków.

Help > Config serialin The following internal variables will be generated for UART0: _RS_HEAD_PTR0 , a byte counter that stores the head of the buffer _RS_TAIL_PTR0 , a byte counter that stores the tail of the buffer. _RS232INBUF0 , an array of bytes that serves as a ring buffer for the received characters. _RS_BUFCOUNTR0, a byte that holds the number...

[Bascom AVR] Jak zminimalizować objętość kodu w Bascom AVR dla Attiny2313?

Mam pewien pomysł na optymalizację dużej ilości np danych tekstowych kosztem SRAMu Zamiast trzymać testy we flashu można by było je tworzyć z danych, a we flashu jedynie trzymać dane wszystkich liter i cyfr. Kiedy byłby potrzebny jakiś tekst byłby tworzony przy pomocy danych zapisanych w array. Jak myślicie dało by to jakiś efekt ? Jeśli chcesz je...

Bascom AVR - Jak wyświetlić znak stringu na zadanej pozycji?

Można to tak zrobić: [syntax=basic4gl]Dim Zdanie As String * 30 Dim Zdanie_array(30) As Byte At Zdanie Overlay Zdanie = "Dzien dobry/Elektrod/" Print Chr(zdanie_array(12))[/syntax]

Bascom AVR - Błąd przy wysyłaniu danych z tablicy Tabaa(7)

Możesz podać gdzie przeczytałeś że ta liczba po przecinku oznacza liczbę wysłanych bajtów? Help nic nie mówi na ten temat. Sprawdzałem w symulatorze że ta liczba nic nie zmienia. Jest taka informacja w helpie "When you use Printbin ar(1) , the whole array will be printed." A kto powiedział że ja wpisuje dane? Ja je wysyłam. Ale twoja tablica jest pusta....

[BASCOM] Printbin przesyła całą tablicę zamiast pierwszego bajtu - co robię źle?

Tak trudno sprawdzić w manualu wciskając w Bascom F1? Sprawdziłbyś hasło "Printbin" i dowiedział się że domyślnie wysyłana jest cała tablica a kiedy nie chcesz to po średniku wpisujesz ile bajtów wysłać [syntax=vbnet]Printbin ar(1) ; 3 ' will send 3 bytes from array ar() starting at index element 1[/syntax]

[Bascom] SWUSB - Klawiatura USB Atmega8

Odpada robienie własnej płytki PCB, odpada kombinowanie z wersjami Bascoma itp. . To raczej nie wersja bascoma a coś z tym plikiem jest nie tak. Mam już 4 wersję i w każdej jest ten sam błąd. Tam są poprawki wprowadzone i te poprawki " six1 fix array 2012-11-28 " powodują błąd. Niestety ja już płytkę zrobiłem więc staram się coś z tym zrobić ale małe...

ATmega8 - Błędy przy jednoczesnej obsłudze serwa i RC5 w Bascom

Witam ogarnąłem już dużo na temat programowania w bascom, tylko mam kolejny problem, mianowicie chciałbym zaprogramować obsługę serwa pilotem nadającym w RC5 lecz gdy połączę obsługę rc5 i serwa mam takie błędy i nic nie działa: ........ Pojedynczo programy działają ok. ................. Rc5+ servo (nie działa) Pozdrawiam. Zauważ że zarówno 'Config...

[M32][Bascom] Wstęp do warstwowej obsługi LCD oraz menu

Taka składnia zwraca błąd. Ćwiczyłem to już na wszystkie sposoby. Efekt jest taki, że kompilator wywala błąd "array expected" i kilka innych, co mnie w sumie nie dziwi, bo sie reszta programu rozjeżdża.

CRC32 w BASCOM dla PCF8582 (I2C) na ATmega16 – przykład kodu i algorytm

W Bascom'ie masz gotową funkcję do obliczania sumy kontrolnej: Suma=CRC32(source , L) Dim Ar(8) As Byte , X As Long 'init array Ar(1) = &H2 Ar(2) = &H1C Ar(3) = &HB8 Ar(4) = 1 Ar(5) = 0 Ar(6) = 0 Ar(7) = 0 'get crc32 of array. Scan 7 bytes X = Crc32(ar(1) , 7)

BASCOM 8051 – szybkie wyszukiwanie 13-cyfrowych liczb i 42-znakowych ciągów w pamięci

Witam! 13 cyfr??. To jest poza zakresem "normalnych" całkowitoliczbowych typów liczb, ograniczonych zazwyczaj do 8 bajtów. Zatem tylko jako ciąg znaków. Nie napisałeś w jakim jężyku programujesz. W Pascalu wyglądałoby to tak: type MojRekord : record Liczba : String[13]; NapisX : String[42]; end; var MojeDane: Array[1..10000]...

[ATmega328P][Arduino/Bascom]Tłumaczenie programu Arduino do Bascom

Tłumaczenie pierwszego kodu. W drugim to wiadomo, że brak biblioteki ;) Mogłem się gdzieś machnąć bo pisałem w przerwie pomiędzy innymi zadaniami. Dodałem tam sobie funkcję b w funkcjach mogę deklarować Local`s które nie są później potrzebne w Global`s. [syntax=vbnet]$regfile = "m2560def.dat" '8K SRAM | 4K EEPROM $crystal = 16000000 $hwstack = 256 $swstack...

Atmega168 Bascom - Przerwanie co 5us i odczyt 8 bitów

Coś nie chce mi działać, wgrałem z kompilowany hex do procka i restartuje mi Z80 co chwile. Pod pinD cały i pod pierwsze 4 bity pinB mam podpiętego Z80 i po wgraniu softu z twoją poprawką resetuje się Z80. Cos mu zakłóca transmisje z resztą gratów ;) ale dzięki za chęci ;) Pokreciłeś to całkowicie... Jeżeli cały portD przeznaczyłeś na input Data, które...

BASCOM, ERROR: 380 w pewnej funkcji na nowszym Ide bascoma

Witam. Mam kłopot ze skompilowaniem tego kodu w bascomie 2.0.8.1 W wersji bascoma 2.0.7.3, której do tej pory używałem kompilacja przechodzi pomyślnie ERROR: 380 Line: 43 Array<> Non Array mismatch Error sugeruje błąd z tablicą w funkcji Czy ktoś miał podobny problem?

[Bascom] - Konwersja wejść portu na liczbe binarną

Witam, Do wejść Portu mam podłączone 5 odbiorników zbliżeniowych. Odczytują zagłębienia w tarczy kodowej. Niestety nie są one uporządkowane tzn bit0 na tarczy jest przypisany do PORTx.4 a bit1 do PORTx.2 itd Próbowałem wcisnąć do zmiennej typu string *6 odczyt z poszczególnych czujników Inaczej mówiąc, potrzebujesz przemapowac pojedyncze bity po ich...

[BASCOM] Uproszczenie kodu licznika i wygaszanie zer nieznaczących

Kolego emarcus namieszałeś mi troszkę z tom funkcją ‘Str2digits’ ale nie umiem tego wyświetlić! Nie zrozumiaeś ’ni w ząb’ z tego co ci opisałem: Funkcja ta (Str2digits)_ zastępuje całkowicie twój rachunek umieszczony w subrytynie ‘Wpisz’, a zatem nie sa już potrzebne zmienne A, B, C i D reprezentujace poszczególne...

Analiza kodu Arduino: Przetwarzanie pętli, zmiennych i warunków w Bascom

Witam Mam kawałek kodu arduino i interesuje mnie przetłumaczenie na "polski" . Linijka po linijce co w danym momencie się wydarza . Widzę że jest pętla,zmienne , warunek ale po przekonwertowaniu po mojemu na bascom to nie do końca chodzi . Coś źle muszę konwertować. [syntax=c]for (int i = 0; i < STEPS; i++) { float d = c0; if ( i > 0 ) d = lastDelay...

Bascom: Czy metoda CRC jest poprawna dla DS1820/DS18B20?

Zmiana nic nie pomogła. A teraz, zastanów się dobrze, co tu nie gra :?: [syntax=basic4gl]Dim Bd(8) As Byte Dim Tmp As Byte '... Bd(1) = 1wread(9) ' read bytes in array '... Crc = 0 ' needs a 256 elements table For I = 1 To 9 Tmp = Crc Xor Bd(i) Crc = Lookup(tmp , Crc8) Next '... [/syntax] PS A czy Bascom, nie ma przypadkiem funkcji do obliczania CRC...

Różnica między PinX.Y a PortX.Y w BASCOM - jak to działa?

Ale ja andal nie rozumiem czym rozni sie PortB od PinB ! PortB.0 -> koncowka 0 portu b PinB.0 -> koncowka 0 pinu b ? xD To bez sensu. edit: Najletwiej byloby mi zrozumiec to na przykladzie tablicy. W php jest np. tak: $x = array('0' => 'costam', '1' => 'xyzabc'); //Robie tablice echo $x['1']; //Pokaze xyzabc

Przenośna konsola z kolorowym TFT - DMA -wydzielone

atom1477 napisał: No właśnie. A BASCOMowi są one obce I właśnie z tego powodu sam optymalizuje sobie kod programu. Wiem, gdzie, co i jak. jacynka84 , zamiast : Wciąż nie wiem jak działa bascom...;] Jeśli nadal Będziesz bazował na Bitwait itp. to w dalszym ciągu się nie dowiesz jak działa. I ja się bałem zapisywać bezpośrednio do rejestrów (adresów)...

[bascom] Błędny odczyt temperatury z DS1820 w Bascom - zawyżone wyniki o kilka stopni

hmm.. no nie do końca to działa. Zrobiłem tak jak w manualu i niestety kicha: ... Ostatnia pętla powinna mi pokazać 12345678 (natomiast nic nie zwraca).. Źle używam Str2digits? Widocznie nie zrobiłeś zgonie z instrukcją. Funkcja "Str2digits" jest trochę 'tricky' - przestudiuj ją jeszcze raz i porównaj z tym przykładem: [syntax=basic4gl] $regfile =...

BASCOM - Przykładowy program komunikacji TX RX między dwoma 8051

No fakt, to jest BASCOM 8051 a nie AVR. :oops: Ale idea jest taka sama. Trzeba zrobić sobie bufor w pamięci (np. tablica bajtów - Array) i dwa wskażniczki: Zapis, Odczyt; które będa sobie biegać w kółko po tablicy - tworząc tym samym bufor kołowy (http://en.wikipedia.org/wiki/Circular_b... Zapis będzie wskazywał element, który aktualnie można zapisać....

Jak użyć kilku warunków If w Bascomie z buzzerem i przyciskami?

Witam . Próbuje zrobić układ w którym po włączeniu pojawi się jakiś napis np. "start" po włączeniu przycisku nr 1 powinien pojawic się napis np: "tata" Ale trzymając przycisk nr 1 i naciskając przycisk nr 2 powienien pojawić się napis np "mama" trzeci przycisk tez musi działać pod warunkiem, że przycisk nr 1 jest wciśnięty. Ale w przypadku gdy naciśniemy...

Nauka pisania w Bascomie sprawdzenie kodu zegara i termometru .

Kolego tera nie działa mi ustawianie godzin a zrobiłem to tak deklaracja:[syntax=vbnet] Declare Function Ustaw(byref Godziny As Byte , Byref Minuty As Byte , Sekundy As Byte) As Integer Declare Sub Znak(cyfra As Byte) 'deklaracja tablicy stałej do wyświetlania cyfr i znaków na wyświetlaczu 7 seg Declare Sub Czytaj 'deklaracja funkcji bez parametru do...

[Atmega16] BASCOM szybki obrotomierz motocyklowy na INT0

Podaj schemat bo może coś nie tak z podłączeniem. Jeszcze kilka spraw. Podciągnij programowo INT0 Robisz dziesięć pomiarów, a wyświetlasz tylko jeden. Możesz z tym coś zrobić np. zwiększyć czas "łapania" lub cześciej wyświetlać. Zrezygnuj z array, bo mi w symulatorze coś nie chciało to działać. Zamiast tego użyj drugiej zmiennej typu byte. Proponowałbym...

konwersja Char array na String, ESP8266, wysyłka do ThingSpeak

Takie złe to ESP8266 NodeMcu V3? Zależy do czego? Odebrać SMSa, podzielić go na dane, wyświetlić na LCD, i idealnie by było wysłać dwie dane przez ENC28J60 do ThingSpeak. Od biedy przez wbudowane WiFi. Jeśli przez Wi-Fi to ESP. W tym wypadku wystarczy 8266. Jeśli przez drut, to nie ENC28J60 a raczej ARM z obsługą Ehernetu. Jeśli już ktoś upiera się...

Jak rozbić liczbę bitową na cyfry w Bascom? Instrukcje i metody

Witam. Mam w zmiennej bitowej jakąś liczbę z zakresu 0-60, np. 34. Czy można tą liczbę rozbić na 2 cyfry - przypisując do pierwszej zmiennej bajtowej cyfrę 3, a do drugiej 4? Czy są jakieś instrukcje w Bascomie, czy muszę to robić za pomocą SELECT CASE: Proponowana metoda dzielenia zmiennej przez 10 (lub 100 , 1000 przy wiecej ilości cyfr), i stosowanie...

[Mega88a][Bascom] Multipleksowanie, pobieranie z DATA

Dziękuję za odpowiedzi. Rozwiązało się jednak samo przypadkiem . Przerwanie generowane od On Timer1 Wyswietl powoduje skok od podprogramu Wyswietl, nawet jeżeli jest realizowana jakaś procedurka SUB . W SUBach dodałem Stop Timer1 i na końcu Start Timer1 . Instrukcje wykonują się już w komplecie i wszystko jak na razie działa. Nie muszę już powiększać...

Jak wprowadzić znaki specjalne na wyświetlaczach LCD 2x16, 4x20, 4x40?

Prosze o pomoc, gdzie znajdę listę takich znaków specjalnych, które moga być na tym monitorze wyświetlane i jak znaleźć ich "kod"? Ja znalazłem tylko: Są i inne? Proszę o pomoc Less Tak, jest nieograniczona ich ilość. Narysuj sobie w jakimś edytorze prostokąt wypełniony kratką : 8 rzędów i 5 kolumn' Narysuj w tym polu swój dowolny wymyślony kształt...

Jak uruchomić termometr DS1820 na ATMega8535? Kod w BASCOMie?

Sprawa właśnie wygląda tak, że nawet bez crc nie otrzymuje wskazań. :? A może tak kawałek kodu byś podrzucił ? :idea: Piotrek Sz. $crystal = 8000000 ' czestotliwosc rezonatora kwarcowego Declare Sub Read1820 Declare Sub Crcit Declare Sub Temperature Dim Bd(9) As Byte Dim I As Byte , Tmp As Byte Dim Crc As Word Dim T As Integer , T1 As Integer Dim V...

[BASCOM] Rolling code - przesyłaj dane bezpieczniej

Niektóre radiolinie mają wbudowane kodowanie transmisji, ale większość z nich nie. W Bascomie można kodować dane za pomocą Xtea, ale zobacz, co się dzieje, gdy wysyłasz te same dane. Zakodowany ciąg Hexstring zawsze wygląda tak samo. Jeśli więc ktoś nagra twoją transmisję, to gdy zostanie ona odtworzona, urządzenie zareaguje tak samo. https://obrazki.elektroda.pl/7576017000_...

LED driver i bascom. Zamieszczony fragment kodu. Nic się nie zaświeciło.

Na tym spi chodzi ale troszke ostatnio pogrzebalem i duzo lepiej chodzi na i2C z tym ze czy wpychane przez spi czy i2c to przy ladowaniu nieparzystej ilosci bajtow (1 driver jest 2 bajtowy (16bitowy) ) wszystko sie rozkracza kawalek mojego kodu Sub Send_bytes() For I = 1 To 64 ' send byte array to shift regs Tempbyte1 = Bytes(i) Shiftout...

BASCOM - Jak przejść do kolejnego elementu w tablicy stringów?

Witam. Mam tablicę stringów Może nieco jaśniej... Jeżeli masz zwymiarowaną tablicę tak jak w przykładzie, (Array) to ta liczba w nawiasie jest tym indexem którym wskazujesz na szukaną pozycje. Odnosi sę to zarówno do tablic z wartościami numerycznymi jak i string. Nie musisz odczytywac kolejnych po sobie zawartości. Pozycje w takiej tabeli zaczynają...

Schemat układu do sterowania 8 urządzeniami i transmisji 8 bitów przez RS232

$crystal = 8000000 $baud = 9600 Config Lcd = 40 * 2 Config Serialin = Buffered , Size = 20 Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0 Enable Interrupts Dim Command As String * 1 Dim Temp1 As Integer Dim Temp2 As Integer Dim Status As Byte Dim Numer As Byte Temp1 = 12.1 Temp1 = 30.1...

2x DS1820 + Bascom AVR+ LCD 2x16 Odczyt na osobnych portach.

może się przyda ja mam coś takiego i napewno działa $large Config Lcdpin = Pin , Db4 = P0.0 , Db5 = P0.1 , Db6 = P0.2 , Db7 = P0.3 , E = P0.4 , Rs = P0.5 Config Lcd = 16 * 2 Dim Bd(9) As Byte Dim X As Byte , Tmp As Byte Dim T As Integer , T1 As Integer Declare Sub Ds1 Declare Sub Ds2 Declare Sub Ds Deflcdchar 0 , 12 , 18 , 18 , 12 , 32 , 32...

[Delphi]ComPort - wysyłanie bajtowe, a nie string?

Jak wysyłam mu: var int : array[0..3] of byte; str: string; begin int[0]:=1; int[1]:=127; int[2]:=250; int[3]:=50; ComPort1.write(int,4); comport1.ReadStr(str,60); edit5.Text:=str; to procek zapisuje do zmiennych: Nrled:127 Ledr:250 Ledg:50 Ledb:1 BASCOM: Sprawd = Ischarwaiting()...

Stacja meteo Wi-Fi, Bascom i Arduino

https://obrazki.elektroda.pl/9317464400_... Witam Przedstawiam stację meteo nad którą pracuję już kawałek czasu. Początek prac to też mój początek zabawy z Arduino. Zaczęło się od gotowego projektu malutkiej stacji z wyświetlaczem OLED. https://obrazki.elektroda.pl/5611267500_... Wtedy już samo wgranie programu do...

DMA w Xmega i toczenie danych z tablicy do tablicy.

No więc kiedyś kolega drzasiek dumał nad powieszeniem ADC 8 bit na szynie EBI w xmega. Nie wiem czy to zrobił czy nie ale ja tak zrobiłem. I niestety jestem nieco zawiedziony. Przykładowo na wewn ADC da się wyciągnąć ok 6-8MSPS w 8bitowej rozdzielczości przy 48Mhz, nie jest to wcale zły wynik na adc w avr i bascom. Problem jest w tym że DMA w połączeniu...

Jak podłączyć 2 czujniki DS1820 do I2C w Bascom na AT89C451?

ten sub temperatura czyta temperaturę z dallasa podłączonego do portu P3.2 i tylko jedną drugą czyta sub temperatura2 jest to rozwiązanie najprostsze lecz szkoda na to bajtów w procku można wyciąć z niej procedurę wyliczania i zrobić jedną dla wszystkich co zajmie mniej miejsca jest to "sub wylicz" do której odwołujesz sie "call" można także podłączyć...

[atmega644p][bascom] przekazywanie tablicy do funkcji

witam, Od razu do rzeczy. Jak w temacie! Program odczytuje po 1wire temperatury z 2 czujników. Wszystko działa poprawnie (płytka, czujniki dodam ds18b20). Kod programu poniżej. Error : 261 Line : 39 Array expected [ID1] Error : 261 Line : 43 Array expected [ID2] Error : 124 Line : 43 LOOP expected ostatnim errorem...

BASCOM - Jak wpisać znaki z łańcucha do tablicy Kod(15)?

http://www.elektroda.pl/rtvforum/viewtop... Dodano po 23 [syntax=basic4gl] Dim Dane As String * 15 Dim Dane_array(15) As Byte At Dane Overlay Dim Kod(15) As String * 1 Dim A As Byte Dane = "1234z2132j2131j" For A = 1 To 15 Kod(a) = Chr(dane_array(a)) Next[/syntax]

[BASCOM] [AVR-DOS] Sortowanie alfabetyczne zmiennych typu string

Tak, tablica jest stała (512) ale nie wszystkie są aktualnie wykorzystywane. Z tego co wiem, SORT sortuje według wielkości, oraz nijak się ma do string'a. "Sorting is implemented for BYTE, WORD, INTEGER, LONG and DWORD arrays."

Bascom: Odbiór danych ASCII przez UART i problem z Backspace

Manual BASCOM-a, w opisie instrukcji SERIALIN mówi że bufor danych wejściowych przechowywany jest w wewnętrznej tablicy bajtów _RS232INBUF0 . Oprócz tego są dwa wskaźniki, na początek tych danych oraz na ich rozmiar. 'Using the CONFIG SERIAL=BUFFERED, SIZE = 10 for example will 'use some SRAM memory 'The following internal variables will be generated...

Pliki przykładowe dhcp.bas z bascoma AVR- gdzie to znalezc?

Witam, poniżej znajduje się listing pliku dhcp2.bas. Cały pakiet easytcpip w załączniku. '---------------------------------------... ' DHCP2.BAS ' (c) by Atilio Mosca ' '---------------------------------------... $regfile = "m161def.dat" $crystal = 4000000 $baud = 19200 $lib "tcpip.lbx"...

[ATtiny2313] Jak ograniczyć zakres PWM w ATtiny2313 do 0-100 w Bascom?

Zrobiłem se coś takiego, ale nie działa tak jak powinno Jeżeli Pind.0 i Pind.1 są wejściami to konfiguracja portu 'D' winna wyglądac mniej więcej tak: [code][syntax=basic4gl] ................. Config Portd = 124 'Pd.0 i Pd.1 jako wejścia Portd = 127 'podciągnięte ................ [/syntax] Przewidywana żywotnośc EEPROM jest ok. 10 000 wpisów. W twoim...

[Atmega32] [Bascom] DS18b20 - dwie linie po dwa DS18B20

nie, nie, nie, nikomu nie chciało się zajrzeć do dokumentacji BASCOMA? wszystkie polecenia obsługi 1wire można przeprowadzać na DOWOLNEJ LINII: 1WREAD Top Previous Next Action This statement reads data from the 1wire bus into a variable. Syntax var2 = 1WREAD( [ bytes] ) var2 = 1WREAD( bytes , port , pin) Remarks var2 Reads a...

Jak napisać program w Bascom AVR dla licznika monet na ATmega8?

Zainstalowałem Eagle i chciałem narysować schemat ale nie znalazłem Attiny2313 jest tylko AT90S2313, brak też LCD 03336. Dla Eagle jest bez różnicy czy wybierzesz AT90S2313 czy Attiny2313 - oba processory mają ten sam pinout. Wybierz AT90S2313, na środku obrazka masz znak "+"; kliknij prawym przyciskiem myszki na ten krzyżyk i z pokazanego menu wybierz...

[BASCOM] LCD 128X32 OLDE 0.91" SSD1306 - bilioteka

Ja to ogarnąłem czymś wygrzebanym z neta. '***************************************... ' Demo for SSD1306 128x32 Pixel ' ' Hardware: http://www.adafruit.com/category/63_... ' ' use 512 Byte Frame Buffer ' Spi Mode ' ' ' ' Date:22.05.2014 ' Email: Hkipnik(at)aol.com ' Copyright (c) 2013 Hkipnik....

[Bascom]Odczytywanie danych z pamięci eeprom procesora

Właśnie mam jedną zmienną , która jest indeksem i ostatni index zapisany jest w eepromie też za pomocą jednego przycisku czyli tak Freg = Freq_EEPROM Tu masz przykład konfiguracji eeprom dla array; wpisu i odczytu wartości z indexem. Dla ułatwienia posłużyłem sie automatycznymi pętlami 'for..next' z incrementacją zmiennch wewnątrz pętli. http://obrazki.elektroda.pl/7228629900_1...

Jak zbudować zamek głosowy na ATMEGA16 z użyciem Bascom?

typedef struct { double real, imag; } COMPLEX; int fft(COMPLEX *x, int Len) { static COMPLEX *w=NULL; /* used to store the w complex array */ static int mstore = 0; /* stores m for future reference */ static int n = 1; /* length of fft stored for future */ COMPLEX u,temp,tm; COMPLEX *xi,*xip,*xj,*wptr; int m, i,j,k,l,le,windex;...

filtrowanie danych z rs232-odbiór w programie w delphi

Witam wszystkich. Mam urządzenie (AVR+bascom) które wysyła po rs'ie dane o ogólnie rzecz mówiąc stanie czujników, podzespołów. Dane odbierane w terminalu wyglądają jak poniżej: W:sterownik v5.14 - 05.12.11 U:6.12V I:42.0 H:poziomo - poza zakresem h:0 V:pionowo - poza zakresem v:0 V:pionowo - w górę v:9 U:6.15V...

[Bascom]Atmega + kilka DS18B20 - optymalizacja kodu

Chciałem uprościć kod programu obsługującego trzy czujniki DS18B20. Na razie mam cztery podprogramy ( jeden wywołuje pomiar, a trzy obliczają dane dla każdego DS18B20 ). Mam taki pomysł, żeby tak skonstruować podprogram do obliczeń, aby na wejściu podawać adres DS, a podprogram ( wspólny dla wszystkich ) poda wynik. Coś takiego próbuję zrobić: Jeśli...

[ATMEGA 8] Jak napisać program do tablicy LED z ATMEGA8 i BASCOM?

No więc tak, cały program jest podzielony na 3 pliki: -main.c <-główny plik, zawiera funkcję main() -functions.h <-plik nagłówkowy -functions.c <-plik zawierający definicje wszystkich funkcji, których prototypy znalazły się w poprzednim pliku Zaczniemy od pliku functions.h: #define F_CPU 1000000 //1MHz zegar procesora #define CYCLES_PER_US...

[Bascom] obliczanie średniej temperatury z dwóch czujników

Tzn. wiem, że zmienna typu bajt nie może być większa niż 255, ale zapomniałem, że nie robi się operacji na różnych typach zmiennych razem [syntax=vbnet] Solar_mid_mod_temp = Solar_mid_mod_temp \ 2 ' srednia z dwoch czujnikow = 283 [/syntax] co prawda przekracza 255, ale wynik z dzielenia przez 10 i Modulo 10 już nie, czyli 28 i 3 [syntax=vbnet] Solar_mid_dec...

[BASCOM]1Wire. Moduł MMega01. Brak komunikacji z urządzeniami 1Wire.

Witam, Nabyłem moduł MMega01 firmy http://www.propox.pl/index.phtml?lang=pl Problem polega na braku komunikacji z urządzeniami 1wire... Probowałem podłączyć termometr DS18b20(nie jeden - myślałem że ten co mam jest uszkodzony) i nic... taktowanie procka to ok 16MHz. Jako rezystor podciągający na magistrali 1wire daje 2,2k np w ATmega32 zawsze wystarczało....

Jak skonfigurować RFM12B do wysyłania i odbierania w Bascom?

Witam, Z tej stronki [url=http://mirley.firlej.org/node/1137]... dowiedziałem się jak obsługiwać moduły komunikacji radiowej RFM12B. Przykład nadanika: [syntax=vbnet]$regfile = "m8def.dat" $crystal = 8000000 '8MHz $hwstack = 70 $swstack = 70 $framesize = 160 '$noramclear Config Submode = New Config Watchdog = 512 '512ms Start Watchdog '---------Constants---------------------...

Atmega1284/ Bascom - Karta SD - problem z pinem CS i inicjalizacją karty

Witam w Nowym Roku Chciałem zapytać, czy ma znaczenie, do którego pinu kontrolera jest podpięte wejście sterujące wyborem karty SD ? Korzystam z kodu podanego w helpie - zamieniłem tylko PortB.4 na PortD.6 i cały czas mam aktywną kartę SD, co oczywiście skutkuje zablokowanie kontrolera. Jako, że nie działa mi to razem z innymi funkcjami, więc próbuję...

Bascom 2xDS18B20 - Jak zmienić stan portu, by uniknąć 85°C?

Jak w temacie - czytalem gdzies, ze trzeba zminic stan portu podczas pomiaru, ale ja jestem w tym temacie zielony, dlatego prosze o pomoc. PS. Potrzebuje jeszcze dodac funkcje z przecinkiem i znakiem - wydaje mi sie, ze wynik wyswietlany jest bez nich. $regfile = "m8def.dat" $crystal = 4000000 Declare Sub Init Declare Sub Convallt ' Convert...

[HTML] Jak zabezpieczyć listę wyboru select w HTML/PHP przed nieautoryzowanymi wartościami?

Czyli == zamiast = Ups. Umknęło mi to. Pewnie dlatego, że wcześniej patrzyłem na kod w Bascom. ;) Powiadacie, ze użycie funkcji in_array jest lepszym rozwiązaniem? Nie ma tylu || $do == . Można wykorzystać, jeśli dozwolonych adresatów pobierzesz z bazy danych. (at)LED5W Co masz na myśli pisząc "Nie psuj html'a"? Wywołując die nie zamykasz tagów HTML,...

bascom DS18B20 - Jak odczytać numery id z "tablicy"

Witam ........... i uzyskałem takie numery 2865C38905000025 28CB3E8905000020 28E28A8905000050 282E93890500003D Jak te numery wpisać do tablicy i jak potem odczytać temperaturę z czujnika o danym numerze ID Kod poniżej działa, ale po wymianie czujnika temperatury zamieniają się miejscami. jak zmodyfikować ten kod żeby wstawić tam tablicę z ściśle przypisanymi...

[ATTiny13V][Bascom] - Nie można wrzucić wsadu na uC.

Zwierałeś RESET do GND podczas programowania? W jaki sposób? Poprzez zworę w płytce stykowej. Wynika to z zdania w datasheet "Both the Flash and EEPROM memory arrays can be programmed using the serial SPI bus while RESET is pulled to GND." (pkt 17.6) - Tak to zrozumiałem... Ale najpierw były próby bez tej zwory i też nic. Opisz dokładnie jakie wykonujesz...

Jak poprawić dokładność impulsatora obrotowego w układzie AVT-5042?

Trochę posiedziałem i napisałem w Bascomie coś co jest odporne na niskiej jakości encodery. Może gubić impulsy, ale za to nie myli kierunków. '************************** Program reading mechanical rotary Gray code encoder ********** '******* Reads roating directions, counts full gray code cycles ********** '******* By Marcin B. AIMEIZ 2011/02/07 **********...

[BASCOM] - Jak zintegrować DS18B20 bez opóźniania encodera?

Ok poradziłem sobie tylko teraz wyskoczył mi inny problem , a mianowicie nie wiem dlaczego nie mogę korzystać z funkcji LINI i Boxfill wyświetlacz szaleje :-) a chciałbym wykorzystać te dwie funkcje w programie poniżej kod programu [syntax=basic4gl] '***************************************... '* Code to test DS18x20 '* The 1-wire bus pin is Port...

[Atmega16] [C++/WinAPI/BASCOM] [RS232/UART] - Aplikacja w C++ i WINAPI

Dzięki wielkie, udało się! Program odczytuje poprawnie informacje, dodatkowo ograniczyłem bufor do 1 znaku, bo Atmega wysyła znaki jeden po drugim. Poniżej zamieszczam wszystkie kody działające, dla potomnych :) UPDATE: ----------------------------------------... No i chyba poległem z wysyłaniem, nie obejdzie się...

Jak obsłużyć 3 czujniki DS18B20 w Bascom na Atmega8? Szukam działającego kodu.

$regfile = "m8def.DAT" $crystal = 1000000 '$lib "mcsbyte.lib" Declare Sub Init Declare Sub Convallt ' Convert T on ALL sensors Declare Function Decigrades(byval Sc(9) As Byte) As Integer Config Lcdbus = 4 Config Lcdpin = Pin , Db4 = Portd.0 , Db5 = Portd.1 , Db6 = Portd.2 , Db7 = Portd.3 , E = Portd.6 , Rs = Portd.4...

DS18B20 - kalibracja i wyświetlanie temperatury z dokładnością do 0,1°C

witam, robię termometr z dwoma ds18b20 i mam problem, ponieważ nie mogę wykalibrować tych pomiarów aby uzyskać dokładność do 0,1. Oraz wyświetlić wartość np. 21,5 st C. Termometr pokazuje mi 215, szukałem na forum, ale nic konkretnego nie znalazłem. Przedstawiam mój kod: 'Declare Sub Init Declare Sub Convallt ' Convert T on ALL sensors Declare Sub Odczyt_z_ds18b21...

Komunikacja Atmega32 z czujnikiem DS18B20 przy taktowaniu 25MHz - Bascom

Po całym dniu walki słabo opisałem mój problem bo już po prostu nie miałem siły :D Wyjaśniam... Zrobiłem sobie mikro serwerek LANowy na Atmedze32 i układzie ENC28J60. Z doświadczenia z tym układem i Atmegą wiem że znacznie stabilniej wszystko pracuje gdy mikroporocesor (Atmega) jest taktowana zegarem 25MHz z gotowego modułu ENC a nie własnym kwarcem....

[BASCOM] Jak uruchomić 2.4 TFT LCD Shield na Arduino UNO?

Na szybko, poniżej biblioteka z Arduino działająca z LCD na fotografii Część nie na temat usunąłem.

Wyświetlacz od Nokii 3310, Bascom - komendy,obsługa

W końcu na atmega 168 prawodłowo zadziałał mi ten kod. W komentarzu dołożyłem podłączenia. Musiałem zrezygnować w pierwszym podejściu z kwarcu, bo portu PB6 i PB7 są tu wykorzystane do sterowania wyświetlaczem. Kupowałem wyświetlacze jakoś bardzo tanio, więc pewnie chińskie. '**************** Driving graph. display NOKIA LPH7779 ver.1.1 ******************...

Bascom - Atmega32 - LCD na t6963c + i2c, nie działa

Witam Mam Atmega32A + PCF8563 + PCF8574 + RFM12 + DS18B20 +DHT11. Port danych LCD to Port.A, ControlPort to Port.C. I2C standardowo na Portc.0 Portc.1. Niestety jest problem z obsługą I2C, tzn. zegar PCF8563 nie działa w ogóle ( na LCD puste pole ) , a klawiatura na PCF8574 - tylko jeden klawisz i to nie ten, który jest przypisany w kodzie ( działa...

[Atmega 32][Bascom avr] Rozbudowa modułu internetowego ENC28J60

Proszę oto kod. Chodziło mi o to ze moze podpowiecie mi w którym miejscu i jakie modyfikacje musze dać a w linku który podałem jest opis i cały kod. [syntax=basic4gl]'----------------------... ' Atmega168 and ENC28J60 '---------------------------------------... ' Version 1.0 - june 2007 by Ben Zijlstra...

Bascom Atmega 1284P - Moduł internetowy na ENC28J60

Witam Korzystając kodu Tuxgraphics zmodyfikowanego przez Kolegę Mundi1970 , chciałem również postawić prosty serwer pokazujący temperatury z kilku czujników oraz wilgotność i ciśnienie. Po zmianach regfile i pinu CS nie mogę go jednak skompilować. Występują trzy błędy: Error 46 Line: 363 Assignment Error Enc28j60_linkup Erroe 229 Line: 450 End Sub or...

Jak podłączyć MAX7456 do ATmegi8 i dostosować program do SPI?

Witam, proszę o schemat podłączenia ATmegi8 do MAX7456. Załączam obrazek: http://obrazki.elektroda.net/82_12947470... Ew, prosze też o przerobienie tego programu aby pasował do atmegi8, chodzi tu o zmiane tylko crystal i regfile? Czy to nie wpłynie na komunikacje SPI? '=======================================... '= MAX7456 Video overlay...

Jak uruchomić DS1820 z biblioteką rklibavr na ATmega w języku C?

Juz byl taki temat ale został zamknięty. Moj problem polega na tym ze nie moge ruszyc ds1820 w C z wykorzystaniem bliotek rklib do obslugi ds. #include <avr/io.h> #include<avr/interrupt.h> #include<avr/eeprom.h> #include<string.h> #include "lcd.h" #include "ds18x20.h" #include "delay.h" uint8_t gSensorIDs[OW_ROMCODE_SIZE];...

Sprawdzenie podstawki do ATmega8 i sterowanie serwem z ATtiny2313 4MHz

nowsze bascomy (np. 1.11.9.8) mają wbudowaną obsługę serw: CONFIG SERVOS Configures how much servo’s will be controlled. Syntax CONFIG SERVOS = X , Servo1 = Portb.0 , Servo2 = Portb.1 , Reload = rl Remarks Servo’s need a variable pulse in order to operate. The CONFIG SERVOS directive will set up a byte array with the servo pulse width values...

[BASCOM-AVR] - Weryfikacja błędu przed zgłoszeniem.

Poprawiłem programik, zwiększyłem wielkości stosu, stosu programowego i ramki, tablice Src_array i Dest_array wypełniłem danymi. Błąd dalej występuje. http://obrazki.elektroda.pl/6483380100_1... Jak widać zmienna B została uszkodzona, a zmienna "C" w której powinna być zwrócona wartość prze Memcopy jest równa 0. [syntax=basic4gl]' BASCOM-AVR...

Ds1820 + 89c4051 jak dopisać pomiar temp. ujemnych

Witam Temat był już wałkowany x-razy Co mam dopisać do tego programu żeby mi mierzył temp. ujemne ? Jest to program do zegara z termometrem kit AVT868. Proszę o pomoc pozdrawiam Sjzwojtek $large Declare Sub Settime(s As Byte , M As Byte , H As Byte , D As Byte , Month As Byte) Declare Sub Gettime Declare Sub Displaytime Declare Sub Displaydata...

RGB cube 3x3x3 - jakie rezystory, tranzystory i stabilizator 9V na 5V?

http://www.ledstyles.de/ftopic6533-2.htm... tutaj mam kod i z tego powodu, że dopiero zaczynam programowanie w bascomie to nie orientuje się jak są sterowane rgb ****************************************... 'Software für FullColor-RGB-3x3x3-Cube (je 256 PWM-Stufen für R, G, und B) ' 'Kompatibel mit ATmega88/168/88p/168p/328p...

BASCOM – jak zapisać kolejne bity sygnału DCF bez tablicy bitów?

Niestety znow mam problem z kompilatorem. Pluje sie o prosta skladnie: If Dcf_array(1).index = 1 Then Display_values(1) = &B00000110 Else Display_values(1) = &B00111111 Składnia jest rzeczywiście prosta , tyle że nie Basic-owa :| If Dcf_array(1).index = 1 Then Display_values(1) = &B00000110 Else Display_values(1)...

DS18B20 pokazuje stałą temperaturę 24,6°C - co może być przyczyną?

Cześć! Myślałem, że z Dallasem nie będę mieć problemów. Jest pełno przykładów pod BascomaAVR aby ATmega rozmawiała z 18b20 i wszystkie praktycznie identyczne. Niestety u mnie na wyświetlaczu widnieje ciągle temperatura 24,6C mimo podgrzewania i oziębiania czujnika. Czemu akurat taka skoro się nie komunikują? Jak myślicie?? ... sub Read1820 ' reads sensor...

C# RS232 – nieprawidłowy odczyt stringa, różne wartości w TextBox i Label

using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using ZedGraph; using System.Text.RegularExpressions; namespace SimpleSerial { public partial class Form1 : Form { // Add this variable string RxString="0"; //double...

Bascom - Zapis na karcie SD - zmiana zawartości zmiennej (nie pożądana)

Witam Mam program, który, po dokonaniu pomiarów, wysyła dane przez RFM12 i zapisuje na karcie SD. Chcę dołożyć wysyłanie danych do Domoticz po każdym pomiarze. Problem w tym, że po dopisaniu obsługi ESP8266 i Domoticz ( zmienne miałem już wcześniej zadeklarowane ) to pojawiają się błędy w zapisie na karcie SD. No i wysyłanie do Domoticz przestaje działać,...

ENC28J60/Bascom - Automatyczne odświeżanie danych o stanie portów wejściowych

Witam serdecznie Bazuję na dostępnym w sieci kodzie Pana Piotra Rzeszuta, służącym do obsługi modułu ENC28J60 w Bascomie. Wszystko działa jak należy, jednak chciałbym zmodyfikować kod tak, aby po włączeniu diody wyświetlał się aktualny stan jej działania ("stanled1")... Czyli po kliknięciu w przeglądarce przycisku ON przy diodzie, obok wyświetli się...

[EN28J60] [BASCOM] Jak wyświetlić stan diody led na stronie html?

Witam Mam moduł sieciowy na układzie ENC28J60 podłączony do mikroprocesora ATMEGA644 20PU taktowany kwarcem 16Mhz.Program piszę w Bascomie bo innego języka nie zmam. Przykładowy program znalazłem w internecie z sterowaniem diody led przez stronę internetową. Dopisałem kawałek programu żeby na tej stronie internetowej był pokazywany stan tej diody led....