Config DP działa od wersji 2.0.1.0, jeżeli masz tą lub nowszą wersje Bascom'a w Fusing zamień "#.##" na "#,##".
ASC() help od takich rzeczy jest No niestety to nie do tego. Zamiana stringa w bascomie na liczbę to funkcja VAL()
Witam Napisałem na podstawie wzoru kod dla wiecznego kalendarza, niby obliczenia na kartce się zgadzały ( sprawdzałem parę dni wcześniej ), ale dla dzisiejszej daty ( 29.04.2016 ) pokazuje dzień tygodnia - 1, czyli źle [syntax=vbnet] '************ zmienne do obliczen dla wiecznego kalendarza Dim Rok_str As String * 4 Dim Rok_int As Integer Dim Rok_pom...
Zacznij zatem od porzucenia Bascoma i przesiadki na C, skoro zależy Ci na wydajności. Przy okazji możesz wziąć procesor tańszy od AVR i z 10 razy szybszy, np. jakiegoś Cortexa. Zacznij zatem od sensownego udzielenia odpowiedzi na jego pytanie. Może jeszcze ARM i frytki do tego? Nie wiesz, nie pisz. Dawid88: Zagadnienie bardzo interesujące, bo sam wiem...
Nie znam bascoma. Ale to dziwne że nie ma przeciwważnych funkcji.
A zamiana Cls na Locate 1 , 1 ? Sprawdzałeś ? Spróbuj jeszcze wymiany (nadawanie i odbiór jako Word a nie String) za pomocą: [syntax=basic4gl]Nadajnik: Dim Wart1 As Word Printbin Wart1 Odbiornik: Dim I As Word Inputbin I Locate 1 , 1 Lcd I [/syntax]
Potrzebuję pomocy przy zamianie kodu "RFID Reader", tzn. żeby zamiast wyświetlania kodu karty na LCD uzyskiwać odpowiedni poziom na wyjściu 1z10 i czy jest to możliwe do zrealizowania na atmega8? Chciałbym użyć 8 ostatnich cyfr kodu karty. Posłużyłem się gotowcem, który był już na elektrodzie (dopiero uczę się bascoma i nie wiem jak się do tego zabrać):...
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 Jeśli dobrze rozumiem zdanie: "na zmienienie wartości string odczytanej z eeprom na zwykły tekst" masz na myśli zamianę liczby (zapisanej w kodzie ASCII ?) na jej odpowiednik znakowy. Program, który wykorzystałeś bazuje na kodach ASCII znaków, (komentarz przed tabelą znaków Fontlookop), dlatego też po mojemu niepotrzebnie stosujesz zapis: Czytaj_str...
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...
Najpierw należy wyodrębnić poszczególne znaki z hasła które chcemy wysłać. Następnie wyłuskane znaki (w T_string) zamieniamy na kod ASCII i wysyłamy. W s1 znajduje się ciąg znaków np.$TEMP. W D6 do D10 znajdzie się liczbowa reprezentacja liter ASCII. Deklaracje : Dim T_string As String * 6 Dim s 1 As String * 6 '-------------------------- procedura...
Zmieniłem zawartość funkcji wg Twojej rady na: Function Stringi(zawartosc As Byte) As String Local Tt As String * 3 Tt = Str(makedec(zawartosc(inx_za... Stringi = Format(Tt , "00") End Function , ale zwraca mi 00 . Po co w funkcji deklarujesz argument, by go potem nie używać :?: Tak powinno być. Function...
Witam. Jak mogę zamienić stringa na integer? Szukałem, ale znalazłem tylko odwrotną zamianę (integer na string), ale nigdzie nie widziałem string na integer. Czy w ogóle jest to możliwe? Nie chodzi mi o funkcję, która zwróci kod znaku ASCII, tylko o coś w tym stylu: Mam stringa = "922" i chcę mieć z niego integer = 922, jak to zrobić?
Witam ponownie,ma ktoś może jakiś sprawdzony software'owy patent na odczytywanie znaków z eepromu?Cały problem leży w tym aby zamienić znaki string"abcd..." na ascii i odnaleźć w tablicy znaków w eepromie. Napisałem taki kod: Sub Strlcd(byval Chstr As String) 'wpisanie stringa Local A As Word 'zmienna pomocnicza dopasowujaca wartosc znaku ascii...
Faktycznie powinna być typu string teraz kumam. Wątpliwości rozwiane dzięki. To jeszcze pytanie. Chciałem w sumie uzyskać to co wyszło przpadkiem a więc pozbyć się ułamka. Miałem zamiar zamienić na tekst i sformatować usuwając ułamek. Czy ten sposób który tu zamieściłem jest poprawny na pozbycie się ułamka? Chodzi o zamianę single na integer
Witam buduje taką mini stacje pogodową i zatrzymałem się z obsługą ds-a co w tym może być nie tak ? W książce którą posiadam jest tylko obsluga 1820. Docelowo mają być 2 czujniki na 2 liniach. Zrobie to dublując kod . Jednak przy jednym nic nie działa wyświetlacz zostaje cały czarny bez czujnika , i z nim też . Oto kod: '###STACJA POGODOWA BY GEGE97##################################...
Pewnie mój, tylko pisząc o błędzie miałem na myśli konwersję z "Fusing". Owszem, string zawiera o jeden znak więcej niż my widzimy, tyle w w wielu programach (m.in. w książce M. Wiazani jest zapis: zmienna As String*3, a następnie konwertowana za pomocą Fusing na x.xx (4 znaki). W helpie też na ten temat mało. Może o czymś nie wiem. Dodano po 9 Aktualny...
Nie pomyliłem się podając wartość &H17 jako godzinę 17 itd. Właśnie w taki sposób czas jest "kodowany". Nie pomyliłeś się co do reprezentacji, za to pomyliłeś się, jeśli chodzi o interpretację: Mam sterownik który wysyła czas i datę w formie HEX .... Jak zmusić Bascoma żeby zamienić te wartości HEX na DEC tak by były rzeczywiste? Sugerując się tym,...
Witam wszystkich mam taki problem.Potrzebuję z aplikacji android wysłać cztery zmienne typu Word do procesora Atmega 32 i zapisać je w Epromie.Dane wysyłane w Srtingu. Na razie wysyłam dane z terminala z Pc-ta.Aplikację na Android pisze mi ktoś inny.Potrafię wysłać jedną zmienną nadaną jako String przekształcić na Word i zapisać ją w Eprom na procku...
Czekaj czekaj Poniewaz AVR ma jakis bufor do odbioru to mozna wyslac wszystko naraz(tez dostawić jakies znaczki dodatkowe np. x i y i znacznik końca): nie zajmowałem się AVR ale przecież chyba jeżeli bufozawiera jakieś znaczki to trzeba je po koleji poprzepisywać do zmiennej typu string, a następnie wykryć odpowiednie znaczniki i podzielić na dwa łańcuchy...
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, przepraszam za dłuższe milczenie. Dziękuję za dotychczasową pomoc, właśnie chodziło o zamianę na stringi :-) Takie to proste, ale dopiero jak człowiek to zobaczy na własne oczy. Napisałem coś takiego: dim s1 as string * 8 dim s2 as string * 4 dim s3 as string * 4 Dim Fx As long fx = 48 s1 = "SDDBT,,," s2 = str(Fx) s3 = ",M,,"...
Rejestrator dość spory. Większość danych zbiera płytka nadajnika na Atmega328 i tam następuje praktycznie całkowita obróbka - oprócz danych z siedmiu DS18B20, jednego DHT11 oraz MPL115A2, odbieranie czasu z DCF77 i jego aktualizacja w PCF8563 przesyłane są dane o tym czy nie ma awarii czujnika ( zmienna Err ) oraz informacja o histerezie czujników DS18B20...
Witam Mam układ, który mierzy dwie temperatury ( DS18B20 ), dwa napięcia ( PCF8591 ( pobiera czas ( PCF8563 ), a z powodu niedużego wyświetlacza ( 12 x 4 ) wskazania są zmieniane do 10 sekund po przepełnieniu Timer1. Układy PCF8563 i PCF8591 są podpięte z "zewnątrz" przewodami około 10 cm. Magistrala I2C ma obniżoną prędkość przez Config I2cdelay =...
Witam. Na znanym serwisie aukcyjnym zaopatrzyłem się w wyświetlacze LCD 2x16 znaków które miałybyć kompatybilne z HD44780 jednak nie są. Wyświetlacze to PC1602V-P8 firmy Powertip. Na stronie $regfile = "m8def.dat" 'procesor mega 8 $crystal = 8000000 '8mhz Wait 1 Config Adc = Single , Prescaler = Auto , Reference = Avcc ' ustawienie adc Dim...
Sporo tego ( obsługa SD, PCF8563 + menu do ustawiania daty, obsługa PCF8574 w przerwaniu INT1 )- ale nie ma problemu - zmieniła się tylko zawartość podprogramu Pomiar była taka, jak w pierwszym poście oraz wyłączyłem w wyświetlanie na LCD tych wartości wskazań z DS18B20, oczywiście dostosowałem pozycje wyświetlania do LCD 4*20 - załączniku spakowany...
Po przeczytaniu wielu postów napisałem program który ma wyświetlać na wyświetlaczu LCD Napięcie , prąd oraz temp. Chciałem to wykorzystać do zasilacza, którego właśnie buduje. jednak po zaprogramowaniu procka wyświetlacz mi się nie inicjuje (zaświecają się kwadraty w pierwszej lini). Czy jest jakiś błąd w moim programie ? Proszę o sprawdzenie. $regfile...
Pojedynczy Bit nie może być przekazywany do funkcji. Ogólnie tez działanie na Bitach powoduje małą oszczędność w zmiennych SRAM za to wymaga przyrostu kodu bo pojedynczy bit trzeba wyłuskać z całego bajtu. Przerabiałem kiedyś czyjś program na Attiny2313 i zamiana tych zapisów w całym kodzie : [syntax=vbnet]Jakis_bit = Not Jakis_bit[/syntax] na coś takiego...
Witam! Bawiłem się przetowrnikiem A/C do pomiaru napięcia na mikrokontrolerze Atmega8. Myślę, że na Twoim układzie będzie tak samo. Nie mam w tej chiwli możliwości sprawdzenia czy działa, piszę na podstawie książki "Programowanie mikrokontrolerów AVR w języku BASCOM", którą aktualnie posiadam. Więc tak, najpierw konfigurujesz sobie LCD, częśctotliwość...
Witam Napisałem program, który dekoduje sygnał DCF77 ( ustawia flagę ), następnie zapisuje ( przy pierwszym uruchomieniu ) wartości zmiennych do PCF8563 i cztery razy na dobę wysyła przez RS485. do tego dwa razy na dobę koryguje czas w PCF8563. I to działa bez problemu. Do celów testowych mam podłączony LCD. Chciałem dołączyć możliwość pomiaru i wysyłania...
Witam wszystkich! Pewnie pomyślicie "znowu to samo", no ale zlitujcie się w Wigilię i przeczytajcie te kilka zdań :D Walczę z problemem od kilku dni. Nie potrafię skonfigurować Timera by konwertował dane z 1wire poza główną pętlą. Nie mogę sobie pozwolić na waitms, bo wtedy mam problemy z poruszaniem się w menu. Mam już działający Timer1 odliczający...
Czy Kolega będzie może wiedział co jest nie tak od strony programistycznej ? Tzn. jeśli wyświetlam stałe wartości to jest ok, podobnie jak wyświetlam w pętli For... Next od 1 do 59. Dodałem jeszcze obsługę LCD, żeby widzieć, co się dzieje z czasem. Ale jak podepnę do tego PCF8563 i odczytuje czas z niego, a dopiero później wysyłam do SAA1064 to jest...
Witam Mimo, że większość proponowanych tutaj rozwiązań podłączenia RFM12 do Atmegi wykorzystuje SPI programowe, ja podłączyłem tradycyjnie, przez SPI sprzętowe - mimo, że nie miałem problemów z wgrywaniem kodu do Atmegi spiętej z RFM12, to uruchomienie ich razem jest problematyczne ( każde osobno działa bez problemu ) [syntax=basic4gl] $include "Config_AVR-DOS.BAS"...
Witam Ostatnio złożyłem z książki Marcina Wiązani-"Programowanie_mikrokontrolerow_... dwa układy zegarka i termometru. Próbowałem połączyć te dwa układ i napisałem taki program $regfile = "m8def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 ,...
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...
Bascom - wersja 1.11.95 Kod, no jest tego sporo: - zegar PCF8563 - Zapis na SD - dwa czujniki DHT11 - odczyt z PCF8574AP ( klawiatura ) - RC5 - ma być DS18B20 - ma być DCF77, ale nie doszedłem do tego momentu ( tzn testowałem na innym procesorze i działało ) Działa - zegar PCF8563 - dwa czujniki DHT11 - odczyt z PCF8574AP w przerwaniu ( klawiatura )...
słuchajcie panowie, ja coś popełniłem w BASCOM8051. nie napisałem jeszcze żadnego programu którego działanie sprawdziłem w praktyce, bo nie mam programatora. wszystko tylko symulowane programowo. chciałem zrobić Config Lcd = 16 * 2 declare sub ustawienia dim d as byte 'przejechana droga dim v as single 'predkosc modelu dim o as byte 'obwod kola modelu...
Witam na wstępie chciałem powiedzieć, że nie jestem dobry w programowaniu, bo dopiero zaczynam i mnie to powoli wciąga. Mam parę pytań i postanowiłem napisać. Chce zrobić sobie taki mini komputer pokładowy do Fiata Cinquecento 700. Ten mały układ ma wskazywać temperaturę w środku samochodu i na zewnątrz a tak, że będzie pokazywać napięcie, jakim jest...
Witam Chciałm zrobić automatyczną regulację obrotów silnika. Pierwszy silnik napędza drugi silnik który pracuje jako prądnica i muszę wraz ze zmianą obciążenia prądnicy regulować obroty silnika tak aby uzyskać stałe napięcie na wyjściu prądnicy. Do sterowania zastosowałem Atmegę 8. Napisałem taki programik i niby działa, ale ... regulacja jest zbyt...
Witam! Kolega poprosił mnie o zrobienie mini-komputerka do Opla Corsy, mającego wyświetlać dane na wyświetlaczu radia. Problem pojawił się, kiedy zechciałem wyświetlać na bieżąco prędkość - program zgłupiał (choć, raz na kilka odświeżeń wyświetlacza pojawiła się poprawna prędkość) a przy większych prędkościach Atmega ulegała resetom lub się zawiesza....
Zamiana wyświetlaczy nic nie daje, zamieniałem nawet same kabelki łączące je z płytką i też nic. Jeśli chodzi o przerwania to mam odbiór danych z RFM12 oraz obsługę klawiatury na PCF8574. Może faktycznie coś na rzeczy z tymi przerwaniami. Wyświetlacz, który nie działa jak trzeba oprócz wyświetlania daty, godziny oraz części odebranych danych wyświetlać...
Usunąłem Wait 1 przy konwersji z DS18B20, działa, bez problemu ( na trzech przewodach ), tylko wyniki są opóźnione - tzn. wyświetlany wynik nie jest z aktualnego pomiaru, tylko z poprzedniego. Dodałem jeszcze dwa czujniki DS18B20. Ich zapis razem z godziną i datą na karcie jest jak najbardziej w porządku, tylko wyświetlanie trochę szwankuje - tzn. czasem...
Witam Stopniowo rozbudowując o kolejne konfiguracje układ chciałbym mieć możliwość ustawiania parametrów zegara przez pilota ( w sumie to bardziej wygodne i nie zabiera wyprowadzeń uC ). Mam program z menu działającym na przyciskach, zastosowałem flagi, gdyż sprawdzanie tylu wersji warunków niepotrzebnie zagmatwałoby kod. Zostawiłem obsługę przez przyciski...
Witam Jako, że mało jest informacji o obsłudze alarmu w układzie zegarowym PCF ( a PCF8563 to już wcale ), to sam spróbowałem coś podziałać. '*********************** Obsługa alarmu Sub Getalarm() I2cstart I2cwbyte 162 I2cwbyte &H09 I2cstart I2cwbyte 163 I2crbyte Al_mm , Ack 'Odczytuje minuty I2crbyte Al_hh , Ack 'Odczytuje godziny I2crbyte Al_dday...
A to przykład programu z użyciem Shiftout: (źródło: http://www.sklep.microsense.pl/product.p... "Przykładowe programy...") [syntax=basic4gl] 'Program sterowania multipleksowego wyświetlaczem matrycowym 7x5 LED 'za pomocą rejestru 74LS164 'Znak do wyświetlenia jest ładowany do zmiennej Znak typu String 'Częstotliwość sterowania kolumn wyświetlacza...
Witam Chciałem jako element dodatkowy oprócz pomiaru temperatury i zapisu na kartę SD dodać kalendarz z numerem dnia tygodnia ( później zamienić numer dnia na nazwę dnia ) Niestety jakbym nie próbował, to cały czas wyświetla 0. Odczyt Sub Gettime() I2cstart I2cwbyte 162 'Wysyła adres odczytu urzadzenia (162 (0xA2) układu PCF8583)...
Witam Mam taki programik troszke posklejany ale wyskakuje błąd co robie nie tak . label not found [_ENDIFO ] $regfile = "m8def.dat" 'Atmega8 $crystal = 8000000 'Kwarc 8MHz Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.1 , Db6 = Portc.0 , Db7 = Portb.5 , E = Portc.3 , Rs = Portc.4 '*************************************.....
Witam Mam program budzika, który jako dodatkową atrakcję miał mieć możliwość mówienie czasu na żądanie i odtwarzanie oprócz buzzera utworu jako alarmu. Atmega steruje przez jedno SPI programowe układem MAX7219, a przez konwerter poziomów i drugie SPI programowe odtwarzaczem WTV020SD. O ile sam WVT020SD + PCF8563 ( wyjście CLK do INT1 ) działają dobrze,...
P_min = 509 ' ustawienie wartości P_min P_max = 510 ' ustawienie wartości P_max Intuicja podpowiada mi, że chodzi o zamianę int na string, dla jakiegoś UI. Niestety nie znam bascoma, nie podpowiem.
Twoje działa, ale moje nie działa. Wklej mój kod w kompilator i zobacz co się dzieje [syntax=Bascom] $sim $regfile = "m8def.dat" $crystal = 16000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Rs = Portc.2 , E = Portc.3 , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portc.6 , Db7 = Portc.7 Cursor Off Noblink Cls Dim Cool As Word ' zmienna określająca wypełnienie...
zamiana string bascom string string bascom
pionowo drukarka mission glosniki trzeć bęben
moduł światła dzienne jabel czestotliwosc
Audi A1 – do czego służy druga karta SD/SIM i czy jest konieczna? Toyota 4E-FE autoadaptacja zaworu IACV – procedura resetu i uczenia biegu jałowego
