De PBP a Proton IDE "Command.0[i]"

[biker2k3]

Holas estoy pasando un pqeueño programa de pbp a proton y tengo este problema


If pulso>100 And i<16 And pulso < 230 Then
Command.0 = 1 ;ESTA LINEA ME TIRA ERROR
EndIf


Lo que hace el programa es cambiando el valor de "i" para ir grabando bit a bit la variable "Command"

si yo pongo Command.5 = 1 ahi anda bien carga un "1" en el quinto bit de "command" pero necesito ir barriendo todos los bit que son 16 por ser una variable WORD.

 

[D@rkbytes]

Que te parece si subes el proyecto original y así te podremos ayudar mejor.
Porque esa variable Command.0 se me hace muy extraña para trabajarla así en Proton

Como te podria funcionar seria así:

Dim Command[16] As Word ; o Byte
Dim i As Byte

i=5

Command=1

Se te pueden dar mas explicaciones, pero es necesario que expliques bien
que tiene que hacer el programa que pretendes.

 

[biker2k3]

Que te parece si subes el proyecto original y así te podremos ayudar mejor.
Porque esa variable Command.0 se me hace muy extraña para trabajarla así en Proton

Como te podria funcionar seria así:

Dim Command[16] As Word ; o Byte
Dim i As Byte

i=5

Command=1

Se te pueden dar mas explicaciones, pero es necesario que expliques bien
que tiene que hacer el programa que pretendes.

Holas el programa lo que hace es ir leyendo informacion, un codigo de 16bits y lo va guardando bit a bit en la variable command que es word, osea tiene 16bit.

Probe poner como me dijistes "Dim Command[16] As Word" pero eso lo que hace es un array de 16 variables word y me llena la memoria, osea estaria usando por cada bit que quiero guardar una variable de 16bit ahi.

 

[biker2k3]

Bueno me mire 200 paginas de la ayuda del proton y encontre que tengo que usar esta linea

SetBit Command1, f