Witam. To znowu ja z kolejnym urządzeniem. Jest to 1-kanałowy inteligentny przełącznik ściemniacza Avatto DMS16-W1 z CBU rozmawiający z MCU Puya PY32F002A (TSSOP-20). https://obrazki.elektroda.pl/5535706100_... https://obrazki.elektroda.pl/3162350000_... https://obrazki.elektroda.pl/6555860800_... https://obrazki.elektroda.pl/4466273200_...
Bardzo dobrze, poszło łatwiej niż się spodziewałem. Pozwólcie, że połączę tę gałąź, a teraz przyjrzyjmy się drugiej kwestii. Mimo to jestem zaskoczony, że poniższy kod nie działa: [syntax=c] //value is in 0 100 range void HAL_PIN_PWM_Update(int index, float value) { int channel; if (IsPinIndexOk(index) == 0) return; channel = PIN_GetPWMIndexForPinIndex(index);...
[syntax=json]{ "schema_id": "000004x70e", "properties": [ { "id": 1, "mode": "rw", "name": "开关 (Switch)", "desc": "", "desc_en": "", "property": { "type": "bool" } }, { "id": 2, "mode": "rw", "name": "工作模式 (Work Mode)", "desc": "", "desc_en": "", "property": { "type": "enum", "range": ["auto", "manual"] } }, { "id": 10, "mode": "rw", "name": "防霜冻功能...
Brak podstawowych informacji. Jak zadeklarowana jest tablica? Jaką wartość $kolor, próbujesz do niej "wcisnąć"?
Weź dla kolumny "ww" dodaj "unsigned", który rozszerzy typ INT dając Ci większy zakres liczbowy do 4294967295, ponieważ teraz przyjmuje wartość maksymalną 2147483647 a 999999999 > 2147483647 stąd wyświetla przekroczenie wartości maksymalnej. Ogólnie spójrz na: http://dev.mysql.com/doc/refman/5.0/en/n...
Witam na podstawie dokumentacji: http://www.mege.ru/_docs/S71200_SM_1231_... ● If voltage, the nominal range full scale value will be decimal 27648. ● If temperature, the value will be reported in degrees multiplied by ten (for example, 25.3 degrees will be reported as decimal 253). Wynik z Twojego IW dzielisz przez...
Oto spojrzenie na wnętrze inteligentnej wtyczki Tuya BSD29 UK 20A z możliwością pomiaru energii. Odlutuję główną płytkę PCB, moduł, a następnie sflashuję go, aby uruchomić OpenBeken, odcinając go od wszystkich usług w chmurze Tuya. Dodam również czujnik temperatury DS18B20, aby można było zmierzyć temperaturę wewnątrz obudowy. Ten czarny BSD29 został...
Nie wklejaj zawartości funkcji tylko całą funkcję. [syntax=vb]Sub TEST() ' Dim oOLook As Object Dim oEMail As Object Dim rng As Range Set rng = Nothing On Error Resume Next Set rng = Sheets("Arkusz1").Range("C6:C200").Speci... On Error GoTo 0 With Application .EnableEvents = False .ScreenUpdating = False End With ' Set oOLook...
Teraz mam problem jak z wyniku pomiaru wyrzucić wartości po przecinku. trunc(), round() - Dodano po 2 Możesz również użyć: [syntax=c] // returns temperature in 1/128 degrees C or DEVICE_DISCONNECTED_RAW if the // device's scratch pad cannot be read successfully. // the numeric value of DEVICE_DISCONNECTED_RAW is defined in // DallasTemperature.h. It...
Kawałek instrukcji od HM604: The HM 604 has 4 coupling modes: AC, DC, LF, HF. The AC coupling mode is mainly used. DC trigger coupling is only recommended, when very low frequency signals are being investigated and triggering at a particular value is necessary, or when pulses, which significantly change in duty cycle during observation time, have to...
L221Tilt angle sensor - reference signal out of range L280Safety relay in controller always not connect L427Safety processor - Backward tilting commanded but mast position exceeded calibrated value
Sprawdź PKE, bo wydaje mi się, że źle wpisałeś numer parametru PNU. Wg. dokumentu BU0220 str.68: The parameter label (PKE) is always a 16 bit value. This is divided into the following areas: PNU: Bits 0 to 10 contain the number of the required parameter (PNU), or the number of the current parameter in the response telegram of the frequency inverter....
Przepuść przez Google translatora ;) chyba że znasz angielski ;) Main data ParameterValue VINVF38DRHF8BL099173 BrandPEUGEOT Vehicle characteristics ParameterValue Vehicle family508 AS/RP N°12793 CJ 1 0637 Warranty Start Date05/03/2012 Engine serial number10 DYZA 4002822 BERe2*2007/46*0080*04 P4A9691274299 TRIM LEVELHIGH MEDIUM PLUS PAINT TYPEMETALLIC...
Jeśli poczytamy w pomocy o komendzie Reset to nigdzie nie jest napisane, że nie pozwala pisać w pliku ;) W pomocy z kolei znajdujemy ciekawą linijkę: FileMode := 0 . Szukając więc dalej w pomocy dojdziemy do opisu: FileMode (variable) (System unit) ▀▀▀▀▀π...
No niestety ten układ dział inaczej od "tradycyjnego" układu. Triak dalej sterowany jest fazowo ale na C4 mamy przebieg piłokształtny. Jak można przeczytać z noty: The phase angle of the trigger pulse is derived by comparing the ramp voltage V2 at Pin 2 with the set value on the control input, Pin 3. The slope of the ramp is determined by C3 and its...
1. Jak nie korzystasz z przerwań to ustaw GIE=0; 2. przykładowe ustawienia działające #include <dspic30f2010.h> /****************************** * Configuration Bits ******************************/ //_FOSC(CSW_FSCM_OFF & FRC_PLL8); /* Fast RC with PLLx8 = 16MIP Clock Mon/Switch OFF */ _FOSC(CSW_FSCM_OFF & XT_PLL8); /* 8MHz Crystal with...
Coś takiego znalazłem. Co prawda na Atiny ale można przerobić. [syntax=c]// // Talking to ultrasonic sensor HC-SR04 with an ATtiny84, and // sending distance data using serial communications. // // electronut.in // #include <avr/io.h> #include <string.h> #include <util/delay.h> #include <avr/interrupt.h> #define F_CPU 8000000...
https://obrazki.elektroda.pl/5325188100_... Przedstawię tutaj ADS1115 czyli 4-kanałowy, 16-bitowy przetwornik ADC. ADS1115 dostępny jest do kupienia w naszym kraju za kilkanaście złotych, a zza granicy można go sprowadzić nawet o połowę taniej. ADS1115 korzysta z protokołu I2C, więc można na jedną magistralę podłączyć aż 4 osobne takie...
Aby wydrukować jeden szablon, możesz użyć prostego przepisania wartości (lub nawet formuł): [syntax=vbscript]Arkusz2.Range("A1:E6").... 'wyczyść stare dane na szablonie Arkusz2.Range("A1").Value = Arkusz1.Range("A1").Value Arkusz2.Range("A3").Value = Arkusz1.Range("G5").Value Arkusz2.Range("A5").Value = Arkusz1.Range("G3").Value * 1000 & "...
Bardzo rozwlekle to napisałeś, a sprawa sprowadza się chyba do prostej pętli. Do kopiowania wartości nie należy używać Copy-Paste, tylko zwykłe przypisanie. Przypuszczam, że chodzi o taki kod: [syntax=vbscript]Sub Makro1() Dim n As Long For n = 4 To 8 Range("C16:C19").Value = Range(Cells(16, n), Cells(19, n)).Value Application.Run "'koszt.xls'!Makro2"...
Witamy na forum. Widzę, że masz bardzo interesujące urządzenie, postaramy się pomóc w jego uruchomieniu. Widzę, że otrzymujesz już identyfikatory dpID, więc powinno to być tylko kwestią ustalenia, co one oznaczają. Zwykłe podejście jest tutaj: https://www.elektroda.com/rtvforum/topic... ale robimy to PRZED flashowaniem. Teraz, gdy już go sflashowałeś,...
https://obrazki.elektroda.pl/7533783400_... Witajcie Chciałbym zaprezentować i podzielić się uniwersalną platformą do obsługi zdalnie sterowanych modeli. Wiele lat nie publikowałem niczego na forum - nie znaczy to, że nic się nie działo, natomiast nie zawsze nadawało się to do pokazania ;) Wszystko zaczęło się od tego, że chciałem...
Może mi ktoś pomoże. Mam problem z moją motorolą gm 300. Podczas wgrywania radia do komputera po chwili pojawia mi się brunatna plansza z napisem "A Run Time Error Has Occurred Signed Value Out of Range Error Code - 2056 Contact Radius Product Services at (800) 356 - 1520 Be Prepared To Give Full Details Which Lead Up To This Error. (Menu Path, Function...
To czemu tych kodów nie ma w Twoim pliku przykładowym, jeśli do nich się odnosisz? Nie jest to może najprostsze rozwiązanie, ale nie będę Ci za bardzo mieszał w tym co działa. Możesz spróbować dodać zmienną ost do kodu w arkuszu "Pierwszy Tydzień" : [syntax=vbnet]Public ost As Long Private Sub Worksheet_Activate() If Range("H6") = "drukuj" Then Range("H7").Value...
https://obrazki.elektroda.pl/9894384200_... Witam! Chciałbym przedstawić wykonany prze zemnie VU metr. przeglądając różne konstrukcje na YT postanowiłem złożyć w większej wersji takowy audiowizualny gadżet. VU metr ma wysokość ok 376mm i średnice 150mm. Dyski (26szt) wykonane zostały na laserze z przeźroczystej pleksy 5mm. W celu uzyskania...
O coś takiego chodzi? [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Select Case Target.Value Case "a" Range("B3").Value = Range("B3").Value + 1 Case "b" Range("B4").Value = Range("B4").Value + 1 Case "c" Range("B5").Value = Range("B5").Value + 1 End Select End If End Sub[/syntax]
Jeśli to jest wszystko w jednym pliku, to można zamiast Makro1 zdefiniować funkcję Funkcja1 i tę funkcję wykorzystywać zamiast makra. Poprzednio zmyliło mnie użycie metody Run w taki sposób, jaki zwykle stosuje się do wywoływania makr z innych skoroszytów. Mogłoby to wyglądać np. tak: [syntax=vbscript]Function Funkcja1() Dim i As Long Worksheets("Tablica...
Modbus RTU. Proszę o pomoc w skonstruowaniu ramki. Muszę do sterownika silnika przesłać za pomocą protokołu Modbus RTU ramki, która ma za zadanie zmienić czas startu silnika (Acceleration time). Producent podał takie dane: -Register Address 0X00E6 -Number if Registers 1 -Register Value Range 1-255 -Function Code 0X06. Ramkę którą sam wydedukowałem napisałem...
Jeśli dobrze rozumiem tą Twoją kombinację to powinieneś zastosować kod: [syntax=vbscript]Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) Dim Kom As Range Dim Koma As Range Set Kom = Intersect(Target, Range("w1")) Set Koma = Intersect(Target, Range("y1")) If Not Kom Is Nothing Then Application.EnableEvents = False With Sheets("TABELE")...
https://obrazki.elektroda.pl/3724104100_... Dzisiaj kontynuujemy przygodę z płytką ESP32-2432S028R. W poprzedniej części uruchomiliśmy wyświetlacz oraz ekran dotykowy, więc dzisiaj z tego skorzystamy. Zobaczymy jakie mamy dostępne możliwości i kształty do rysowania a potem rozważymy jakie są sposoby na wydajne rysowanie tak, aby częstotliwość...
https://obrazki.elektroda.pl/2553827400_... Cześć, pod tą niecodzienną nazwą tematu prezentuję projekt małego, automatycznego odtwarzacza muzyki do umilania posiedzeń na toalecie. Oczywiście to jedno zastosowanie, w innych sytuacjach pewnie też może się przydać ;) Głównym założeniem była niewielka złożoność, banalny interfejs, bezobsługowość...
https://obrazki.elektroda.pl/4269875400_... Oryginalny DeepSeek jest raczej za duży, by uruchomić go na domowym sprzęcie, ale repozytorium Ollama oferuje ciekawą alternatywę bazującą na dostrajanych (tj. trenowanych w oparciu o rezultaty większego modelu) modelach LLama i Qwen. Występują one pod nazwami deepseek-r1:1.5b/7b/14b/32b...
Myślę, że sprawdzanie czy [syntax=vbscript]If Range("C1") = "" Then Range("C1") = Range("A1") Else ...[/syntax] jest tu niepotrzebne - pusta wartość C1 będzie potraktowana jako 0. Ja bym to widział nieco krócej: wersja "jednokomórkowa"[syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" And IsNumeric(Target.Value)...
dpID info [syntax=json]{ "schemaId": "e5vyik", "services": [ { "name": "默认服务 (Default Service)", "properties": [ { "abilityId": 1, "accessMode": "rw", "code": "switch", "name": "开关 (Switch)", "description": "", "typeSpec": { "type": "bool" } }, { "abilityId": 2, "accessMode": "rw", "code": "mode", "name": "工作模式 (Work Mode)", "description": "", "typeSpec":...
Podmień kod makra na poniższy i potestuj [syntax=vbscript] Sub nastepny() Application.ScreenUpdating = False ActiveSheet.Copy after:=ActiveSheet With ActiveSheet num = Mid(.Name, 3, 2) .Range("g4") = "z T-" & num num = Format(Val(num + 1), "00") .Name = "T-" & num ow = .Cells(Rows.Count, 1).End(xlUp).Row .Range("l2") = .Range("l2").Value + 7...
Żeby się odnieść do poprzedniego arkusza musisz zrobić coś takiego: Range("AD3").Value = ActiveSheet.Previous.Range("AD3").Value + Range("T9").Value
[syntax=vbnet]arkusz1.range ("a11").value = "*-*" Userform1.checkbox1 = (mid(arkusz1.range ("a11").value,1,1) = "*") Userform1.checkbox2 = (mid(arkusz1.range ("a11").value,2,1) = "*") Userform1.checkbox3 = (mid(arkusz1.range ("a11").value,3,1) = "*")[/syntax] Możesz też zapisać jako potęgi dwójki, np: binarne 101 czyli: arkusz1.range ("a11").value =...
Zobacz to, kod działa na Anenji 6.2 kW. Nie obcinaj, wklej zamiast starego kodu w całości, zrób validate i wyłap błędy, popraw płytkę i własciwe gpio itp. substitutions: name: anenji friendly_name: anenji tx_pin: GPIO13 rx_pin: GPIO12 esphome: name: ${name} friendly_name: ${friendly_name} min_version:...
Próbuje pobrać dane do HA z EKCO.MN3 Do kotła podłączyłem płytkę (A+ z A+ ; B- z B-), zasilana z usb https://kamami.pl/esp32/1191671-kamod-es... próbuje na różne sposoby zmieniać yaml ale nie ma efektów uart: id: mod_bus tx_pin: GPIO27 rx_pin:...
Cześć! To mój pierwszy post więc proszę o wyrozumiałość... Mam podobny moduł. Kupiłem go w sklepie internetowym w moim kraju (Brazylia) za około 20 USD. Wykorzystuje inteligentną aplikację Tuya i obsługuje dwa obwody ściemniacza: L1 i L2. Można nimi sterować niezależnie za pomocą aplikacji i przycisku na ścianie zewnętrznej (S1 i S2). S1 i S2 należy...
Np. tak: [syntax=vbscript]Range("A36").Value = Range("J6").Value[/syntax]
Czcionka Lucida Console jest ok. Ta nie dała dobrego efektu ale zacząłem sprawdzać inne i sprawdziłem u kolegi wyżej :D Najlepiej sprawdziła się czcionka "consolas" i "courier news" https://obrazki.elektroda.pl/9985339800_... Jeszcze mam takie może głupie pytanie, ale nie rozumiem tego: Store value/string to EEPROM – EEPROM valid...
Podmień na [syntax=vbscript]Sheets("TEST_2").ListOb... colStart), Cells(row, colEnd)).Value = Sheets("DoPowołania").Range("L1").Value[... lub [syntax=vbscript]Sheets("TEST_2").ListOb... colStart).Resize(, colEnd).Value = Sheets("DoPowołania").Range("L1").Value[...
Super to ci wystarczy wystarczy zrobić skrypt PHP i na czyś go odpalać i wysyłać na PVmonitor tu całość InverterProtocol V1.00 1, Communication data format ： COM set:9600,8,n,1,n 0xaa,0xaa,0x00,sourceaddress,Destination... checksum：unsigned...
Gdybyś opisał całe zagadnienie, to pewnie znalazłoby się lepsze rozwiązanie całości, ale to o co konkretnie pytasz można zapisać tak: [syntax=vbscript]Range("A2").Value = Range("A1").Value[/syntax]
Może coś w tym stylu, jedynie o poprawność danych na drugiej liście musisz zadbać samemu: /pierwsza lista w A2, druga w B2/ [syntax=vbscript]Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$2" Then Select Case Target.Value Case "biały": Range("B2").Value = "czarny" Case "zielony": Range("B2").Value = "czerwony" Case "żółty":...
With pozwala na pomijanie używania w kodzie tego samego obiektu. Robiąc operacje musisz je zawsze robić na jakimś obiekcie. Np [syntax=vba]Range("A1").Value = Range("B1").Value + Range("C1").Value[/syntax] Zapoznaj się może z https://docs.microsoft.com/en-us/office/... bo bez zrozumienia...
Czy masz pod ręką dokładną specyfikację formatu FLI ? Tak. Dodano po 2 FLI idealnie pasuje bo ma głębię kolorów 4 bit... mały ekranik i jest obsługwany przez GIMP... więc animację można tworzyć na PC... Do tego dźwięk AY... Można zebrać wszystko razem i zrobić COBRA2... dać do gazety i za 30 lat będą ulepszać dalej hahah Dodano po 17 http://www.oldversion.com/windows/downlo...
https://obrazki.elektroda.pl/6651795200_... Arduino R4 posiada wbudowany 12-bitowy DAC (Digital-to-Analog Converter), czyli jest w stanie generować sygnał analogowy bez podłączania dodatkowych modułów. Jest to duży krok naprzód, ponieważ w przypadku starszego Uno R3 i podobnych płytek musieliśmy dołączać zewnętrzne DAC takie jak MCP4725...
oki ... trochę mało udogodnień w tym arkusiku, nawet takich najprostszych, pokrywających się z menu, ale będących bardziej pod ręką .... Podgląd i uzupełnianie startuje z "BAZA", po zamknięciu podglądu aktywowany jest arkusz "BAZA". 912269
ubrrl value crucial value initial value
układy scalone audio bezpiecznik zasilać wtryskowy kolorów odtwarzaniu
bezpiecznik świateł mijania bezpiecznik świateł mijania
Vivax LED TV-40LE120T2S2SM - Włączanie bez pilota Schemat kosiska Castel Garden TC102 - gdzie znaleźć?
