Nemrégen kezdtem el foglalkozni az AVR-ekkel és Bascomban programozom a jelenlegi projektemet de most elakadtam. Próbáltam keresni de nem találtam használható példát. A gondom a következő.
Van két jelem:
164 Mhz 0....12V közötti Amplitudoval (Sebesség)
1130 Mhz 0....5V közötti Amplitudoval (Fordulatszám)
Mindkét jel esetében a frekvencia az állandó. Viszont nekem kellene a jel Amplitudoja. Proteusban megpróbáltam modellezni a szituációt és írtam rá egy kissebb Bascom programot de nem azt kaptam amit kellett volna. 5V-os Reff volt mellett 5V-os 164 Mhz-s jel 907-et adott vissza holott 1023-nak kellene lennie.
A program a következő:
Kód: Egész kijelölése
$regfile = "m8def.dat"
$crystal = 1000000
'Config Portd = Output
Config Adc = Single , Prescaler = Auto , Reference = Avcc 'config ADC
Start Adc
Dim Amp As Integer
Dim Amp1 As Integer
Config Lcd = 20 * 4
Config Lcdpin = Pin , Rs = Pind.7 , E = Pind.6 , Db4 = Pinb.7 , Db5 = Pinb.6 , Db6 = Pind.4 , Db7 = Pind.5
Amp = 0
Amp1 = 0
Do
Gosub Amplimeres
Locate 1 , 1
Lcd "Amplitudo:"
Locate 2 , 1
Lcd Amp
Waitms 200
Loop
End
Amplimeres:
While Amp =< Amp1
Amp1 = Amp
Amp = Getadc(3)
Wend
Return
.. Van egy 600-as motorom. És arra akarok csinálni mint tanulóproject egy komputert. Hát pörög szépen 15k-t a motorom mert egy gyorsasági motor. Az általad írt megoldáshoz hasonlót csináltam énis csak annyi különbséggel hogy 2 tömböt létrehoztam. (200-200 elemmel). És egymás után mérek 200-at és abban megkeresem a legnagyobbat és elvileg az lesz az Amplitudo. Ha a gondolkodásmódom jó.
.. :S
