Witam!
Od dwóch dni próbuje zestawić połączenie pomiędzy atmega8 i siemensem a51.
Połączenie sprawdzone - na Tx z uC do Rx komórki dzielnik rezystancyjny do obniżenia napięcia. 3 pin telefonu do 2 uC oraz 4 pin telefonu do 3 uC. Telefon z uC mają wspólną masę. Transmisję próbuję nawiązać przy pomocy programu pytającego komórkę o czas:
Próbowałem także różnych prędkości transmisji. Fusy ustawione na zewnętrzny kwarc: hfuseC9, lfuse:FF.
Co jeszcze mogę sprawidzić, lub może macie jakiś inny program, którym mógłbym przetestować połączenie.
Od dwóch dni próbuje zestawić połączenie pomiędzy atmega8 i siemensem a51.
Połączenie sprawdzone - na Tx z uC do Rx komórki dzielnik rezystancyjny do obniżenia napięcia. 3 pin telefonu do 2 uC oraz 4 pin telefonu do 3 uC. Telefon z uC mają wspólną masę. Transmisję próbuję nawiązać przy pomocy programu pytającego komórkę o czas:
$regfile = "m8def.dat"
$crystal = 8000000
$baud = 19200
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portd.5 , Db5 = Portd.6 , Db6 = Portd.7 , Db7 = Portb.0 , E = Portd.3 , Rs = Portd.2
'Config Spi = Hard
Config Serialin = Buffered , Size = 32
Dim Todczyt As String * 16
Dim Ttemp As String * 16
Dim Kod As String * 16
Dim Bufor As Byte
Declare Sub Oproznij_bufor
Enable Interrupts
Cls
Lcd "Odczyt czasu v.2"
Cursor Off
Wait 1
'Print "ATE0" ; Chr(13)
Do
Print "AT+CCLK?" ; Chr(13) ;
Gosub Oproznij_bufor
Input Todczyt Noecho
Ttemp = Mid(todczyt , 1 , 16 )
Cls
Lcd Ttemp
Wait 2
Cls
Wait 1
Loop
Oproznij_bufor:
Do
Kod = Inkey()
Bufor = Ischarwaiting()
Loop Until Bufor = 0
ReturnPróbowałem także różnych prędkości transmisji. Fusy ustawione na zewnętrzny kwarc: hfuseC9, lfuse:FF.
Co jeszcze mogę sprawidzić, lub może macie jakiś inny program, którym mógłbym przetestować połączenie.