啊呀，又遇到我会的了，看来这段时间的学习还时有点成果的啊。（小小的自恋一下。）

peek指令配合循环，在加上除后取除数和余数。可以解决楼主的问题。

//定义 iIndex    int；

//定义 b目标数据为   array[0..100] of bool;

用循环和peek_bool指令，实现如下

FOR iIndex := 0 TO 100 BY 1 DO

        b目标数据[iIndex] := PEEK_BOOL(area := 16#83, 

                                                                dbNumber := 0, 

                                                                byteOffset := 10 + iIndex / 7, 

                                                                bitOffset := iIndex mod 7) ;  

END_FOR;