Otrzymasz znaki "2" "5" oraz znak Enter. http://www.elektroda.pl/rtvforum/viewtop... A. To Ty, dopiero zauważyłem ;p
"znów zamieni się na znak ASCII" Sam się nie zamieni.
Nie wiem jaki jest twój kod w bascomie ale timer i uart to są sprzętowe zasoby specjalnie wydzielone do swoich celów więc nie powinny się zakłócać. Pytanie co masz w przerwaniu timera?
32.768kHz to chyba 32768Hz, więc chyba tyle należy wpisać, nie? Skąd te 32768700 się u Was bierze? A te 3.2768 mHz to co to ma być? Ten kwarc może i służy do zrobienia RTC, ale nie radzę ustawiać go jako główne źródło taktowania, bo zablokujesz sobie możliwość programowania przez SPI jak masz jakiś dziwny programator (nie pozwalający na zmniejszenie...
Kolego, Skoro używasz UARTa to nie możesz za pomocą jego końcówek sterować LCD. Kiedy używasz UART to te końcówki są automatycznie dla niego konfigurowane i nie będą Ci sterować LCD. Mówie o pinach PD.0 i PD.1
Witam. Czy po wykonaniu instrukcji: print zmienna_typu_string$ nie znając zawartości zmiennej (nie wiedząc co zostało wysłane na UART za pomocą instrukcji print) istnieje możliwość powtórzenia wysyłki ostatnio wysłanego stringu? Czy może jednak, to co zostało wysłane jest usuwane z pamięci / buforów zaraz po wysłaniu? Zastosowanie: master nie usłyszał...
Po "a" dodaj średnik. Print "a" ;
A na pewno Config baud? A nie jako Zmienna $baud? (aczkolwiek nie miałem styczności z BASCOMem), tak tylko google przejrzałem
Widzisz, nie było tak trudno. Byś się za każdym razem przyłożył do opisania problemu to byłoby szybciej. Wszystko działa. Po pierwsze ten wyświetlacz nie jest przeźroczysty kiedy programuje się mikrokontroler w układzie. Podłaczyłeś DataPort do PORTU B i podczas programowania programują się śmieci. Wystarczy odłączyć wyświetlacz na czas programowania...
Ja już za mało pamiętam Bascoma żeby tu podpowiedzieć. Ale na pewno można na własny sposób oprogramować przerwania - tyle że to będzie niejako wyważanie głową drzwi bo z jednej strony Bascom ma fajnie napisaną sprzętową obsługę RS232 tylko trzeba umiec ją wykorzystać. Ale kurczę zaglądam teraz do HELP'a bascoma a tam jak byk masz napisane: Remarks pin...
Witam, pracuję nad komunikacją pomiędzy uC a Pc za pośrednictwem Bluetooth. Jestem pewien, że komunikacja odbywa się poprawnie (prędkości, porty) natomiast mam kłopot ze zrozumieniem tego co się dzieje na obiekcie. Otóż, w zależności od tego czy w pętli programu wywołam funkcję PRINT zależy, czy moja komunikacja działa czy nie. Jeśli w programie ukryję...
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 '------------------------------------...
Musisz dodać warunki, np. tak: [syntax=basic4gl] If Zmienna < 6 Then Zmienna = Zmienna + 1 Print Zmienna....... If Zmienna > 0 Then Zmienna = Zmienna - 1 Print Zmienna...... [/syntax]
Czytałem wprawdzie jakiegoś i tak fajnego PDF'ka autorstwa kolegi Zbigniewa Gibka , i jest tam trochę na te tematy. Jednak tam opisane jest tworzenie własnych procedur które hmmm trzeba deklarować jeszcze samemu w programie głównym. To troszkę ciężko tak działać. A czy zastanawiałeś się w jaki sposób przekazać kompilatorowi czy ma na stos wrzucić jakieś...
To zamiast: [syntax=basic4gl]Print &H7E; [/syntax] wyślij: [syntax=basic4gl]Print "{126}"; [/syntax]
Zmień może na początek swoją litanię w ten sposób... Zamiast litanii, wystarczy tylko "amen" :-P [syntax=basic4gl]Print Bin(PORTB) [/syntax]
Lepiej [syntax=vbnet]Print "dobra ramka " ""[/syntax] umieść poza przerwaniem.
Hej. Przytoczę kod, ktory nie działa: print "jakis tekst nr 1" wait 2 print "jakis tekst nr 2" czemu procesor nie wysyła tekstu nr 2 po funkcji wait 2? Gdy zmniejsze czas do wait 1, wszystko działa zgodnie z założeniem. Potrafi ktoś to wytłumaczyć ew. rozwiązać problem?
...Albo wyrzuciś print albo przerwanie od serial... Albo ... troszkę pokombinować :D Wystarczy że się wie jak działa proc i Bascom ;) W zasadzie wszystko opisał szymtro , więc skupię się na programiku $large $crystal = 11059200 '$regfile = "420.dat" 'DS89c420 $baud = 19200 On Serial Seriall ' odebrany znak Dim Uli As Byte ' odebrano znak...
By funkcja PRINT nie wysyłała samoczynnie znaków CR i LF , użyj średnika. Print "Ala"; Print "ma"; Print "kota" Piotrek
Dodaj średnik po print chr(a).Zobacz ,czy to coś da.
Kup sobie kalbelek do Eryka T10s. Pobaw sie terminalem i telefonem za pomoca AT komend. Jak juz zaskoczysz jak to dziala to potem pod Bascomem komenda print "AT....." i masz wszystko. Wada T10s jest fakt ze nie przyjmuje SMS w formacie TEXT, konieczne jest przekonertowanie do PDU. Jesli bedziesz czegos potrzebowac pisz na priv.
Powinno być: [syntax=basic4gl]Print #2 , Godziny ; ":" ; Minuty ; " PIEC-" ; Ts ; " BOJLER-" ; Tb[/syntax]
Możesz zrobić co chcesz byleby polecenie Config 1wire było już po konfiguracjach portu. Co do UARTu to też nie ma znaczenia, bo jeśli Bascom wykryje użycie w kodzie Config Serialin/Serialout lub nawet samo użycie Print to kompiler ustawi je sam automatycznie.
Witam Bardzo proszę o pomoc, jak napisać krótki programik w Bascom. Aby dostać się do konfiguracji USR-WIFI232-T należy wysłać po RS232 "+" 20ms "+" 20ms "+" 1000ms "a" w DELPHI tak to wysyłam i to działa. Proszę zedytować post i użyć przycisku SYNTAX. Przykładowo zrobiłem to dla Delphi.
Witam. Podłączyłem atmega 8 przez max232 do komputera. Chciałem odczytywać i wysyłać komendy do atmega. Do komputera tekst wysyłam przez BASCOM Print "1" I w komputerze nie widze 1 tylko bardzo dużo krzaczków. wszystko mam dobrze skonfigurowane. A jak spróbowałem odczytać dane wysłane z komputera to tak jakby ich nie dostał. POMOCY!
Witam chyba najlepiej zastosowac RS-a do laczenia prockow bedzie super masz 3 przewody i bardzo prosta obsluge w bascom-ie print i juz :D Pozdrawiam Irek
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]
...Dlatego zastanawiam się dlaczego aplikacja nie odbiera danej wysłanej z urządznia, i ewentualnie co się dzieje po drodze. Bascomowa Print , zamienia wartość binarną zmiennej , na ciąg znaków w kodzie ASCII , reprezentujących tę liczbę. Np. Bascom -> zmienna=1002 -> Print zmienna po RS-sie "leci" kolejno 49,48,48,50,10,13 Jeśli korzystasz z jakiegoś...
Print B,C,D zamień na Print B;C;D.
select-case akceptuje również grupy i zakresy. Fakt, można napisać: switch (wartosc & xxx) ale zasadniczo, case to jedna wartość. BASCOM: select-case, przykład: [syntax=vbnet] Select Case I Case 1 : Print "1" Case 2 : Print "2" Case 3 To 5 : Print "3-5" Case Is >= 10 : Print ">= 10" Case Else : Print "Not in Case statement" End Select [/syntax]
Proponuję po odebraniu przez RS232 entera ( #13#10 ) wysłać do wyświetlacza przejście do następnej lini. Bedzie to jak mi się wydaje najrozsądniejsze wyjście z sytuacji. Print - w bascomie zawsze po znakach wystawia znak enter (ascii: #13 #10).
A nie jest tak, że polecenie Print wysyła łańcuch? Czyli "203", $0D, $0A ;), gdzie $0A = 10.
Print screen :)
zrób tak: Print A ; chr(13) ; to ci zniknie ten kwadracik przed liczbą
ok printf jest kombajnem ale w bascomie print moze wydrukowac wszystko (byte,string itp) wiec troche to jest dziwne ,a tyle sie mowi o przewadze C nad Bascomem a rzeczywistos to juz sam nie wiem jak jest
Wystarczą dwie instrukcje MAKEINT i SHIFT : [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 1000000 $baud = 2400 Dim A As Byte , B As Byte , C As Word A = &b00110000 B = &B00100000 C = Makeint(b , A) ' z dwóch bajtów zrób słowo Shift C , Right , 5 ' zmienną C przesuń w prawo o 5 bitów Print Bin(a) Print Bin(b) Print Bin(c) End[/syntax]
Poniżej przykładowe instrukcje wyjęte z programu. Print "ATE0" ; Chr(13) Print "ATD604019159;" ; Chr(13) Print "ATH" ; Chr(13) Wysłanie SMS'a kończymy Print Chr(26); Język programowania to Bascom Telefon Siemens x35 Komunikacja po UART i to, czy będą działać komendy i tryb PDU zależy od telefonu. Wpisz w szukajkę "PDU" a zobaczysz, że jest z czego się...
Myślenie boli? PRINT &H7E PRINT &HFF PRINT komenda PRINT ilosc PRINT Dana .... PRINT suma A moim zdaniem będzie tak: PRINT &H7E ; PRINT &HFF ; PRINT komenda ; PRINT ilosc ; PRINT Dana ; .... PRINT suma ; PS. Czemu w "code" nie działa "b" ?
Do sortowania użyj instrukcji Sort : [syntax=basic4gl]Dim A(3) As Byte ' trzy elementowa tablica A(1)= 86 A(2)= 42 A(3)= 230 Sort A(1) , 3 ' sortuj trzy elementy w tablicy zaczynając od A(1) Print A(2) ' wyświetl drugą wartość[/syntax]
Może Ci się przydać: Dim Znak As Byte Dim On_off As Bit ... If Znak = "f" Then On_off =1 End If If On_off = 1 Then Print "fffffffff" End If
W jakiejś zmiennej odczytujesz 5 bitów Np: A As bite Do A=PINB AND 31 Print A IF A=coś Then coś dalsze decyzje loop Pozdrawiam
Wszstko dlatego, iż zmienne typu Single są nieco odmiennie zapamiętywane w pamięci i mają wyjątki (np. NaN, QNaN, SNaN) które nie są liczbami, i każda operacja arytmetyczna z nimi powinna wywołać błąd operacji i jego zgłoszenie - a tego Bascom niestety nie obsługuje (jak i spora ilość innych kompilatorów). Operacja z jawną zamianą znaku jest bezpieczniejsza...
Printbin Rama(1) wyśle całą tablicę chyba, że chcesz Hexstring to wtedy For N = 1 to 8 Print Hex(rama(n)).
Teraz działa: [syntax=basic4gl]$regfile = "m128def.dat" ' specify the used micro $crystal = 16000000 ' used crystal frequency $hwstack = 32 $swstack = 32 $framesize = 32 $sim Dim Z_rs_str As String * 64 Dim Kolor_temp As Byte Dim Kolor_hex As String * 2 Dim Kolor_wynik As Single Z_rs_str = "10FFFFFF" 'pobieramy z hex kolor dla RED Kolor_hex = Mid(z_rs_str...
jeszcze raz z uporem maniaka - ale już ostatni raz przypomnę - czy ty nie widzisz że już 2 razy pokazywałem ci przykład w którym na końcu polecenia PRINT vył średnik ???????????????? powinno być tak: Print S1 ; Chr(13) ; a nie tak Print S1 ; Chr(13) .... bez tego średnika to już w ogóle wszystko się rozwala. Średnik na końcu powoduje,...
Mógłbyś jakoś opisać jak to działa? tak troszke dokładniej. Wiem jak wygląda ramka w modbusie, ale nie wiem jak ją wysłać. Można to zrobić np. przez polecenie Print?
Może tak zobacz: $regfile = "m8def.dat" $crystal = 8000000 $BAUD = 9600 dim test1 as String dim test2 as String test1 = "1987" Do Input test2 Print "Wprowadzone haslo:" ; test2 If test1 = test2 then Print "Haslo poprawne" Loop End
A od czego jest HELP !? "Przeznaczenie: Zwraca określoną liczbę znaków z tekstu począwszy od lewej strony. Składnia: zmienna = LEFT( tekst , il_znaków ) gdzie zmiennazmienna tekstowa, do której przepisane będą skopiowane znaki, teksttekst z którego skopiowane będą znaki, il_znakówilość kopiowanych znaków. Opis: Zobacz także: RIGHT , MID Przykład: Dim...
ok jest wygodna ale dlaczego zjada tyle pamieci w bascomie print dziala tak samo a zajmuje znacznie mniej , i wtym momencie nasuwa mi sie pytanie po co meczyc sie w C :) pozdrawiam
Można zrobić tak: $hwstack = 32 $swstack = 32 $framesize = 32 Dim Aa As Double Dim B As Double Aa = 5 Aa = Aa / 6 Print Aa B = Sin(0.2) Print B Do Loop End ...i będzie działać ! Pozdrawiam...
Witam Chciałem zbudowac układ który liczył by 0-9 i wyświetlane to było na siedmiosegmentowym wyświetlaczu... .......... prosze o pomoc i o jakies proste wytłumaczenie moich błędów. myslalem jeszcze o robieniu tego za pomoca rozkazu INC i dodawania tylko nie wiem jak zawartośc rejestru wystawic na wyjscia z gory dziekuje za pomoc pozdrawiam Tu masz...
...Gdy z terminala wysyłam 2 to procek zwraca mi 50 gdy 1 to 49 gdy 3 to 51 itd Pewnie gdyby a była single to by było O.K. "Kłaniają się" typy zmiennych. Kiedy do terminala wpiszesz 2 , to po łączu szeregowym do uC , jest wysyłany kod ASCII cyfry 2 , czyli dziesiętnie 50.Instrukcja print , "przetwarza" owe 50 na ciąg znaków ASCII reprezentujących liczbę...
Pulsein zmiennaH , PIND , 1 , 1 'detekcja od "1" Pulsein zmiennaL , PIND , 1 , 0 'detekcja od "0" Wynik = zmiennaH + zmiennaL Print Wynik 'Odczytanie ilości czasu jaki trwał miedzy H+L
Pin Tx-owy atmegi i masa do złacza DB9, dalej chińska przejściówka RS232-USB i komputer. Piny TX i RX Atmegi to nie jest standard RS232, tylko UART. Nie możesz tego podłączyć do przejściówki RS232-USB tylko do przejściówki UART-USB. Dziękuję, to wszystko w temacie ;-)
Dokładnie nie wiem, ale wydaje mi się że RS485 to tosamo co RS232 tylko ma inne poziomy napięć (jeżeli się mylę to niech ktoś mnie poprawi). Jeżeli tak jest, to do wysyłania danych zastosuj instrukcję (w Bascomie) Print, a do odebrania danych instrukcję Input. Musisz jeszcze oczywiście zastosować konwerter napięć UART na RS485 za pomocą np układu Max485.
nie podałeś w czym to chcesz więc podam w bascomie np" print "ATL0"
Witam... Kontrast wazna rzecz, musisz ustawic tak zeby po wlaczeniu zasilania pola byly delikatnie widoczne(bardzo delikatnie). Jesli to nie pomoze to w kodzie samego programu zaraz po Config LCD 16*2 umiesc komende CLS- ona nie tylko czysci wyswietlacz ale dokonuje jego inicjalizacji bez ktorej nie ruszy Pozdrawiam, Przemo
W Bascomie komendy Print i Input - poczytaj o nich na początek.
Może coś takiego : Dim Str1 As String * 10 Dim Koniec As Byte Dim Key As Byte Str1 = "" Koniec = 0 Do Key = Waitkey() 'pobieranie znaku, tu z terminala Select Case Key Case 13 : Koniec = 1 ' np. kod ENTER = 13 Case Else : Str1 = Str1 + Chr(key) ' inne znaki dodaje do str1 End Select If Len(str1) = 10 Then Koniec...
Czyli łączę bezpośrednio pin TXD mikroprocesora nr.1 z wejściem nadajnika TX433, oraz RXD mikroprocesora nr.2 z wyjściem odbiornika RX433. W bascom używać poleceń print oraz input ?
To już załatwia bascom - jest ustawione na Auto. co do sedna, sprawdziłem dziś na swoim układzie kanały 0-7 ADC następującym programem: [syntax=basic4gl] $regfile = "m2560def.dat" $crystal = 16000000 Config Adc = Single , Prescaler = Auto , Reference = Avcc Dim Wart_adc1 As Word Dim Wart_adc2 As Word Start Adc 'AVCC bezpośrednio do 5V, AREF w powietrzu,...
1) Jakimi parametrami zostanie zainicjowany sprzętowy uart? Cytat z helpa: For the first hardware UART, there is no need to use channels. PRINT " test" will always use the first hardware UART. Co do baudrate to racja.
W takim razie po Print daj Wait 1.
No właśnie jak zrobisz: Abyte = 65 PRINT Abyte to nie wyśle jednego bajtu, lecz bajty "6" i "5", czyli 0x36 i 0x35.
w VB6 korzystając z kontrolki MSComm odbieram dane wysyłane z uP przez RS232, a następnie umieszczam je w labelu mniej więcej tak: dim dana as string dana=MSComm1.input Label1=labeel + dana Z procka wysyłane są dane / program w bascom 8051 / print h;":";m;"_";d '/godzina; : ; minuta ; _ ; dzień Wszystko jest O.K. do chwili gdy godzina jest mniejsza...
Przepisuję z książki: "Bascom-owe polecanie PRINT powoduje wysłanie poleceń CR+LF, o ile tylko na końcu linii nie ma średnika. Obecność średnika zawsze blokuje wysyłanie tych dodatkowych znaków i powoduje dopisanie następnego znaku za poprzednimi." Książka-P.Górecki.
To nie jest takie skomplikowane. Byś trochę poczytał co to jest i po co te HTTP/1.1 to by Ci się od razu rozjaśniło :D Też czytałem jak pisałem sobie ten serwer na M2560. Wygląda na to że trzeba trochę zmienić szyk/kolejność Te Arduinowe i inne kody cechują się tym że predzej gdzieś sie definiuje co, na przykład, znaczy "domoticz_server" Ktoś to sobie...
_chip przechowuje liczbe typu longer opisujaca rodzaj procka... Mozesz zrobic tak ze napiszesz programik dla np mega8 (#include="m8def.dat" )skompilujesz i w symulatorze wykonasz print _chip i juz masz numer procka pod jakim jest mega8, analogicznie rob z innymi
Witam. Poszukuje sprawdzonego i działającego konwertera jak i oprogramowania do połączenia atmegi z kompem przez usb. Szukałem, szukałem i nie znalazłem, w każdym są jakieś wątpliwości i coś nie działa. Najlepiej taki w którym w bascomie wpisuje print i wyskakuje mi na kompie, tak samo na odwrót.
Spróbuj przykładu podanego w [url=http://www.elektroda.pl/rtvforum/to... wątku. Nadawanie przez PRINT. Odbiór w przerwaniu URXC i flagą ustawianą i testowaną w pętli głównej programu.
Czy taki zapis jest ok? Print "AT+COPS=2" ; Chr(13) Waitms 10 Print "AT+CLTS=1"; Chr(13) Waitms 10 Print "AT+COPS=0" ; Chr(13) Wait 30
LED5W sprawdziłem twój pomysł, pozmieniałem tylko porty i otrzymuje różne liczby, bez zasady. Czyli wg. Ciebie napisałem generator liczb losowych? :P Zawsze jest jakaś zasada. ;) Kod jest poprawny. Jak się zachowuje układ? Czy przycisk=0, gdy żaden przycisk nie jest naciśnięty? Czy sprawdzasz zmienną tak jak poprzednio (print)? Zmienna może być odczytana...
trzeba pozbyć się LF przy nadawaniu - i już - a w Bascomie to bardzo proste PRINT "jakieś dane" ; Char(13) ; istotny jest ten średnik na końcu
Pomyślałem, że kolega może wspomóc się terminalem. Zwykła przejściówka usb - com na prolific'u lub ftdi podłączona do uart atmegi. W kluczowych fragmentach programu wystarczy dopisać print zmienna i już mamy informację co się dzieje ze zmiennymi. Podgląd na dowolnym terminalu. Ta metoda nie raz mi pomogła. Pozdrawiam.
tak, interface wyjściowy to UART TTL ale to w niczym nie przeszkadza i można go podłączyć bezpośrednio do portów uC. Aby Komputer skomunikował się z uC należy: po stronie kompa: -podłączyć moduł radiowy USB(po podłączeniu modułu powinien zamigotać diodkami) -skorzystać z terminala i otworzyć port COM z numerem dla jakiego zainstalował się moduł -prędkość...
Zamiast 'Print' użyj 'Printbin'
hmm, po pierwsze dobrze by było gdybyś trochę się poduczył bascoma, bo obsługa kart sd to wyższa szkoła jazdy, możesz po prostu zastąpić polecenia Print #1 na Lcd i resztę pozostawić bez zmian (Print i Lcd są kompatybilne składniowo) ale wtedy musisz dodać waity, pozycjonowanie za każdym razem, żeby wogóle cokolwiek zobaczyć z tego mojego programu....
(at)xury to polecenie Open "COM1:" For Binary As #1 konfiguruje sprzętowy UART jako kanał. Takie polecenie jest konieczne jeśli używamy programowych UARTów lub obsługi np. kart SD poprzez bibliotekę AVR-Dos, gdyż wtedy powinniśmy też przypisać kanał uartowi sprzętowemu, aby funkcje Print i Input były jednoznacznie identyfikowane z kanałem...
No to spróbuj tego: $regfile = "m16def.dat" $crystal = 4000000 $hwstack = 32 $swstack = 32 $framesize = 32 config 1wire= portb.7 Do 1wreset if err=0 then print "PP_ok" ' czy LCD "PP_OK" - co tam masz else print "PP_err" ' j/w endif waitms 500 Loop Napisz o wyniku doświadczenia :D Piotrek
do ds18b20 waitms 500 Print t1 wait 5 loop :)
Bo Const to stała a Ty potrzebujesz czegoś jak DB albo PROGMEM. Czyli danych umieszczonych w pamięci. A stała niekoniecznie będzie tam umieszczona. Stała może być np. wbudowana w rozkaz assemblera (akurat nie tutaj ale inaczej to może być). Zrób raczej tak: Dim Atmega As String Dim Attiny As String Atmega = "Atmega" Attiny = "Attiny"...
proszę bardzo. 3 minuty razem z sprawdzeniem. $regfile = "m162def.dat" $crystal = 7372800 Dim A$ As String * 20 Dim Temp$ As String * 4 Dim Zmianna_1 As Byte Dim Zmianna_2 as byte Dim Zmianna_3 As Byte Dim Zmianna_4 As Byte A$ = "123.234.213.132" Temp$ = Left(a$ , 3 ) Zmianna_1 = Val(temp$) Temp$ = Mid(a$ , 5...
Czyli zapis wyglada tak (?): Dim A as Byte Dim B as Word B=0 Do while B<65535 For A=0 to 3 I2cstart I2cwbyte 160 I2cwbyte (A+B) I2cwbyte wartosc I2cstop Next A B=B+4 wend if B=65535 then Print "Malo pamieci!" loop
- 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...
Kombinuje tak: bajt = 10000000 zmienna = bajt.1 zmienna = 1 ... i tak osiem razy rozkładając bajt na bity i później tylko je poskładać w odwrotnej kolejności. Oczywiście prosto nie jest. O tablicach myślałem ale musiałbym je ręcznie rozpisać na kartce 256 i zrobić obok lustrzane odbicie i przeliczać :D Można tak: [syntax=basic4gl]$regfile = "m8adef.dat"...
Procesor Atmega8 oscylator wewnętrzny 1MHz w Bascomie stosując instrukcję: print "dowolny znak ASCII" w terminalu na PC otrzymuję znaki przesunięte decymalnie o 64 np: print "01245" otrzymuję "pqrstu". Co może być tego przyczyną? Serdecznie pozdrawiam
Witam! Koledzy mam takie pytanie. Jak najlepiej wysyłać przykładową ramkę 5AA50480030003 w bascom-ie.Obecnie robię to tak: Print Chr(&H5A); Print Chr(&HA5); Print Chr(&H04); Print Chr(&H80); Print Chr(&H03); Print Chr(&H00); Print Chr(&H03); Ramka jest wysyłana prawidłowo, urządzenie je odbiera. Czy jest jakiś sposób, aby to zoptymalizować, ponieważ...
czy nie potrzebna jest tutaj instrukcja INKEY() ? swojego czasu zrobiłem taki układ , że dwa procki atmega8535 przesyłały między sobą zmienną. program zajął dosłownie 3,4 linijki w odbiorczym użyłem instrukcji inkey() tzn , jeżeli było coś w buforze(różne od 0 ) to wyświetlało daną. oczywiście czasy w realizacji pętli były takie same oraz kwarce również...
A w nowym helpie w Bascomie 2.0.1 . Tu Masz przykład z sampli Bascoma: '---------------------------------------... 'name : .bas 'copyright : (c) 1995-2005, MCS Electronics 'purpose : demonstrates 'micro : Mega48 'suited for demo : yes 'commercial addon needed : no '---------------------------------------...
Niestety, inaczej nie sformatujesz single. Zapis zmiennej z przecinkiem jest dość skomplikowany (mantysa, wykładnik) i znalezienie przecinka nie jest prostą sprawą. Jakie działania potrzebujesz wykonać na single? Może nie trzeba jej używać. Wykonałem próbę w symulatorze najpierw single na string za pomocą fusing(), potem z powrotem na single za pomocą...
sorry nie rozumiem - o co ci chodzi Dokładnie to na każdej linii wysłania i odbioru najlepiej dać znacznik enter czyli dokładnie to ma wyglać tak print "100" CR tzn - tłumaczysz to sobie czy mi? jest to zdanie oznajmujące czy pytające? ;) może być CR ale równie dobrze może być CRLF problem w tym, że jak robisz w Bascomie polecenie PRINT - to ono zawsze...
M.S. ma rację. Funkcja MID() idealnie się nadaje. Przykład z Helpa: [syntax=basic4gl] z="12345" Mid(s, 2, 2) = z Print s 'A12DEFG [/syntax]
Musisz pomiędzy : Print "ATE0" ; Chr(13) Print "ATD666666666;" ; Chr(13) dać też opóźnienie - np 2 sekundy. Ponadto - nie znam dobrze Bascoma, ale chyba zamiast : Print "ATD666666666;" ; Chr(13) ma być Print "ATD666666666" ; Chr(13)
Witam, jak wiadomo (przynajmniej mi narazie) z helpa Bascoma - zwykłe polecenie PRINT generuje na końcu dwa dodatkowe znaki CR i LF Niekoniecznie :D Za pomocą polecenia PRINT , można wysłać stringa zakończonego ... praktycznie dowolnym znakiem - również sterującym. Print "Zmienna" ; Chr(13) ; ' średnik zakazuje wysyłania znaków sterujących. ... druga...
Z tym że szukałem długo i nigdzie nie znalazłem sposobu jak włączyć uart z komendy. Wpisanie jakiejkolwiek komendy do obsługi uart ($baud, print itp) gdziekolwiek w kodzie powoduje brak możliwości użycia txd jako normalnego portu.
Zmienna Var musi być zdefiniowana jako łańcuch. [syntax=basic4gl]Dim Str_ver As String * 100 Str_ver = Version(3) Print Str_ver [/syntax]
Hi All, Joboo mam pytanie odnosnie fusebitow - jak maja byc ustawione fuse w bascom-avr zeby poprawnie zaprogramowac atmege?? Ustawialem roznie i jednego procka juz zalatwilem bo go programator nie widzi :(. Najlepiej bylo by gdybys zamiescil print screena dla bascom-avr ver.1.11.8.3 DEMO. Z gory dzieki, Pozdro,
Do RS232 wystarczą 3 przewody, a jeśli nie będziesz potwierdzał poprawności odbioru to tylko dwa. Zobacz w pomocy rozkazy PRINT# i INPUT#.
Tak prymitywnie to wyślij to sobie ze spacją i potem podziel otrzymany string szukajac spacji [syntax=vbnet] Print V1 ; " " ; A1 Dim MyArray(2) As String * 5 , M As Byte M = Split(CalyOdebranyString , MyArray(1) , " ") 'podziel szukając spacji Locate 1 , 1 : Lcd MyArray(1) Locate 2 , 1 : Lcd MyArray(2)[/syntax] Radzę też napisać u góry w kodzie : [syntax=vbnet]Config...
print bascom rs485 print bascom bascom instrukcja print
wymiana matrycy aparat medion internetowy oleju skrzyni biegów sharan
dobre sklepy elektroniczne online dobre sklepy elektroniczne
Opis pinów licznika Citroën C4 Picasso 2009 Suwak w okapie kuchennym: funkcje i zastosowanie