通达信春花秋实副图指标 源码 附图

V1:=(C*2+H+L+O)/5; {均价}
V2:=EMA(V1,13)-EMA(V1,34);{MACD.DIFF}
V3:=EMA(V2,5); {MACD.DEA}
V4:=(V2-V3)*100; {MACD.MACD}
主力撤:=IF(V4<=0,V4,0){,COLORBLUE个股};
主力进:=IF(V4>=0,V4,0){,COLORFF00FF个股};
V8:=(INDEXC*2+INDEXH+INDEXL+INDEXO)/5;{大盘均价}
V9:=EMA(V8,13)-EMA(V8,34); {INDEX.DIFF}
VA:=EMA(V9,5); {INDEX.DEA}
VB:=(V9-VA)/2; {INDEX.MACD}
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);
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);
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);
阳光:EMA(V11,3),COLORYELLOW,LINETHICK2;
空气:EMA(V12,3),COLORDD00FF;
雨露:EMA(V13,3),COLORBLUE;
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);
自然环境:EMA(DV11,13),COLORCYAN,LINETHICK2;
稻草人:空气<=10,LINETHICK0,COLOREECC99;
STICKLINE(空气<=10,0,15,5,0),COLOREECC99;
麦田:空气<=10 AND (阳光<=10 OR 自然环境<=10),LINETHICK0,COLOR00EEAA;
STICKLINE(空气<=10 AND (阳光<=10 OR 自然环境<=10),0,20,4,0),COLOR00EEAA;
早熟:空气<=10 AND (阳光<=10 OR 自然环境<=10) AND 雨露<=10,LINETHICK0,COLORMAGENTA;
STICKLINE(空气<=10 AND (阳光<=10 OR 自然环境<=10) AND 雨露<=10,0,25,3,0),COLORMAGENTA;
光合作用:阳光<=10 AND 空气<=10 AND 自然环境<=10 AND 雨露<=10,LINETHICK0,COLORRED;
STICKLINE(阳光<=10 AND 空气<=10 AND 自然环境<=10 AND 雨露<=10,0,30,2,0),COLORRED;
AA:=FILTER((空气<=10),15);
XX:=FILTER(空气<=10 AND 自然环境<=10,15);
{DRAWTEXT (AA,30,'稻草人'),COLORCC9900;
DRAWTEXT (XX,40,'麦田'),COLOR00AAAA; }
BB:= (空气<=10 AND V12>10) AND FILTER((空气<=10 AND V12>10),10);
乌鸦:空气>=90 AND 空气>REF(空气,1),COLORFFFF00,LINETHICK0;
STICKLINE(乌鸦,100,95,15,1),COLORFFFF00;
暴风雨:空气>=90 AND 自然环境>=90,COLORGREEN,LINETHICK0;
STICKLINE(暴风雨,100,95,10,0),COLORGREEN;
收割:FILTER(空气>90 AND 空气<REF(空气,1) AND 主力进<REF(主力进,1),8);
DRAWTEXT( 收割,90,'收割'),COLORYELLOW;
STICKLINE(阳光,阳光<=10,RGB(255,0,0),阳光>=90,RGB(0,0,255)),LINETHICK3;
STICKLINE(自然环境<=10,100,95,10,0),COLORRED;
DRAWTEXT(FILTER(自然环境<=10,8),90,'农耕?'),COLORRED;