M0 :=(D0=1 AND NOT X5 AND X7 AND X8) OR D2=1 OR D5=1 OR D12 =1;
IF M0= TRUE AND LDP(TRUE,M1) THEN
D100 :=D100+1;
END_IF;
IF M0= TRUE AND LDP(TRUE,M2) THEN
D101 :=D101+1;
END_IF;
IF M0= TRUE AND LDP(TRUE,M3) THEN
D102 :=D102+1;
END_IF;
IF M0= TRUE AND LDP(TRUE,M4) THEN
D103 :=D103+1;
END_IF;
IF M0= TRUE AND LDP(TRUE,M5) THEN
D104 :=D104+1;
END_IF;
IF M0= TRUE AND LDP(TRUE,M6) THEN
D105 :=D105+1;
END_IF;
IF M0= TRUE AND LDP(TRUE,M7) THEN
D106 :=D106+1;
END_IF;
其實(shí)我看出來(lái)你想說(shuō)什么了,是我的會(huì)我會(huì)用標(biāo)簽的布爾數(shù)組,要加的數(shù)據(jù)也是數(shù)組;
用FOR去寫(xiě)就好了。我覺(jué)得你一定會(huì)用變址,因?yàn)槟愕乃枷胍呀?jīng)被束縛了