Socorro Ayuda con Array y strings en 18F452

[raraavis]

Estoy complicado con las variables, los Arrays y las Strings quisiera saber lo siguiente:

En Proton, con un core 16 ( 18F452)

1)- ¿ Como sumo 2 arrays de bytes de 20 elementos cada uno ?.

2) - ¿ Como convierto 2 arrays de bytes en una sola cadena string ?.

Dim array1 [12]   as Byte
Dim array2[100]    as Byte
Dim Cadena        as String * 112

Algo tan sencillo como eso no lo puedo hacer !!..... a ver si un alma se apiada de mi  ....

[doppel]

Hola raraavis
no conozco funciones especificas para hacer eso automaticamente, pero podrias implementar un ciclo de lectura asignacion de acuerdo a la cantidad de elementos

Código: FreeBasic

1. main:
2.         For x = 0 To 11
3.              cadena[x]=array1[x]
4.         Next
5.  
6.         For j = 12 To 112
7.             cadena[j]=array2[j]
8.         Next

   

comentame si tuvistes resultados
saludos

[raraavis]

Gracias Doppel, exactamente asi lo resolvi yo pero me preocupa no saber bien como hacer lo mismo con Strings
ya que cuando quiero usar los comandos STR$, STRN me da errores de compilacion, tampoco logro convertir 2 arrays de byte en una cadena de texto.

[raraavis]

Ya aprendi esto:   

Convierto un Entero de 2 digitos en string

Código: [Seleccionar]

DIM TOT[2]      as byte                     'Array de 2 digitos
DIM TOTAL       as byte

     STRN TOT = STR$ (Dec2 Total)          'Convierto a String con 2 digitos

Convierto un Array de Byte de 2 elementos en un Valor Entero.

Código: [Seleccionar]

DIM Tot[2]      as byte                     'Array de 2 digitos
DIM Total       as byte

    Total = VAL(Tot,dec)