以下是通达信买入力度(源码副图贴图)(无源码的请下载附件导入)
YD:=DYNAINFO(3);
MM:=IF(C=DYNAINFO(4)*1.1 AND L=DYNAINFO(4)*1.1,H-YD,H-REF(C,1));
M:=IF(MM>0,MM,0.0);
SS:=IF(C=DYNAINFO(4)*0.9 AND H=DYNAINFO(4)*0.9,YD-H,REF(C,1)-L);
S:=IF(SS>0,SS,0.0);
HJ:=M+S;
买入力度:M/HJ*AMOUNT/CAPITAL;
卖出力度:S/HJ*AMOUNT/CAPITAL;
买力合计:SUM(买入力度,0);
卖力合计:SUM(卖出力度,0);
流入额:M/HJ*AMOUNT;
流出额:S/HJ*AMOUNT;
净额:流入额-流出额;
总流入:=SUM(流入额,0),COLORRED;
总流出:=SUM(流出额,0),COLORGREEN;
431199559.png
|