agrala

Przepraszam że odkopuje temat ale chciałem wykorzystać ten program i mam z nim problem. Chodzi o pierwszą wersję kodu. Skoro podajemy sygnały do zliczania na PD3 to czemu w konfiguracji wyświetlacza jest podane: Db5 = Portd.3

Mógłbys to trochę bardziej rowinąć?

Dokladnie w tym samym co wynik pomiaru. Wygłąda to w ten sposób że wynik to np. 0,000199999 i na jakieś 10 wyświetlen w ciągu sekundy jest wyświetlany poprawny wynik 7 razy a 3 razy wyskakuje np. 0,99xxxxx (liczba dużo większa niż poprawny wynik).

Jeżeli nie odpowiedni dział to najmocniej przepraszam. Napisałem program na uC i nie wiem czemu co chwilę na wyświetlaczu oprócz poprawnego wyniku wskakuje jakaś liczba nie związana z pomiarem. $regfile = "m8def.dat" $crystal = 16000000 Config Lcd = 16 * 2 Enable Interrupts Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5 Config Timer1 = Timer , Prescale = 64 'maks=0,261s, min=0,000004s Enable Timer1 Config Int0 = Falling On Int0 Poczatek Enable Int0 Stop Timer1 Timer1 = 0 Dim Wynik As Word Dim Flaga As Bit Dim Wynikczas As Single Cls Cursor Off Do Locate 1 , 1 Lcd Wynikczas ; Spc(6) Waitms 100 Loop End Poczatek: If Flaga = 0 Then Load Timer1 , 0 Start Timer1 Config Int0 = Rising Else Stop Timer1 Wynik = Timer1 Wynikczas = Wynik * 0.000004 Load Timer1 , 0 Config Int0 = Falling End If Toggle Flaga Return Do podawania stanu niskiego użyłem drugiego uC z takim programem: $regfile = "m8def.dat" $crystal = 4000000 Config Pinb.1 = Output Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Disconnect , Prescale = 8 Config Portd = Input Dim Pom As Integer Config Portd.0 = Output Config Portd.1 = Output Config Portd.2 = Output Config Portd.3 = Output Config Portd.4 = Output Do Set Portd.0 Set Portd.1 Set Portd.2 Set Portd.3 Set Portd.4 If Pind.0 = 0 Then Pwm1a = 50 End If If Pind.1 = 0 Then Pwm1a = 100 End If If Pind.2 = 0 Then Pwm1a = 150 End If If Pind.3 = 0 Then Pwm1a = 200 End If If Pind.4 = 0 Then Pwm1a = 250 End If Loop End Czy można prosić kogoś mądrzejszego ode mnie o poprawienie programu bo sam nie daje rady.

$regfile "attiny26.dat" $crystal = 1000000 Config Portb.0 = Output Config Porta.0 = Input Porta.0 = 1 Do If Pina.0 = 0 Then Waitms 25 If Pina.0 = 0 Then Toggle Portb.0 Bitwait Pina.0, Set End If End If Loop End Teraz przycisk powinien reagować tylko raz. If Pina.0 = 0 Then Waitms 25 If Pina.0 = 0 Then Ten kawałek kodu ma ne celu eliminacje drgań styku przycisku. Bitwait Pina.0, Set To polecenie wstrzymuje działanie pogramu do momentu aż przycisk zostanie puszczony - czyli na pinie a.0 znów pojawi się stan wysoki. Zamiast instrukcji warunkowej "If....Then" możesz też użyć instrukcji "Debounce" Debounce pinx.y, stan, etykieta, Sub pinx.y - linia portu która będzie sprawdzana stan - stan na jaki ma reagować instrukcja - 0 lub 1. W Twoim przypadku 0 etykieta - podprogram - czyli co ma być zrobione Sub - przejście do podprogramu $regfile "attiny26.dat" $crystal = 1000000 Config Portb.0 = Output Config Porta.0 = Input Porta.0 = 1 Do Debounce Pina.0, 0, Pr1, Sub Loop End Pr1: Toggle Portb.0 Return

Wydaje mi się że kod który jest podany zapali już diode gdy napięcie spadnie o 0,01953125V przy wykorzystaniu przetwornika 8 bitowego. Gdy dioda miała by zareagować dopiero przy napięciu z zakresu 0-4V to musiałoby to wyglądać tak If Pomiar < 204 Then Gosub Zapal_czerwona End If Czy dobrze myślę?

Strasznie drogi ten gotronik jak na takiego golasa

A gdzie masz rezystory bo link nie działa i nie wiadomo co tam jest a ze zdjęcia które wkleiłeś nie można tego wywniskować. Można powiedzieć że ten co ma dwa złącza jest bardziej uniwersalny bo pasuje do obu standartów a jaki Ty sobie zastosujesz standart złącza zależy od Ciebie

Tu masz 6 i 10 pinowe złącze ISP http://www.elektroda.pl/rtvforum/files-rtvforum/z_acze_isp_10_pin_1_5149.jpg Jak widać jest to praktycznie to samo tylko 10 pinowe ma dołożony pin PROG (LED) i 4 piny zmostkowane i podłączone do masy (GND)

Używasz tylko jednego, np KANDA

To nie jest programator na USB więc nie wyskoczy Ci dymek że zostało znalezione nowe urządzenie. Tak jak napisał ktoś wcześniej uruchom Bascoma i staw odpowiedni programator w ustawieniach. Jeżeli chodzi i podłączenie to programator musi byc podłączony pod uP do VCC, GND, MISO, MOSCI, SCK, RESET. Jeżeli programator nie ma własnego zasilania to uP musi być zasilany (VCC, GND).

Tu masz podobny temat, może Ci coś pomoże http://www.elektroda.pl/rtvforum/viewtopic.php?t=1775677&highlight= Choć pewnie zaraz temat wyląduje w koszu bo nie ma nic wspólnego z robotami.

Jak długo możesz na tym jeździc jeżeli napięcie zasilania masz 7,2V? Z tego co pamiętam to dla 7805 min nap wejściowe to 7V a max 20V. Biorąc pod uwagę jakieś większe obciążenia dla silników to pewnie napięcie na tych akumulatorkach spada poniżej 7V. Nie resetuje Ci sie wtedy uP?

Może kolega napisać w jaki sposób zasila uP? 7805 czy jakaś przetwornica?

Proponuję najpierw zapoznać się z tym tematem https://www.forbot.pl/forum/topics35/porzadki-domowe-sprzedam-tanio-podane-ceny-do-negocjacji-vt4248.htm