Cicode problem

Instead of using seperate local variables
Use an Array "Bits[xx]", declare as global.
Ok if is only temporay but problem if needed to be retentive.

OR use whole word

iBit = 1;
For i = 0 TO 30 DO
IF ((Word_1 BITAND iBit) = iBit) THEN;
Bit_1 = 1;
ELSE
Bit_1 = 0;
END
iBit = iBit * 2;
END

Or to set bit in word
Word_1 = Word_1 BitOr iBit;

Put in function and pass word and retrieve bit value.

Just random thoughts!

The function you are looking for is write_var (or writevar) You pass the name of a tag as a string ("BIT_" + strIndex)and it will return the value. This will only work however if the function is not used to directly display the data. On a super genie you probably should use ***_Tag or one of the other ***_ functions

(it wont let me write the first part of the function name - *** should be *=a *=s *=s)

Alternatively, you could make your local variables be tags of a disk IO device. This means you could use the TagWrite function which accepts the name of the tag as a string.

FUNCTION
SetVarToOne(STRING Variable)
INT I
STRING sTtemp
FOR I=1TO30DO
sTemp = Variable + IntToStr(I)
TagWrite(sTemp,"1")
//Display current ariable at Prompt field
Prompt(sTemp)

// Show a popup with the current variable and its value
Message(sTemp,inttostr(tagread(sTemp)),0)

END
END

In the button touch property

SetVarToOne("Bit_")