Witam!
Kilka lat temu zakupiłem zestaw AVT2550 zmontowałem, uruchomiłem i zapomniałem o nim . Teraz wrócił do łask ale nie działa komunikacja przez RS232 z PC!!!
Od kilku dni szukam po forach podobnego problemu i sprawdziłem już chyba wszystko ustawiłem Fusebits i naprawdę już nie wiem co robić .
Mam nowy procek ATMEGA8535 16PU pracujący z zewnętrznym kwarcem 8MHz oryginalny zablokowałem zmieniając Fusebits.
Układ MAX232 prawdopodobnie działa poprawnie (zmierzyłem napięcia według karty katalogowej), nie ma żadnych przerw pomiędzy µP > MAX232 > wtyczka DB9.
Komunikacje sprawdzałem w monitorze BASCOM’a AVR 1.11.83 i w HyperTerminal’u z przeróżnymi ustawieniami: 19200,N,8,1 te zostawały bez zmian. Fusebits ustawione tak:
Program najprostszy z możliwych:
$regfile = "m8535.dat"
$crystal = 8000000
$baud = 19200
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portd.7 , Db7 = Porta.7 , E = Portc.3 , Rs = Portc.2
Dim A As Byte
Dim B As Byte
Cls
Lcd "Test Portu"
Lowerline
Lcd "RS 232"
Wait 1
Cls
A = 1
Open "comd.1:19200,8,n,1" For Output As #1
Open "comd.0:19200,8,n,1" For Input As #2
Do
Cursor Off
Lcd "Wyslano: " ; A ; "x"
Lowerline
Lcd "Odebrano: " ; B
Input #2 , B
Print #1 , "Test Portu RS232"
Print #1 , "To jest kod wysylany z mikrokomputerka PECEL"
Wait 2.5
A = A + 1
Cls
Loop
End
Kilka lat temu zakupiłem zestaw AVT2550 zmontowałem, uruchomiłem i zapomniałem o nim . Teraz wrócił do łask ale nie działa komunikacja przez RS232 z PC!!!
Od kilku dni szukam po forach podobnego problemu i sprawdziłem już chyba wszystko ustawiłem Fusebits i naprawdę już nie wiem co robić .
Mam nowy procek ATMEGA8535 16PU pracujący z zewnętrznym kwarcem 8MHz oryginalny zablokowałem zmieniając Fusebits.
Układ MAX232 prawdopodobnie działa poprawnie (zmierzyłem napięcia według karty katalogowej), nie ma żadnych przerw pomiędzy µP > MAX232 > wtyczka DB9.
Komunikacje sprawdzałem w monitorze BASCOM’a AVR 1.11.83 i w HyperTerminal’u z przeróżnymi ustawieniami: 19200,N,8,1 te zostawały bez zmian. Fusebits ustawione tak:
Program najprostszy z możliwych:
$regfile = "m8535.dat"
$crystal = 8000000
$baud = 19200
Config Lcd = 16 * 2
Config Lcdpin = Pin , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portd.7 , Db7 = Porta.7 , E = Portc.3 , Rs = Portc.2
Dim A As Byte
Dim B As Byte
Cls
Lcd "Test Portu"
Lowerline
Lcd "RS 232"
Wait 1
Cls
A = 1
Open "comd.1:19200,8,n,1" For Output As #1
Open "comd.0:19200,8,n,1" For Input As #2
Do
Cursor Off
Lcd "Wyslano: " ; A ; "x"
Lowerline
Lcd "Odebrano: " ; B
Input #2 , B
Print #1 , "Test Portu RS232"
Print #1 , "To jest kod wysylany z mikrokomputerka PECEL"
Wait 2.5
A = A + 1
Cls
Loop
End
