通达信主力进撤选股指标公式源码

通达信主力进撤选股指标公式源码

源码正文：

R:=4{XG51};
V1:=(C*2+H+L+O)/5;
V2:=ema(V1,13)-Ema(V1,34){XG51};
V3:=EMA(V2,5);
V4:=(V2-V3)*100;
主力撤:=IF(V4<=0,V4,0){XG51};
主力进:=IF(V4>=0,V4,0){XG51};
V8:=(INDEXC*2+INDEXH+INDEXL+INDEXO)/5{XG51};
V9:=EMA(V8,13)-EMA(V8,34);
VA:=EMA(V9,5);
VB:=(V9-VA)/2;
V11:=3*SMA((C-LLV(L,13))/(HHV(H,13)-LLV(L,13))*100,5,1)-2*SMA(SMA((C- LLV(L,13))/(HHV(H,13)-LLV(L,13))*100,5,1),3,1){XG51};
V12:=3*SMA((C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100,5,1)-2*SMA(SMA((C- LLV(L,60))/(HHV(H,60)-LLV(L,60))*100,5,1),3,1){XG51};
V13:=3*SMA((C-LLV(L,120))/(HHV(H,120)-LLV(L,120))*100,5,1)-2*SMA(SMA((C- LLV(L,120))/(HHV(H,120)-LLV(L,120))*100,5,1),3,1){XG51};
阳光:EMA(V11,3),COLORBLUE,LINETHICK2{XG51};
空气:EMA(V12,3),COLORDD00FF{XG51};
雨露:EMA(V13,3),COLORRED{XG51};
DV11:=3*SMA((INDEXC-LLV(INDEXL,60))/(HHV(INDEXH,60)-LLV(INDEXL,60))*100,5,1)-2*SMA(SMA((INDEXC-LLV(INDEXL,60))/(HHV(INDEXH,60)-LLV(INDEXL,60))*100,5,1),3,1){XG51};
自然环境:EMA(DV11,13),COLORGREEN,LINETHICK2{XG51};
稻草人:空气<=10,LINETHICK0,COLOREECC99{XG51};
stICKLINE(空气<=10,0,15,3,0),COLOREECC99{XG51};
麦田:空气<=10 AND (阳光<=10 OR 自然环境<=10),LINETHICK0,COLOR00EEAA{XG51};
STICKLINE(空气<=10 AND (阳光<=10 OR 自然环境<=10),0,20,2,0),COLOR00EEAA{XG51};
早熟:空气<=10 AND (阳光<=10 OR 自然环境<=10) AND 雨露<=10,LINETHICK0,COLORLIMAGENTA{XG51};
STICKLINE(空气<=10 AND (阳光<=10 OR 自然环境<=10) AND 雨露<=10,0,25,1,0),COLORLIMAGENTA{XG51};
光合作用:阳光<=10 AND 空气<=10 AND 自然环境<=10 AND 雨露<=10,LINETHICK0,COLORWHITE{XG51};
STICKLINE(阳光<=10 AND 空气<=10 AND 自然环境<=10 AND 雨露<=10,0,30,0.5,0),COLORWHITE{XG51};
AA:=FILTER((空气<=10),15){XG51};
XX:=FILTER(空气<=10 AND 自然环境<=10,15){XG51};
BB:= (空气<=10 AND V12>10) AND FILTER((空气<=10 AND V12>10),10){XG51};
乌鸦:空气>=90 AND 空气>REF(空气,1),COLORFFFF00,LINETHICK0{XG51};
STICKLINE(乌鸦,100,95,15,1),COLORFFFF00{XG51};
暴风雨:空气>=90 AND 自然环境>=90,COLORCYAN,LINETHICK0{XG51};
STICKLINE(暴风雨,100,95,10,0),COLORCYAN{XG51};
收割:FILTER(空气>90 AND 空气<REF(空气,1) AND 主力进<REF(主力进,1),8){XG51};
DRAWTEXT( 收割,90,'收割'),COLORBLUE{XG51};
IF(阳光<=10,阳光,DRAWNULL),LINETHICK3,COLOR0000FF{XG51};
IF(阳光>=90,阳光,DRAWNULL),LINETHICK3,COLORFF0000{XG51};
STICKLINE(自然环境<=10,100,95,10,0),COLORWHITE{XG51};
DRAWTEXT(FILTER(自然环境<=10,8),90,'农耕?'),COLORWHITE{X_G~5-1_C_N_{};