发布于 2014-11-03 10:25:35
1楼
不好意思 ,源代码贴上后,好像缺少了部分 比较指令 比如[< R],[< D ] 可能是由于[<] 等比较指令被网页的某些脚本语言误判了。对于缺失部分 我现在 采用 [< ] 加空格的方式来表示
L #FlowrateIn;
L #CutOffValue; //流量小于此流量 时 不计算和流量计上CUTOFFFLOW 设为一致
< R
= #tmpBool;
Adj: L 0;
T #AccuCal.Factor_1000TM;
T #AccuCal.Factor_1000KgL;
L #AccuCal.AdjustMassVolume;
L 1.000000e+003;
< R ;
L #AccuCal.AdjustMassVolume;
T #tmpMassVolume1000;
JC K1;
L #AccuCal.AdjustMassVolume;
L 1.000000e+006;
< R ;
JC K6;
L #AccuCal.AdjustMassVolume;
L 1.000000e+006;
/R ;
TRUNC ;
T #AccuCal.Factor_1000TM;
JU K3;
K6: L 0;
T #AccuCal.Factor_1000TM;
K3: L #AccuCal.Factor_1000TM;
ITD ;
// DTR
L L#1000000;
*D ;
DTR ;
L #AccuCal.AdjustMassVolume;
TAK ;
-R ;
T #tmpMassVolume1000;
L #tmpMassVolume1000;
L 1.000000e+003;
< R ;
JC K1;
/R ;
TRUNC ;
T #AccuCal.Factor_1000KgL;
JU K0;
K1: L 0;
T #AccuCal.Factor_1000KgL;
K0: L #AccuCal.Factor_1000KgL;
ITD ;
// DTR
L 1000;
*D ;
DTR ;
L #tmpMassVolume1000;
TAK ;
-R ;
T #AccuCal.TotalMassVolume;
SET ;
R #Adjust;
//-----------End Adjust Value
人生就像一场旅行!