nie testowałem tego tylko pisze z głowy. Ale skoro X to STRING to nie można go porównywać z pojedynczym znakiem bo STRING to tablica znaków. Porównanie musiałoby wyglądać na przykład: if X Kiedy tak sobie czytam podobne dywagacje na temat Bascoma , to zaraz widzę taką sytuację: Bascom , to skomplikowana , sterowana numerycznie obrabiarka. "Statystyczny"...
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ą...
Pozdrawiam wszystkich. Panowie, czy istnieje w Bascomie funkcja która odczytuje określoną liczbę zmiennych (np. z tablicy) typu liczbowego poddaje konwersji do postaci tekstowej (tu się domyślam że to bedzie char) i wysyła RS 232 (print) do komputera ale w ten sposób aby znaki były wyświetlane (np. w hyper terminal) jeden po drugim w jednym wierszu...
Panowie, ekspresowe pytanie: czy w bascomie jest jakiś sposób, żeby zapisać danymi całą tablicę naraz? Chodzi mi o coś takiego: [syntax=basic4gl] Dim Tablica(5) as Byte Tablica(1) = 1 'tak można Tablica(2) = 2 . . Tablica(5) = 5 Tablica = 1,2,3,4,5 'a tak już nie można Dim A as Byte For A = 1 To 5 Tablica(A) = A 'tak też można, ale nie o to mi chodzi...
Witam szukam po internecie i nie mogę znaleźć jak z ciągłego tekstu typu string wydzielić poszczególne wyrazy oddzielone przecinkami i wpisać je od danego elementu tablicy np: , poniedziałek,wtorek,środa,czwartek, tablica1 poniedziałek tablica2 wtorek itd, Z góry dziękuję za pomoc.
Witam, W programie zapisuje kilka zmiennych String w eepromie potrzebuje uzyskać z nich taką tablicę do po prawnej działania pętli for [syntax=basic4gl] Memory(1)="zmienna a zmienna b zmienna c" Memory(2)="zmienna a zmienna b zmienna c" Memory(3)="zmienna a zmienna b zmienna c" Memory(4)="zmienna a zmienna b zmienna c" Memory(5)="zmienna a zmienna b...
Mam taką tablicę [syntax=basic4gl]Dim Lngfreq_memory(50) As Eram Long Dim Lngstep_memory(50) As Eram Integer Dim Modulacja_memory(50)as Eram Byte Dim Vfo_memory(50)as Eram Byte Lngfreq_memory(idx + 1) = Lngfreq : Lngstep_memory(idx + 1) = Lngstep : Modulacja_memory(idx + 1) = Modulacja:Vfo_memory(idx + 1) = Vfo[/syntax] Chciałbym wyświetlić ją w ten...
Witam chciałbym prosić o pomoc w korekcji programu napisanego w bascomie. Skonstruowałem tablice o rozdzielczości 8x80 pikseli na której są wyświetlane: zegar temperatura, imieniny. Chodzi mi o to żeby przystosować tablice do wyświetlania nazw przystanków tak jak jest to rozwiązane w komunikacji miejskiej. Chciałbym aby był do tego sterownik z wyświetlaczem...
Witam, Chciałbym zrobić w bascomie następujące rozwiązanie: zdefiniowana tablica zawierająca zestawy komend wyświtlanych na ekranie, czyli: K11 K12 K13 K21 K22 K23 K31 K32 K33 W zależnośći od wyboru dokonanego przez użytkownika, w danym miejscu kodu mają być wyświetlane napisy KX1 KX2 KX3, po resecie użytkownik może wybrać inny zestaw. Moje pytania...
Cześć. Proszę ten poradnik będzie dla Ciebie pomocny. Czy to już tablica? Gdzie ją umieścić? Tak, to jest tablica. Kompilator sam załatwi sprawę. [syntax=vbnet]$regfile = "m48def.dat" $crystal = 4000000 $baud = 19200 $hwstack = 32 $swstack = 10 $framesize = 40 Dim B1 As Byte , I As Integer B1 = Lookup(2 , Dta) Print B1 I = Lookup(0 , Dta2) Print I End...
Wykombinowałem coś takiego :), przykład można uruchomić w symulatorze (dane wejściowe np. porta.1): EDIT: poprawiłem mały błąd w przykładzie, bity można nawet kopiować jeżeli port źródłowy i docelowy jest ten sam [syntax=basic4gl]$regfile = "m32def.dat" $crystal = 16000000 $hwstack = 64 $swstack = 64 $framesize = 64 $baud = 57600 Dim Src_port_str As...
Źle przekazujesz Id do funkcji, mały przykład do uruchomienia w symulatorze: [syntax=basic4gl]$regfile = "m88pdef.dat" $crystal = 20000000 $baud = 19200 $hwstack = 64 $swstack = 64 $framesize = 64 Dim Tablica(4) As Byte , Tekst As String * 12 Declare Function Test_funkcji(byref Osa As Byte) As String * 6 Tablica(1) = 10 Tablica(2) = 20 Tablica(3) =...
Skąd wiesz, że w zmiennych i EEPROM nic nie ma jeśli nie skompilowałeś programu? (Program się nie kompiluje bo brak deklaracji kz.) Wprowadzasz coś do bufora z zewnątrz? Z czym się komunikujesz i czy połączenie jest odpowiednio zestawione? (parzystość, stop, rodzaj danych) Po doprowadzeniu programu do ładu w symulatorze działa. Uruchom poniższy zmodyfikowany...
A faktycznie niedopatrzyłem bo to wycięty fragment. Proszę więc. Kod jest po to by pokazać jak pomysł otrzymany na Forum można zamienić na coś działającego :P Nie ma wskazywać idealnego rozwiązania, a jedynie to co miałem na myśli a mam ich więcej bo pełno różnych projektów na głowie. Zmieniłem Sub w Funkcję. Nagram chyba kiedyś o tym jakiś film żeby...
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_...
Nie odkrywajmy koła od nowa ;) Kod dla takiego wyświetlacza jak na obrazku. https://obrazki.elektroda.pl/2987586400_... Wyciąłem go z kodu który w minute można znaleźć w DuckDuckGo :P Jeśli ktoś ma inaczej podłączone segmenty to musi tylko edytować tablicę Data. [syntax=vbnet]$regfile = "m328pdef.dat" $Crystal=16000000 $hwstack=32 $swstack=8...
Inne napisy umieściłem w eeprom, zyskałem jakieś 400 bajtów miejsca. Z nazwami procków kombinowałem już na wszystkie sposoby, no i niestety nie zrobiłem tego... każdy jeden wpis "Print "napis"" kosztuje mnie 18 bajtów (w tym 9 bajtów sam napis), gdy np chcę przepisywać napisy do zmiennej string i na końcu wyświetlać - wychodzi po 20 bajtów na każdy...
To: 1. Rozbij sekwencję na kody ASCII i umieść je w tablicy 2. Wyślij tablicę za pomocą Printbin Tablica(1) ; ilość_elementów_tablicy
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)...
Otóż pisząc program obsługi tablicy reklamowej (na Atmega32 )zupełnie przypadkiem stwierdziłem, że na zmienną typu string np 10 znakową można zapisać np 20 znaków instrukcją Restore i Read. Co więcej to działa w normalnym programie tak jakby ta zmienna miała faktycznie 20 znaków ! Oto przykład sprawdzony na symulatorze: Dim Tekst As String * 10 Dim...
Napisz tak : Print {013} ; "xon" ; {013} ; Chyba, że Twojemu urządzeniu przeszkadza zero które wystepuje na końcu stringa wtedy musisz tak: [syntax=vbnet] Dim Mystring As String * 5 Dim Mybuff(5) As Byte At Mystring Overlay Mystring = "{013}xon{013}" Printbin Mybuff(1) 'to wyśle całą tablicę pięciu znaków bez kończącego zera[/syntax]
Zamiast używać wielu zmiennych w stylu zmienna_byte, zmienna_byte2, zmienna_byte3 załóż tablicę np. zmienna_byte(300) i wówczas na podstawie zinterpretowanego znaku wysyłasz zawartość odpowiedniego pola tablicy. No dobra, tryb tablicowy ma swoje plusy (jeśli chodzi o zapis chociażby i odwoływanie się do zmiennych). Jednak nie do końca o to chodzi....
Teraz przykład prosty, też uniwersalny niema znaczenia ilość zmiennych i ich długość, ale do ESP musisz wysłać same zmienne przedzielone spacją, według wzoru" Bascom: Kod: vbnet Próbuję zrobić tym sposobem i klapa... Jeżeli poślę z AVR siedem zmiennych to jest OK, ale jeżeli będzie ich więcej to już nic z tego ;( ESP w konsoli się drze: [syntax=bash]...
Druga kwestia, to zapis do pamięci 24c04 liczby zmiennoprzecinkowej, hmm. nie robiłem nigdy tego, nie bardzo wiedziałem jak to ugryźć. Sprawa jest generalnie prosta. Liczba typu single zajmuje cztery bajty, wystarczy więc ją rozbić na pojedyncze bajty i zapisać każdy z osobna. Przy odczycie robisz dokładnie odwrotnie. Powiesz pewnie "no dobra, ale...
Dzięki za podpowiedz. Już to sprawdzam. Edit: Jak podałeś w stringu były dane LF na początku odczytanego stringa i dlatego był problem z tłumaczeniem zmiennej. Dzięki za naprowadzenie! Jeszcze wątku nie zamykam, gdyż mogę jeszcze trafić na problem i w razie czego szkoda zakładać nowy wątek. Pozdrawiam Edit2: Niestety powracam z problemem :( Program...
Witam Jestem w trakcie zgrywania ze sobą kilku uc po rs-485, wszystko szło pięknie, dane szły po lini do celu bez problemów, ale... kiedy przyszło mi wysłać pustą ramkę zaczęły sie problemy. Może najpierw program: [syntax=basic4gl]$regfile = "m32def.dat" $crystal = 16000000 $baud = 250000 $hwstack = 32 $swstack = 32 $framesize = 32 Config Print0 = Portd.2...
zacznij od tego kodu $regfile = "m8def.dat" $crystal = 8000000 Open "comd.3:4800,8,n,1" For Input As #2 Open "comd.2:4800,8,n,1" For Output As #1 Dim Poz As String * 32 Dim Poz1 As String * 20 Dim Poz2 As String * 20 Dim Poz3 As String * 32 Dim Pozv1 As String * 2 Dim Pozv2 As String * 7 Dim Pozv3 As String * 7...
Witam! Proszę o pomoc bo już po całym dniu zbaraniałem. Chciałem zrobić sobie zegarek na dość nietypowej kości i opanowanie jej się powiodło. Chiałem dorobić sterowanie zegarkiem z pilota i do tego jeszcze termometr ale to później. Płytka z zegarkiem generuje co sekundę impuls na wyjściu i Atmega odczytując ten impuls na INT1 ma w przerwaniu odczytać...
Witam! Mam problem z kodem w bascom do obsługi DS1820 oraz wysłaniem wyniku przez uart. Problem wygląda następująco - gdy działa obsługa DS1820 uart nie nadaje sygnału. Gdy wyłączę obsługę 1-wire uart działa. $regfile = "m8def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.3 , Db6 = Portd.2 ,...
Tzn. mam tablicę 24 bajty ( na razie do testów). I teraz podaje adres początkowy z tablicy, od którego zaczyna się ID układu DS18B20. Podprogram ma załadować ID, odczytać, sprawdzić CRC i w odpowiedzi podać mi LSB, MSB, status czujnika, histereze ( poprzednią muszę mu jakoś podać ) i wynik w postaci zmiennej typu string. Wzorowałem się na czymś takim:...
To, od czego według Was powinienem rozpocząć żeby zacząć raczkować. Wspomniany kod $regfile = "m32def.dat" $crystal = 16000000 $baud = 9600 Config Lcdpin = Pin , Rs = Portc.7 , E = Portc.6 , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7 Config Lcd = 16 * 2 Config 1wire = Portd.7 Dim Dsid1(8) As Byte Dim Dsid2(8)...
$regfile = "m8def.dat" $crystal = 16000000 $baud = 57600 $framesize = 32 $hwstack = 32 $swstack = 32 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0 Config Debounce = 30 'Długość naciśnięcia przycisków Config Timer0 = Timer , Prescale = 256 On Timer0 Odmierz_1s...
Oj kolego, poważny błąd - zasilaj prawidłowo mikrokontroler: http://mikrokontrolery.blogspot.com/2011... Dzięki za upomnienie, faktycznie gdzieś to przeoczyłem, na schemacie ideowym nawet masa wisi :) Poniżej zamieszczam poprawiony schemat ideowy i płytkę w EAGLE. Widząc duże zainteresowanie kodem wrzucam wsad w BASCOM....
http://obrazki.elektroda.pl/3089511800_1... Witam, dziś prezentuje swój bezprzewodowy termometr pracujący na częstotliwości 433 MHz. Urządzenie składa się z nadajnika i odbiornika. Nadajnik odczytuje temperaturę pieca C.O. i wysyła ją do odbiornika. W odbiorniku mamy możliwość ustalenia górnego i dolnego progu załączenia alarmu, który...
Dzisiaj troszkę posiedziałem nad tymi stosami, zapoznałem się nieco z tym opracowaniem. Próbowałem również rozgryźć tabelkę "SRAM" w symulatorze bascom. Z opracowania i zachowania symulatora wydedukowałem że obszar w sram na $hwstack jest na najwyższych dostępnych adresach pamięci sram i zwiększa się on do dołu(niższych adresów), więc na początku metodą...
niektórzy nie potrafią zmienić narzędzi na bardziej odpowiednie/wydajne, bo myślą, że nauka nowego języka programowania to ekstremalne wyzwanie. Stąd cała masa projektów, które zyskałyby na przejściu z Pythona na C++/C# czy nawet VB. Chyba nie do końca wiesz o czym piszesz. Performance to jedno a złożoność programu źródłowego drugie. Obecnie C++ w...
Przedstawiam tylko istotne części programu związane z transmisją danych Na początek Atmega 16 obsługuje klawiaturę, Wyświetlacz LCD i komunikację GSM i inne drobiazgi oraz RS232 z Atmegą 8 Dodano po 10 A tak przy okazji takie pytanie czym różni się transmisja po RS232 dla: A=1 Print A oraz Print "1" Wg ASCII < 1 > ma kod 49 i chyba w jednym i...
Witam, Piszę na Atmedze odczyt danych z BMP085 i dodatkowo zapis danych na kartę SD. Wszystko wydaje się działać poprawnie, a jednak coś jest nie tak. Do obsługi BMP085 wykorzystałem kod z tego tematu: http://www.elektroda.pl/rtvforum/topic18... Oto wykres z odebranych danych, czas pomiaru to około 10min http://obrazki.elektroda.pl/4498963800_1...
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ć,...
Witam! Mam taki malutki problem. Chciałem stworzyć sobie taki serwer www (kod programu ściągnięty z archiwów AVT) który pokazywał by mi przez internet temperaturę w jakimś oddalonym pomieszczeniu w innym budynku np. Do budowy tego wykorzystałem AVT-956 tj. internetowy sterownik I/O. Akurat go posiadam ponieważ robiłem nim ćwiczenia na pracowni informatycznej....
tablica string bascom bascom tablica string print tablica
wymiana grzałki vestel gaśnie podświetlenie programowanie pilotów alarmu skoda
hisense 55a63h palnik multiolejowy
Samsung SQ-1000 instrukcja obsługi PDF, taśma barwiąca GR.153, zamienniki Brother AX-10 Renault Scénic III – gdzie podłączyć się do szybkiej szyny CAN poza OBD2
