通达信买入力度未加密选股指标公式源码

源码正文：

YD:=DYnaINFO(3){XG51};
MM:=IF(C=DYNAINFO(4)*1.1 AND L=DYNAINFO(4)*1.1,H-YD,H-REF(C,1)){XG51};
M:=IF(MM>0,MM,0.0){XG51};
SS:=IF(C=DYNAINFO(4)*0.9 AND H=DYNAINFO(4)*0.9,YD-H,REF(C,1)-L){XG51};
S:=IF(SS>0,SS,0.0){XG51};
HJ:=M+S{XG51};
买入力度:M/HJ*AMOUNT/CAPITAL{XG51};
卖出力度:S/HJ*AMOUNT/CAPITAL{XG51};
买力合计:SUM(买入力度,0){XG51};
卖力合计:SUM(卖出力度,0){XG51};
流入额:M/HJ*AMOUNT{XG51};
流出额:S/HJ*AMOUNT{XG51};
净额:流入额-流出额{XG51};
总流入:=SUM(流入额,0),COLORWHITE{XG51};
总流出:=SUM(流出额,0),COLORCYAN{X~G.5_1~C~N~{};

源码正文：

dif:ema(CLOSE,12)-Ema(CLOSE,26){XG51};
DEA:EMA(DIF,9){XG51};
macd:(DIF-DEA)*2,COLORstICK{XG51};
周DIF:="MacD.DIF#WEEK"{XG51};
周DEA:="MACD.DEA#WEEK"{XG51};
周MACD:=(周DIF-周DEA)*2{XG51};
周红:IF(周MACD>0,BArslAST(crOSS(周MACD,0)),DRAWNULL)+1,COLORBLUE,NODRAW{XG51};
DRAWTEXT(周红=1,0.2,'周金'),COLORBLUE,DRAWAbovE{XG51};
STICKLINE(周红,-0.7,-0.6,1,0),COLORBLUE{XG51};
周K:="kdj.K#WEEK"{XG51};
周D:="kdj.D#WEEK"{XG51};
DRAWTEXT(CROSS(周K,周D),0,'KDJ周'),COLORBLUE{X*G=5?1*C*N*{};