Problemas con el envío y recepción de datos del puerto serie en Easy Language

Los datos enviados deben ser datos del conjunto de bytes { 1 }, no el número entero " 1 ". No sé si lo enviaste así.

Solo puedes recibir uno en. un número entero de bytes, si se va a mostrar, es necesario convertirlo antes de poder mostrarlo. Hice este tipo de depuración no hace mucho, los detalles son los siguientes:

.

.Subroutine_button1_is Click

.Variable local JJ, conjunto de bytes

.Variable local CH, tipo de texto, "0"

.Variable local i, tipo entero

CH = Dividir texto (cuadro de edición 1. contenido, " ", ) ' Dividir con espacios

i = 1

Determine el comienzo del ciclo (i ≤ Obtenga el número de miembros de la matriz (CH))

JJ ＝ JJ + texto hexadecimal al conjunto de bytes (CH [i])

i. ＝ i + 1

.Fin del bucle de juez()

Puerto 1. Enviar datos (JJ)

.Subrutina_Puerto 1_llegada de datos

.Parámetros Valor del byte de datos, tipo entero

Byte de ensamblaje set_received data = byte de ensamblaje set_received datos + toma el lado izquierdo del conjunto de bytes (al conjunto de bytes (valor de bytes de datos), 1)

Si es verdadero (tome el lado derecho del conjunto de bytes (byte de ensamblaje set_received data, 1) = byte set_end flag) ' En este ejemplo: byte set_end_flag = { 44 }

editbox_receive.content = byte establecido en texto hexadecimal (byte de ensamblaje set_received data)

Byte de ensamblaje set_received data = { }

Siempre que los datos del comando enviados sean correctos, esta debería ser la solución correcta. espero que te sea útil