Najprościej to użyć overlay w sram. Single to 4 bajty w pamięci. dim zmienna_single as single dim bajt1 as byte at zmienna_single overlay dim bajt2 as byte at zmienna_single+1 overlay dim bajt3 as byte at zmienna_single+2 overlay dim bajt4 as byte at zmienna_single+3 overlay Potem zapisujesz bajty do eeprom, odczytujesz kiedy chcesz i masz wynik w single.
To może taki kolorowy obrazek z LCD ;) Deklarujesz tablicę czterech bajtów Arr(4) As Byte Na tę tablicę poprzez Overlay nakładasz Single Ładujesz swoje cztery bajty po kolei do tablicy Arr(1) - Arr(4) a wyświetlasz Single. Proste jak świński ogon ;) https://obrazki.elektroda.pl/3578008500_...
Możesz, to zrobić tak: Dim zmienna as single Dim part1 as byte at zmienna overlay Dim part2 as byte at zmienna+1 overlay Dim part3 as byte at zmienna+2 overlay Dim part4 as byte at zmienna+3 overlay Odebrane dane uartem wrzucasz kolejno do zmiennych 'part' w efekcie zapełniając 4bajty zmiennej 'zmienna' typu single.
Nie typ SINGLE a LONG ! Dodatkowo nie definiuj sztywno adresu bo to może być źródłem późniejszych problemów. Tak będzie poprawnie i najbardziej optymalnie ze wszystkich możliwych sposobów: Dim Zmienna As Long Dim Zm1 As Byte At Zmienna Overlay Dim Zm2 As Byte At Zmienna + 1 Overlay Dim Zm3 As Byte At Zmienna + 2 Overlay Który bajt to który i dlaczego...
Po latach trochę dziwnie się czyta te opisy. Teraz już chyba lepiej władam angielskim ahahahahaha :D [syntax=vbscript]$regfile = "ATtiny13.dat" $crystal = 1200000 $hwstack = 4 $swstack = 2 $framesize = 24 '***************************************... '* WIRELESS THERMOMETER * '* WITH CIRCULAR BUFFER * '* TRANSMITTER PART Tiny13 * '* bartek.niveasoft(at)gmail.com...
Witajcie Podłączyłem wszystko. Znalazłem pewny kod w sieci do wyświetlania danych kompasu [syntax=basic4gl] $regfile = "m8def.dat" $crystal = 8000000 $hwstack = 64 $swstack = 64 $framesize = 150 $baud = 9600 'перем ... и констk...
Walczę pół dnia i niestety bez efektów - testowałem kilka programików z netu i nic cały czas wyrzuca mi na rs dane jak x:-1, y:-1, z:-1, Angle: 45.0, ale wygląda na to ze ten układ w ogóle się nie komunikuje z prockiem odpięcie linii komunikacyjnch z prockiem nie wpływa na zmianę doczytu czy jego zatrzyma nie, Może ktoś zerknie w kod poniżej choć jak...
Nie to sprawdzałem. Wygląda to jakby procedury odczytu DS-a działały bo ta temperatura wyświetlana -0.1 o tym świadczy. DS jest zasilany z 3,3V i wyczytałem że przy takim zasilaniu rezystor podciągający linie DQ ma mieć około 2k i taki mam. Ale z rezystorem 4,7k też nie działało. Gdzie to wyczytałeś? Datasheet nic na ten temat nie mówi, poza "Can be...
A spróbuj wybrać jako monitor podstawowy - TV, mi pomogło. Jezeli nie to wybierz single display i TV, ale wówczas bedzie tylko TV, ale overlay powinien działać bez problemu i napisy bedą. Własnie na sterownikach 66.93 miałem takie problemy, a o tych najnowszych 70 to radze zapomniec.
- powyżej 10W: "Pwej= Tak będzie się wyświetlało jeżeli pierwszym bajtem zmiennej String Pwej będzie 0. Zero jest końcem łańcucha (dwie możliwości takiego błędu już podałem stos, albo nadpisanie przez inny łańcuch ;)). Nie piszesz też jaka wersja Bascoma to jest, może w którejś wersji był błąd z funkcją Fusing. Możesz podglądnąć co się dzieje z Pwej...
zapodam kodem ktory znalazlem na forum!!!!! (nastpenym razem pierw uzyj opcji szukaj), tylko minimalnie przerobilem. Config 1wire = Portd.6 Dim Odczyt(2) As Byte , T As Integer At Odczyt(1) Overlay , T1 As Single , Napis As String * 5, Sprawdz As String * 5 Do Sprawdz = Napis 1wreset 1wwrite &HCC 1wwrite &H44 Waitms 750 1wreset...
...Nadal mam problem z minusem, zastosowalem funkcje Abs i nie ma juz tego "automatycznego minusa" ale wszystko dziala dopuki stosuje Ttt = Abs(ttt) tylko do wskazan z jednego czujnika. gdy zrobie to samo dla drugiego mimo, ze stosuje dwie nazwy (Ttt1 i Ttt2) to ta funkcja przestaje dzialac i mimo ujemnych temp minus sie nie wyswietla. Co jest nie...
Czy można przez konwersję BCD wyciągnąć znak (temperatura dodatnia/ ujemna) . Spróbuj dopasować sobie ten code. [syntax=basic4gl][/syntax ... $regfile = "m8def.dat" $crystal = 4000000 $baud = 9600 $hwstack = 32 $swstack = 16 $framesize = 40 Dim Scratchpad(9) As Byte Dim Temp As Integer At Scratchpad Overlay Dim Ds18b20_temp...
Witam ! Buduję właśnie kolejne urządzenie i skończyły mi się właśnie wolne piny w moim mikrokontrolerku. zabrakło ich do sterowania kontrolkami na panelu. Postanowiłem dobudować zewnętrzny expander i teraz moje pytanie. Czy można w Bascom-ie jakoś zaadresować konkretne bity w bajcie tak by można ich było oddzielnie w programie używać ? Do ekspandera...
... Czy tak to ma wyglądać i wszystko to zrobię dzięki obyciu z 3 magicznymi instrukcjami..? Pozdrawiam Ps. Według Ciebie OVERLAY jest łatwiejsze..? tego też jeszcze nie robiłem :cry: Przykładziki powinny wyjaśnić wszystko. Dim C As Single , D As Single Dim Cptr As Word , Dptr As Word Dim E As Byte , F As Byte C = 12.555555555 D = 0.0 Print "C=...
... Wykadnik to 16=2^4=2^(131-127)=2^(10000011B-127). Wiec wg mnie wykładnik powinien byc 10000011B. I masz całkowitą rację ;) Zagapiłem się , bo moja SINGLE jest równa 401 , czyli Twoja * 16 Zumek korzystasz z jakiegoś programu, który to przelicza :??: "Trenowałem" na czymś takim w symulatorku ;) Dim D As Single , Dd As Long At D Overlay Dim C As...
Witam. Panowie próbuję sklecić program do odczytu czujnika prądu INA219 na podstawie jakieś programu znalezionego. Mógłby ktoś rzucić okiem na moje wypociny bo jakoś nie udaje mi się nic odczytać z czujnika. [syntax=vbnet] $regfile = "m328pdef.dat" $crystal = 8000000 $hwstack = 64 $swstack = 64 $framesize = 64 Config Clockdiv = 1 '--------------------------------...
Przepraszam fakt nie napisałem w jakim języku :). Bascom kod: Dim zmienna1 as word zmienna1 = 23456 Sub zap_eeprom ........... Locate 2 , 1 : Lcd "Wartość: " ; zmienna1 Wait 2 end sub Sub od_eeprom ......... Locate 2 , 1 : Lcd "Wartość: " ; zmienna1 Wait 2 End Sub Jak zapisać zmienną zmienna1 do pamięci eeprom. Znalazłem coś takiego ale nie wiem jak...
Przepraszam, że tak późno, ale nie zawsze jest czas na fora :D Z tym prostym hexval dla single pewnie się zagalopwałem, ale wartość da się bez problemu odzyskać tnąc string po cztery literki i tak otrzymane wartości Word nałożyć na Single. Poniżej na symulacji widać, że działa elegancko ;) Wysyłam wartść 0.68 by zerknąc jak zbudowany jest string. Potem...
Jest. Tworzysz sobie na całej pamięci RAM tablicę jako At &H0000 Overlay - dzięki temu masz dostęp do każdej komórki pamięci ram poprzez Tablica(adres). Tablica oczywiście jest tablicą bajtów. Potem masz tylko instrukcję warunkową, która rozróżnia typy danych (czyli byte, long, single, word, ...) i wie ile bajtów każdy z nich zajmuje i w tej instrukcji...
Witam Zaczynam zabawę z z atmegą 16 i czujnikiem DS18B20 i mam jak każdy na tym forum mały kłopot............ hm co jest nie tak ? . Prosił bym o podpowiedz Spróbuj ten, troche zmieniony code: [code][syntax=basic4gl] $regfile = "m16adef.dat" $crystal = 1000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Rs = Portc.7 , E = Portc.6 , Db4 = Portc.5 , Db5...
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....
Po kilku dniach pracy urządzania stwierdziłem że jednak przydało by się żeby serwerek dodatkowo wysyłał dane do "https://thingspeak.com/" chociaż z termometru domowego. Próbowałem na rożne sposoby ale nie mam pojęcia jak to zrobić. Może ktoś z Was jest w stanie zmodyfikować kod ? Może kolega (at)bart-projects czyta ten temat? ;) (to ten sam kod co w...
No sprubuje to sprawdzić,do biosu wejde ale gdzie szukać tego dokladnie wiesz może? Dodano po 34 Mam takie funcje w biosie:main-wchodze w to i pisze tam tak system memory 640kb,extented memory 457728 kb,cpu type intel,cpu sped i nic tam niemoge ustawić w tej funcji main,potem mam funcje advanced itam mam tak ustawione-boot time diagnosic screen-disabled,silent...
Zdravim muzu mit prosbu....jsem tak trochu amater a nejde mi zkompilovat jeden zdrojacek v BascomAVR a hlasi mi to chybu na "Enable Timer1" jako "Unknown interrupt source $regfile = "m8def.dat" $crystal = 16000000 '----------------------KONFIGURACJA-----... Const Falloff = 1 Const Lcd_offset = 1 Const Czulosc = 20 '----------------------STAŁE------------...
Kolego Electix :D Ja (dla odmiany) przyczepie się do Twojego kodu: Temperaturę obliczasz jak poniżej ... Rd(1) = 1wread(2) Rdp = Rd(2) Shift Rdp , Left , 8 Rdp = Rdp + Rd(1) T = Rdp / 16 ... i niepotrzebnie wyręczasz kompilator.A na samą myśl o SINGLE, dostaję drgawek ;) Podaję 2 najprostsze sposoby , na obliczenie całkowitej...
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...
1) Mam problem z DesignSpark, przy próbie wygenerowania pliku GERBER otrzymuje takie ostrzeżenie: http://obrazki.elektroda.pl/3120166800_1... 2) Co więcej nie zbyt wiem co mam wybrać przy tworzeniu nowego projektu PCB (rysuje PCB od zera nie ze schematu)- chciałbym utworzyć plik GERBER PCB jednostronnego, z warstwą opisową i soldermaską. Wybrać...
Ech prawdy ? a po co mam kłamać ? OK mam komplet nawet tu na elektrodzie jest są tam pliki hex bin i bas, bas nawet był z błędem ale poprawiony i jak wgrywam gotowe wsady do działa jak próbuje skompilować załaczony w plikach bas bez zmian to są cyrki czy juz jasne ? A program testowy mostka napisałem i to działa. Błędy sam zobaczysz podpowiem że brakuje(...
Kiedyś były zamieszczane kody źródłowe ale już nie ma ale znalazłem na naszym portalu kod .bas ale ma błędy czy ktoś mógłby pomoc ? na razie nie wiem co jest problemem. [syntax=vbnet] $regfile = "m8def.dat" $crystal = 8000000 '8MHz fuse bity CKSEL3...0!!! Config Portb = &B00110110 Config Portd = &B00001001 'Config Portc = &B00000000 Portd.6...
Proszę. Pisałeś kiedyś, że przy okazji chciałbyś się czegoś nauczyć, więc masz tu przykład który napisałem przy kawie. Trzy różne czujniki- DS18B20, LM35 i Termistor NTC 10k - podłączone jednocześnie do jednego mikrokontrolera. Dla czujników NTC wyznacza się ich "Betę" czego nie robiłem dlatego wskazywana przez niego temperatura różni się nieco od tych...
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)...
Mateusz a powiedz mi czy w Twoim programie robi różnicę to czy zastosuję LS020 czy L2F50?? Te wyświetlacze maja najprawdopodobniej inne procedury sterujące i inne biblioteki są do nich potrzebne. Mój program jest do LS020. I jak mogę edytować to co jest umieszczone w pamięci EEPROM czyli mniemam że obrazki i czcionki?? W EEPROM jest: $eeprom Data &H00...
Pierwsza część programu Dodano po 8 no i druga się nie mieści, więc wrzuciłem do pliku tekstowego.
To na razie wersja robocza więc sporo niedociąnięć, muszę jednak zacząć rezygnować z bascoma. Niby już wszystko było OK, ale gdy tylko w pętli głównej przed wyświetlaniem chciałem zamaskować wynik poleceniem fusing, znów jakieś głupoty zaczęły się dziać. Nie mam już nerwów. $crystal = 8000000 $regfile "m16def.dat" '*********************zmienne***********...
Wykonałem płytkę ze schematu http://obrazki.elektroda.pl/9844611100_1... Na razie nic sie nie skopciło. Zależało by mi na tym żeby wykorzystać do sterowania hipem ten projekt AVT5190 [url=http://serwis.avt.pl/manuals/AVT519... Kod jest poniżej: [syntax=text]$regfile = "m8def.dat" $crystal = 8000000 '8MHz fuse bity CKSEL3...0!!!...
Witam zbudowałem w sumie 2 regulatory i bardzo się grzeją już przy silniku 12v i poborze prądu 3A potrzebny jest spory radiator oraz wentylator by obniżyć temperaturę do 50*. Co jest nie tak ? Zamieszczam schemat oraz kod Bascom Nie jestem autorem regulatora . http://obrazki.elektroda.pl/6194843000_1...
Chciałbym jeszcze przenieść znaki specjalne do eeprom. Próbowałem takiego kodu; [syntax=basic4gl] Dim X As Byte _temp1 = &H40 Gosub _lcd_control For X = X To 32 Readeeprom _temp1 , X Gosub _write_lcd Next ... $eeprom Data 14 , 10 , 14 , 32 , 32 , 32 , 32 , 32 Data 17 , 19 , 17 , 17 , 17 , 16 , 28 , 32 Data 23 , 17 , 23 , 20 , 23 , 16 , 28 , 32 Data...
W symulatorze możesz sprawdzić czy program nie nadpisuje stosu. Komunikat pokazuje się w dolnej części okna symulatora "Frame or software stack overlap", można też sprawdzić w zakładce "uP". Jeżeli nadpisało stos ustawiasz wartości dla stosów na początku programu np.: [syntax=basic4gl]$hwstack = 32 $swstack = 16 $framesize = 32 [/syntax]
Ponizej cały kod żródłowy:) Proszę umieszczać kod w znacznikach syntax . Opcja Listing kodu .
Udało mi się coś zrobić i nawet działa, ale: -jak uruchamiam układ powinno pisać w dolnej linii Ustaw godzine , a jest jak na fotce niżej, -ustawianie godziny - jak trzymam przycisk w pilocie cały czas wysyła sygnał, a układ odbiera kod raz na 3 sek - wcześniej było 250ms (tak jak jest zdefiniowane w programie). http://obrazki.elektroda.net/19_12181272...
Witam :) Mam problemy z programem analizatora widma z obsługą RC5. Na lcd wyświetla głupoty albo resetuje się Atmega32.Czy w programie wszystko OK jest? Oczywiście sam program analizatora widma akustycznego działa poprawnie. $regfile = "m32def.dat" $crystal = 16000000 Config Pinb.2 = Input Config Int2 = Falling Enable Interrupts 'obsługi RC5...
Chodzi o te zaznaczone ustawienia z obrazka. Są wstawiane jako domyślne jeśli się ich nie wpisze do kodu. Chodzi o to, że kiedy Bascom skacze do jakiegoś Sub to odkłada na stos te wcześniej omawiane dwa Bajty. W takim Sub już może tego nie widać, ale tez skacze np. do procedury odczytu czujników 1Wire. To już np. cztery bajty a w tym momencie nadchodzi...
Dzień dobry, Nie mogę dojść dlaczego emulator DS2050 działa na wewnętrznym oscylatorze 8Mhz a na kwarcu 8MHz zawiesza się i resetuje gdy tylko chcę odczytać z niego wartości. Kondensatory przy kwarcu 22pF. Fusebity: gdy clock 111101:Ext (czyli kwarc) to nie działa poprawnie. Próbowałem wszystkich ustawień kwarcu. Dlaczego tak się dzieje ? [syntax=Bascom]...
emulator ruszył błędnie obliczyłem sume crc8 crc = crc8(mytemp(1),8) a miałem mytemp 8 na 8 master nie odbierał danych bo suma kontrolna sie nie zgadzała wrzucam kod prosze paniętać że autorem jest Vladimir I. Yershov Program jest jeszcze do poprawek to tylko prowizorka jest 1:08 w nocy i chciałem sie podzielić radoscią $regfile = "M8DEF.DAT" $crystal...
Wyniki testu: (trwał około 2 godzin) CPU Manufacturer Intel Family Intel(R) Core(TM)2 CPU T5500 (at) 1.66GHz Architecture 64-bit Internal Clock 1.7 GHz Internal Clock Maximum 1.7 GHz External Clock 166.0 MHz Socket Designation U10 Type Upgrade MultiCore 2 Processor Cores HyperThreadingTechnology N/A Capabilities MMX, CMov, RDTSC, SSE, SSE2, SSE3, PAE,...
[syntax=c]mam jeszcze pytanie czy ten kod może źle pracować z atmega 8a-pu [syntax=c]|Program "analizator widma akustycznego 20*2 - V2" kompilator bascom 1.11.9.0 | '|Autor: HUNTERHOUSE(Adam Kędzierski) i częciowo MANEKINEN(Paweł Kisielewski) | '| data: 02.08.2009 | '| | '| info: http://www.elektroda.pl/rtvforum/topic77... | '| www: http://diy.elektroda.eu/analizator-widma...
Potrzebuje emulator DS18B20 na atmega8 - mam na PC program do odczytu temp i chciałem w tym programie dodac inne parametry ( np wilgotnosc ) ale nie zmieniajac programu - w scrachpadzie bede wisyłał inne dane nie temperature. ( w bajtach temperatury lub bajtach uzytkownika wolnych 2szt) Aktualnie używam "lampomitari" , ale napisalem przeróbke programu...
Witam. Mam duże problemy z uruchomieniem i2c (programowo) na procesorze at1280. Otóż po wgraniu takiego programu: $regfile = "m1280def.dat" $crystal = 11059200 $lib "glcd.lib" Config Sda = Portd.1 Config Scl = Portd.0 $hwstack = 32 ' default use 32 for the hardware stack $swstack = 10 'default use 10 for the SW stack $framesize =...
Dziękuję wszystkim. Kolego "nivasoft" masz racje podłączyłem niewłaściwie wyprowadzenia SDA SCL(już poprawiłem błąd). Odnośnie konfiguracji wyświetlacza - mam właściwą konfigurację która pozwala obserwować pola "x:" ,"y:", "z:" w pierwszym wierszu LCD. Jest jednak problem bo jeszcze nic konkretnego nie odczytałem na moim LCD. kilka razy modyfikowałem...
bottom overlay overlay single overlay failed
słoneczny kolektor próżniowy wkrętarka zasilanie tablet obracanie ekranu
Wymiana tylnej klapy Ford Focus MK2: krok po kroku Jak zsynchronizować pilota Peugeot 308 po wymianie baterii?
