Salve a tutti,
ho seguito i consigli e sono riuscito nell'intento...
ho utilizzato il modulo Bluetooth HC-05 per inviare stringhe tramite RS232 a un circuito con un ATmega32
Volevo un parere sulla gestione dell' UART dell' ATmega, grazie.
Questo è il codice... posso fare qualche altra cosa per renderlo più performante?
Grazie.
- Code: Select all
$regfile = "m32def.dat"
$crystal = 4000000
$baud = 38400
$hwstack = 80
$swstack = 80
$framesize = 90
Config Graphlcd = 240 * 128 , Dataport = Portb , Controlport = Portc , Ce = 2 , Cd = 3 , Wr = 0 , Rd = 1 , Reset = 4 , Fs = 5 , Mode = 6
Config Com1 = Dummy , Synchrone = 0 , Parity = None , Stopbits = 1 , Databits = 8 , Clockpol = 0
Config Serialin = Buffered , Size = 254
'Config Serialout = Buffered , Size = 254
Dim Rx_cmd As Byte , Ric As Byte , Command As String * 254
Waitms 10
Cls
Cursor Off
Enable Interrupts
Bip
Locate 1 , 1
Lcd "Test module HC-05-RS232"
Command = ""
Ric = 0
Rx_cmd = 0
Do
Rx_cmd = Ischarwaiting()
If Rx_cmd = 1 Then
Rx_cmd = Waitkey()
Ric = 1
Command = Command + Chr(rx_cmd)
Waitms 1
Else
If Ric = 1 Then
Ric = 0
Locate 2 , 1
Lcd Command
Command = ""
Waitms 1
Print "OK"
End If
End If
'If Enter = 1 Then
' Bip
' Print "AT+NAME?"
' Do
' Loop Until Enter = 0
' End If
Loop