恭喜,你发布的帖子
发布于 2016-08-03 12:06:18
2楼
BitsCount源代码:
L P##Qby //Temp,byte
LAR1
A #Bit_0
= [AR1,P#0.0]
A #Bit_1
= [AR1,P#0.1]
A #Bit_2
= [AR1,P#0.2]
A #Bit_3
= [AR1,P#0.3]
A #Bit_4
= [AR1,P#0.4]
A #Bit_5
= [AR1,P#0.5]
A #Bit_6
= [AR1,P#0.6]
A #Bit_7
= [AR1,P#0.7]
L #Qby
T #QByte
L 0
T #QCount
LAR1 P##Qby
L 8
NEXT: T #Index //Temp,int
A [AR1,P#0.0]
JCN a0b0
L 1
L #QCount
+I
T #QCount
a0b0: CLR
+AR1 P#0.1
L #Index
LOOP NEXT
请填写推广理由:
分享
只看
楼主