TODOPIC
Microcontroladores PIC => Lenguaje Basic para microcontroladores PIC => Mensaje iniciado por: 16f en 04 de Diciembre de 2011, 16:05:14
-
hola amigos , en estos momentos programo una display de 7x 64 , con un control de texto serial, uso lenguaje proton, el problema es que cuando envio un texto , me imprime decimales. y no la letra.
Include "PROTON_20.INC"
TRISB=%00000000
TRISE=0
PORTB = 0
PORTE= 0
All_Digital = True
Dim valor As Dword
Dim n As Byte
time1 var Byte
valor =0
inicio:
PORTE.1=0
Print At 1,1 ," HOLA"
HSerIn 1000, inicio, [valor]
Print At 2,1, Dec, valor
DelayMS 50
GoTo inicio
-
mi protocolo seria 2 66 128 66 85 83 32 50 32 69 74 69 83 3 173
texto suma
ya puedo recuperar los datos como texto, pero envia todos los datos comienzo y fin y solo requiero el texto
Include "PROTON_20.INC"
All_Digital = True
'Dim valor As Dword
Dim n As Byte
Dim valor As Byte
time1 var Byte
Dim SerString[20] As Byte ' Create a 10-byte array
TRISE=0
PORTE.1=0
Cls
hhh:
HSerIn [Str SerString] ' Fill the array with received data.
Print Str SerString ' Display the string.
DelayMS 500
GoTo hhh
-
hola amigos , en estos momentos programo una display de 7x 64 , con un control de texto serial, uso lenguaje proton, el problema es que cuando envio un texto , me imprime decimales. y no la letra.
Include "PROTON_20.INC"
TRISB=%00000000
TRISE=0
PORTB = 0
PORTE= 0
All_Digital = True
Dim valor As Dword
Dim n As Byte
time1 var Byte
valor =0
inicio:
PORTE.1=0
Print At 1,1 ," HOLA"
HSerIn 1000, inicio, [valor]
Print At 2,1, Dec, valor
DelayMS 50
GoTo inicio
la idea seria PC---------------------protocolo----------------micro---------------------p antalla
el protocolo es -------02------66 (linea)----128 (fijo)" ABCDE1234567"-------03-------SUMA
la idea seria como recuperar el texto o caracteres necesarios.
la pantalla es de 7x64 , pero en 2 filas.
es decir 7x128
saludos