以下是分时主图源码主图(无源码的请下载附件导入)
通达信分时MACD看盘指标源码,上图个人鉴别!!修改后更好了
RCC:=DYNAINFO(3);
S2:=SMA(C,3,1);
S6:=SMA(C,5,1);
DK:=10*(S2-S6);
KK:=IF(PERIOD=8,0.95,1);
STICKLINE(DK>0,RCC*KK,RCC*KK+DK,0,1),COLORRED;
STICKLINE(DK<0,RCC*KK,RCC*KK+DK,0,1),COLORCYAN;
XG:HHV(H,480),DOTLINE,COLORRED;
STICKLINE(FILTER(CROSS(C,REF(XG,1)),10),C*0.99,C,8,0),COLORGREEN;
DRAWTEXT(FILTER(CROSS(C,REF(XG,1)),10),C*0.99,'上突'),COLORYELLOW;
T:=BARSCOUNT(C);
TP:= FILTER( C>=HHV(H,T) AND V>MA(V,0)*2 AND DYNAINFO(17)>1 AND TIME>39600,240) ;
DRAWTEXT(TP,L,'★突破'),COLORRED;
HHV(H,T),DOTLINE,COLOR00FFFF;
SUM(V*C,0)/SUM(V,0),COLORYELLOW;
上涨家数:=CONST(IF(PERIOD=0 ,"FSKY2.上涨家数#DAY",DRAWNULL)),NODRAW;
下跌家数:=CONST(IF(PERIOD=0 ,"FSKY2.下跌家数#DAY",DRAWNULL)),NODRAW;
一纯%:=CONST(IF(PERIOD=0 ,"FSKY2.一纯%#DAY",DRAWNULL)),NODRAW;
三纯%:=CONST(IF(PERIOD=0 ,"FSKY2.三纯%#DAY",DRAWNULL)),NODRAW;
五纯%:=CONST(IF(PERIOD=0 ,"FSKY2.五纯%#DAY",DRAWNULL)),NODRAW;
DRAWTEXT_FIX(1,0.200,1-0.08,0,STRCAT('上涨家数:',CON2STR(上涨家数,0))),COLOR0000FF;
DRAWTEXT_FIX(1,0.600,1-0.08,0,STRCAT('下跌家数:',CON2STR(下跌家数,0))),COLOR00FF00;
分时均价线:SUM(C*V,240)/SUM(V,240),COLORYELLOW,LINETHICK1;
K:=IF((分时均价线-DYNAINFO(3))/DYNAINFO(3)*100>0.5,0.5,0);
DRAWTEXT_FIX(五纯%>=0,0.6,1-0.9+K,0,STRCAT('五日纯量%: ',CON2STR(五纯%,2))),COLOR0000FF;
DRAWTEXT_FIX(五纯%<0,0.6,1-0.9+K,0,STRCAT('五日纯量%: ',CON2STR(五纯%,2))),COLORFFFF00;
DRAWTEXT_FIX(三纯%>=0,0.6,1-0.8+K,0,STRCAT('三日纯量%: ',CON2STR(三纯%,2))),COLOR0000FF;
DRAWTEXT_FIX(三纯%<0,0.6,1-0.8+K,0,STRCAT('三日纯量%: ',CON2STR(三纯%,2))),COLORFFFF00;
DRAWTEXT_FIX(一纯%>=0,0.6,1-0.7+K,0,STRCAT('当日纯量%: ',CON2STR(一纯%,2))),COLOR0000FF;
DRAWTEXT_FIX(一纯%<0,0.6,1-0.7+K,0,STRCAT('当日纯量%: ',CON2STR(一纯%,2))),COLORFFFF00;
358166069.png
358511863.jpg
357377242.rar
(9.63 KB, 下载次数: 0, 售价: 4 金钱)
|