witam,
jestem dosc swiezy w temacie;)
potrzebuje oprogramowac Atmege8 w taki sposob, aby napiecie pobrane z fototranzystora przesylala do komputera po rs232. Dane bede odbierane przez program Labview. Przeczytalem duzo tematow i sklecilem taki program:
1.Czy moglby ktos sprawdzic poprawnosc tego kodu?
2.Czy potrzebuje linijki:
?
3.Czy musze zmienias ustawienia fusebitow?
4.Przy takim kodzie programu w jaki sposob podlaczyc mierzone napiecie do mikrokontrolera?
Prosze o wyrozumialosc, z gory dziekuje za odpowiedzi:)
jestem dosc swiezy w temacie;)
potrzebuje oprogramowac Atmege8 w taki sposob, aby napiecie pobrane z fototranzystora przesylala do komputera po rs232. Dane bede odbierane przez program Labview. Przeczytalem duzo tematow i sklecilem taki program:
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 9600
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 2 , Databits = 8 ,Clockpol = 0
Dim Wart_ac As Word 'zmienna na wartość odczytaną
'z przetwornika
Dim V As Single 'zmienna przechowująca obliczoną
'wartość zmierzonego napięcia
Start Adc 'uruchamia wbudowany przetwornik
Do 'początek pętli programu
Wart_ac = Getadc(1) 'odczytanie wartości z wejścia
'ADC1 mikrokontrolera
V = Wart_ac * 0.0049 'zamiana odczytanej wartości
'z A/C na napięcie
Print V
Waitms 4500 'opóźnienie 100 ms
Loop 'koniec pętli Do...Loop
End 'koniec programu1.Czy moglby ktos sprawdzic poprawnosc tego kodu?
2.Czy potrzebuje linijki:
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 2 , Databits = 8 ,Clockpol = 0 3.Czy musze zmienias ustawienia fusebitow?
4.Przy takim kodzie programu w jaki sposob podlaczyc mierzone napiecie do mikrokontrolera?
Prosze o wyrozumialosc, z gory dziekuje za odpowiedzi:)