AW: AW: Binaries data file
AW: AW: Binaries data file
This is a topic for an orphaned message.
Thanks a lot Wolfgang and all who has answered. Your answers are very helpfull.
Best regards,Alexandre Stoulov
------------------------------
Consultant. Business Intelligence Projects
TERN Company
mailto:alexs@tern.ru
whgd> If you look into the helpfiles you will find for sure functions to
whgd> convert any byte in bits and process them.
whgd> For example I wrote this function for to transfer Bytes to Bits:
whgd> ------------------------------------------------------
whgd> FUNCTION BYTE2BIT(Arg1)
whgd> MyByte=Arg1
whgd> MyNumber=SEQ(MyByte)
whgd> Ans=""
whgd> FOR X=7 TO 0 STEP -1
whgd> IF MyNumber > 2^X
whgd> THEN Ans=Ans:1;MyNumber=MyNumber-2^X
whgd> ELSE Ans=Ans:0
whgd> NEXT X
whgd> Return(Ans)
whgd> -------------------------------------------------------
Best regards,Alexandre Stoulov
------------------------------
Consultant. Business Intelligence Projects
TERN Company
mailto:alexs@tern.ru
whgd> If you look into the helpfiles you will find for sure functions to
whgd> convert any byte in bits and process them.
whgd> For example I wrote this function for to transfer Bytes to Bits:
whgd> ------------------------------------------------------
whgd> FUNCTION BYTE2BIT(Arg1)
whgd> MyByte=Arg1
whgd> MyNumber=SEQ(MyByte)
whgd> Ans=""
whgd> FOR X=7 TO 0 STEP -1
whgd> IF MyNumber > 2^X
whgd> THEN Ans=Ans:1;MyNumber=MyNumber-2^X
whgd> ELSE Ans=Ans:0
whgd> NEXT X
whgd> Return(Ans)
whgd> -------------------------------------------------------