chcę zrobić tablicę z nazwami dni tygodnia do kalendarza. deklaruję dim tablica(7) as string * 12 Po co Ci aż 7 12-bajtowych stringów :?: Wystarczy: Dim Dzientygodnia As String *12 , Nrdnia As Byte ... Dzientygodnia=Lookupstr(Nrdnia,Tabli... '0=Pon, 1=Wtor, ... Lcd Dzientygodnia; ... Tablica: Data "poniedziałek", "wtorek"...
Czy jeśli to samo chcę mieć dla zmiennej slowo3 muszę zakładać nową tablicę (pamięciożerne) czy też mogę załadować slowo3 do istniejącej już tablicy Slowo2_array(10)? Nie do końca chyba rozumiesz jak działa OVERLAY , tak stworzona zmienna nie jest "pamięciożerna". S lowo2 (string *10) i Slowo2_array(10) As Byte At Slowo2 Overlay zaczynają się od tego...
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. Mam tablicę stringów [syntax=basic4gl]Dim Tablica(3) As String * 16 Tablica(1) = "jakis tekst..." Tablica(2) = "kolejny..." Tablica(3) = "jeszcze jeden..." [/syntax] jak zrobić(zakładając, że jestem w Tablica(1)), żeby przejść do kolejnego elementu tablicy? Funkcja "Incr" nie działa.
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...
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...
Można sprawdzać czy string zawiera "+CCLK:" [syntax=vbnet]Helpb = Instr(Somestring , "+CCLK:") If Helpb > 0 Then Helpb = Helpb + 6 Helpstr = Mid(Somestring , Helpb) 'odetnij +CCLK: End If[/syntax] Potem w samym stringu mozna szukać spacji lub przecinka poprzez CHARPOS i sprawdzać czy > 0 albo zrobić tablice stringów i na tym SPLIT dzieląc przecinkiem...
Najłatwiejszy "słownik" komend Bascoma jest tutaj -> https://wiki.mcselec.com/bavr/BASCOM-AVR... -> bo widać je wszystkie na raz alfabetycznie i szybko można kliknąć. Tłumaczyć można oczywiście całe bloki teksu, albo w GoogleTranslator, albo DeepL Ja korzystam z wbudowanej pomocy czyli wciskam w Bascom F1 i szukam sobie w Index. Dla mnie działa szybciej...
Specjalnej funkcji to nie ma, ale nic nie stoi na przeszkodzie napisać kilka linijek które to zrobią. Np. w pętli for next z użyciem mid()
Memcopy o ile dobrze rozumiem kopiuje mi po prostu fragment pamięci, zatem musiałbym znać lokalizację mojej tablicy i kopiować do niej inną tablicę, tak? Potrzebne mi jest to do osiągnięcia następującego efektu: moja tablica jest ośmiobajtowa i zawiera informacje do wyświetlenia na obsługiwanym przerwaniem ośmiopolowym wyświetlaczu LED (nie tylko cyfry,...
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"...
Wydaje mi się, że pisanie konwertera to w moim przypadku strzelanie z armaty do komara. Większość tekstów udaje mi się wyświetlić za opmocą Chr(numer litery z generatora). Problemem jest tylko tablica z nazwami dni tygodnia, które są pobierane jako string i wyświetlane. Robiłem próby z wpisywaniem do programu literek za pomocą lewy alt + numer, ale...
Znalazłem kod tablicy świetlnej, 8x8 sterowanej przez rejestr 74164, niestetypo załadowaniu programu na tablicy świecą się tylko trzy kolumny diód :(. Czy ktoś mi pomorze to rozgryść? 'Program tablicy świetlnej 'Sterowania multipleksowe wyświetlaczem matrycowym 7x5 LED 'Częstotliwość sterowania kolumn wyświetlacza wynosi ok. 333 Hz 'czyli częstotliwość...
Witam, Mam problem. Chodzi o listingi z książki Marcin Wiązania - Programowanie mikrokontrolerów AVR w języku Bascom W książce są dwa przykłady sterowania matryca Led 5X7 Pierwszy przykład z książki ma za zadanie wyświetlać znaki po kolei i to działa. Natomiast drugi listing ma za zadanie przesuwać znaki z lewej do prawej. I to już nie działa. Schemat...
Witam! Mam problem z przerobieniem kodu tablicy świetlnej z wyświetlaczem matrycowym led. Posiadam kod z książki Marcina Wiązani - Programowanie mikrokontrolerów AVR w języku Bascom przerobiony według instrukcji użytkowników w temacie: 'Program tablicy świetlnej 'Sterowania multipleksowe wyświetlaczem matrycowym 7x5 LED 'Częstotliwość sterowania kolumn...
Witam. Mam zrobioną matrycę LED z sześciu wyświetlaczy 8x8. Sterowanie poprzez PORTA (ULN2803) procesora dla kolumn i HC595 dla wierszy. Męczę się już od jakiegoś czasu, ale nie mogę dać rady z jedną rzeczą. Podczas przewijania tekstu widzę go rozmytego, tak jakby byłu dwa napisy na sobie, ale przesuniętę o jeden piksel w bok (pogdubione litery). Ogólonie...
Tablica led 8x28 sterowane Atmega8 pord przez ULN i 74HC595 w kolumnach tak jak na stronie http://www.avrprojects.net/index.php?opt... Problem jest taki że literki idą nie po kolei czyli zaczyna się od 14 kolumny led i tak w połowie załącza...
Nie wiem dokładnie czy bascom dokonuje konwersji typu string na byte w tym może być problem. Spróbuj zmienna nm zadeklarować jako 'byte' może pomoże.
Tworzysz zmienną sting * 20 i tworzysz tablice byte(20) adresujesz je tak samo i poleceniem lcd chr(byte(a)) stawiasz znak z wybranego miejsca ze stinga.
nie przyjmie. Trzeba zapisywać po charze. A coś takiego jak string tak na prawde nie istnieje - jest to tablica charów.
A widzisz, pojawia się wreszcie jakiś konkret. Skoro pojawia się komenda "300" to rozumiem, że pojawi się też "120", "1", "55" itp. Więc zamieniasz otrzymany string na word i masz już wskaźnik tablicy. W odpowiedzi wysyłasz wartość zmiennej o numerze "300".
Tak, rozwiązałem problem za pomocą tablicy.
No właśnie tak jak napisałeś. Parameter(8) = "Off" to jest właśnie zapis. Oczywiście pod warunkiem że jest to tablica Stringów a nie jeden String.
Tablica = 1 Adresh = High(961) Adresl = Low(961) I2cstart I2cwbyte &H4A I2cwbyte Adresh I2cwbyte Adresl Do For A = 1 To 21 T(1) = Mid(kod(tablica) , 1 , 1) Ta(1) = Asc(t(1)) I2cwbyte Ta(1) T(2) = Mid(kod(tablica) , 2 , 1) Ta(2) = Asc(t(2)) I2cwbyte Ta(2) T(3) = Mid(kod(tablica) , 3 , 1) Ta(3) = Asc(t(3)) I2cwbyte Ta(3) T(4) = Mid(kod(tablica) , 4 ,...
Biblioteka Galahata działa fajnie, trzeba tylko drobne zmiany zrobić bo stary Bascom ma inny syntax przy deklaracji suba. [syntax=vbnet]call ustaw_leda(3, czerwononiebieski) sub ustaw_leda(numer_leda as byte, bylabel kolor as string) Kanal=numer_leda * 3 b = lookup(2, kolor) Kanal=b Decr KANAL g = lookup(1, kolor) Kanal=g Decr Kanal r = lookup(0, kolor)...
Basic ( Bascom)
Potrzebuję posortować alfabetycznie tablicę typu string*12. Ilość elementów tablicy jest zmienna, od 1 do 512. Czy jestem w stanie zrobić to w Bascomie?
Wyrzuć ten wzór i obmyśl jakiś inny. W tej postaci to się absolutnie nie nadaje. Z ADC możesz uzyskać maksymalną wartość 1024, teraz podnieś to do potęgi 6 i wychodzi ci absurdalna liczba, program wywala się juz na pierwszym obliczeniu. Obliczanie napięcia może wyglądać tak: [syntax=basic4gl] Dim Obl_nap As String * 6 Dim Wartadc As Word Dim Tymcz As...
oczywiście, że wystarczy $asm ... kod twojej wstawki $end asm ale oczywiście przydałoby się jeszcze wiedzieć jak można uzyskiwać w asemblerze dostęp do zmiennych itp, otóż: Dim Zmienna1 as Byte $asm lds R16, {Zmienna1} ... coś tam robimy sobie w asm ze zmienną i chcemy ją uaktualnić, więc: sts {Zmienna1}, R16 $end asm powyżej...
Po to poradziłem Ci aby użyć do tego tablicy aby w łatwy sposób, przy użyciu pętli For...Next można było nią zarządzać (w tym i wyświetlać). Dim Seq(5) As String * 10 Dim Tekst As String * 10 Dim Index As Byte Tekst = "Aktualna" For Index = 4 to 1 Step -1 Seq(index + 1) = Seq(index) 'przesuwanie 4 do 5, 3 do 4,... Next...
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
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...
Witam. Mam zmienną Dim Dane As String * 15 która ma 15 znaków np 1234z2132j2131j jak zrobić aby te kolejne znaki wpisać do tablicy, tak by każdy znak wpisać do kolejnego elementu tablicy poczynając od Dane(1)=1 Dim Kod(15) As String
Niestety przesiadka na C też by nic nie dała, ponieważ on też tego nie kontroluje. Jeśli zadeklarujesz tablicę o długości 10 bajtów i odwołasz się do niej: char tablica[10]; tablica[12] = 1; to się wzburzy że jest błąd, ale jeśli zrobisz tak: char tablica[10]; char tablica1[20]; strcpy(tablica,tablica1); to nie...
prawdopodobnie funkcja pobiera wskaznik albo do tablicy char (w innych jezykach stosowany "string", patrz bascom) albo do stalej const string, wiec sprobuj tak: WriteText(*"Brak kota u Ali"); Powinno dzialac...
czy w bascomie8051 jest mozliwosc odebrania danych tak aby zapisac je do tablicy w postaci bitowej? nie musi byc to zapisanie do tablicy, moze to byc string, ale zeby dane bylo w postaci ciagu 0 i 1
Sposobów pewnie jest więcej. Poniżej masz dwa. [syntax=basic4gl]Dim Zmienna_string As String * 15 Dim Tablica_danych(16) As Byte At Zmienna_string Overlay 'jesli w stringu masz takie wartości 'A|B|E|C|A|D|L|O|_|Z|P|I|E|C|A|NULL '1|2|3|4|5|6|7|8|9|10|11|12|13|14|15| 'to interesująca Cię wartość jest w Interesujace_dane = Tablica_danych(5) 'Możesz też...
Pomysł z tym programikiem jest dobry ale lepiej zrobić tak aby wykorzystać przerwanie od uart'u od danych przychodzacych. W obsłudze tego przerwania robimy taki myk że gdy przyjdzie znak "$" to niech sie zeruje licznik (wskaźnik pozycji) i każda nastepna dana z portu niech będzie zapisywana do nastepnej zmiennej. Potem można z tych zmiennych wyciągnąć...
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...
Ź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) =...
Co ty właściwie szukasz. Czy chcesz zużyć 17 bajtów - bo tyle zajmie string o długości 16 znaków czy 170 bajtów bo tyle zajmie tablica tych stringów. Znasz takie coś jak zakrywanie w bascomie. [syntax=basic4gl]Dim Napis As String * 16 Dim Tablica(17) As Byte At Napis Overlay[/syntax] Zajmuje to w pamięci 17 bajtów, a do każdego znaku odnosisz się jak...
heh... a wystarczyło żebyś napisał: "co sie męczysz chłopi, zamień funkcją time() zmienne typu byte na string z godziną i porównaj" .... tablicę prawdy rozrysowałem juz wcześniej :P
Witam Bardzo dziękuję :). Procedurę wywołuje się z (Posx,Posy,tekst) : typu : (byte,byte,string)? Czy bezczelnością by było, gdybym zapytał jeszcze o tablicę z czcionką Font8x8:)? Pozdrawiam Sanwa
Można wyświetlać temperaturę w podmenu "wybór_Ds" ale trzeba zmienić cały program. Chyba nie jest tak trudno zapisać sobie cztery ID czujników i wiedzieć później który gdzie przypisać. Najlepiej osobno podłączać każdy czujnik i na naklejce na kablu przy czujniki zapisać jego ID. Wiedząc gdzie jakie jest ID czujnika można już mu w podmenu przypisać odpowiednią...
Witam, robię transmisje przez RS485 i mam pytanie co do działania instrukcji tworzenie i weryfikacji sum kontrolnych w Bascom Checksum() i CRC8. o o chodzi: Mając zmienną send_data=7 i generując sumę: Send_string=Str(send_data).........zamie... liczba na string bo Checksum operuje na zmiennych typu String Suma = Checksum(send_string) Otrzymam jakąś...
Uważam, że to zła metoda... Może spróbuj sam napisać, chętnie pomogę. Proponuję zacząć oczywiście od inicjalizacji, następnie załóż tablicę string np. 10 pozycyjną, będzie zawierała poszczególne pozycje menu. Napisz i wklej kod.
Masz rację z można to zrobić na tablicach. potrzebuje zapamiętać 4 zmienne dwie trzy typu string i jedną long. zrobię 4 oddzielne tablice i będę się odwoływał do wszystkich za pomocą tego samego indeksu wtedy będę miał dane po kolei, w tablicach tez łatwo mogę przesuwać. Nie wiem tylko czy mi pamięci wystarczy. Chciałem to zrobić jakoś ciekawiej, ale...
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_...
tablica string bascom print tablica string bascom string tablica
diptrace otwór black print esl67070r electrolux
komputer włączyć regulowane źródło prądowe
Lokalizacja kabla minusowego kierunkowskazów w skuterze 4T Norma uziemienia słupa telefonicznego – Rozporządzenie MC 2022, PN-EN 62305, wymagania Ω
