走停版日线主图+macdkdj（源码、主图、副图、通达信）无未来
{日线主图}：
MA1:=MA(CLOSE,M1);
MA2:MA(CLOSE,M2),COLOR40FF00;
MA3:MA(CLOSE,M3),COLORFF00FF,DOTLINE;
MA4:MA(CLOSE,M4),COLORFF8080,LINETHICK2;
MA250:=MA(C,250);
跌穿250:=CROSS(MA250,C);
{年线之下天数:BARSLAST(跌穿250),NODRAW;}
C2:=REF(C,1),NODRAW;
涨停:=REF(C,1)*1.1-C<0.01 AND H=C,NODRAW;
STICKLINE(涨停,OPEN,CLOSE,-1,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
跌停:=IF((C2-C)*100/C2>=(10-0.01*100/C2) AND L=C,1,0),NODRAW;
STICKLINE(跌停,OPEN,CLOSE,-1,0),COLORFF0000;
STICKLINE(跌停,H,L,0,0),COLORFF0000;
所属地域:DRAWTEXT_FIX(ISLASTBAR ,0.93,0,1,DYBLOCK),COLORWHITE;
所属行业:DRAWTEXT_FIX(ISLASTBAR ,0.89,0,1,HYBLOCK),COLORWHITE;
所属概念:DRAWTEXT_FIX(ISLASTBAR ,0.85,0,1,GNBLOCK),COLORWHITE;
SSTS:=STRCAT(CON2STR(FINANCE(42)/1,0),'天');
LTSZ:=STRCAT(CON2STR(FINANCE(40)/100000000,0),'亿');
YSTB:=STRCAT(CON2STR(FINANCE(44)/1,2),'%');
LRTB:=STRCAT(CON2STR(FINANCE(43)/1,2),'%');
DRAWTEXT_FIX(1,0.02,0,0,'上市：'),COLORWHITE;
DRAWTEXT_FIX(1,0.04,0,0,SSTS),COLORWHITE;
DRAWTEXT_FIX(1,0.08,0,0,'流通市值：'),COLORWHITE;
DRAWTEXT_FIX(1,0.12,0,0,LTSZ),COLORWHITE;
DRAWTEXT_FIX(1,0.16,0,0,'营收同比：'),COLORWHITE;
DRAWTEXT_FIX(1,0.20,0,0,YSTB),COLORWHITE;
DRAWTEXT_FIX(1,0.24,0,0,'利润同比：'),COLORWHITE;
DRAWTEXT_FIX(1,0.28,0,0,LRTB),COLORWHITE;
净资收益率:=(FINANCE(33)/FINANCE(34)*100);
主营利润率:=(FINANCE(23)/FINANCE(20)*100);
主营业增长率:=FINANCE(44);
每股净资产:=CONST(FINANCE(34));
每股收益:=CONST(FINANCE(38));
净利润增长率:=FINANCE(43);
市销率:=CONST(FINANCE(1)*DYNAINFO(7)/FINANCE(20));
现金负债比:=(FINANCE(25)/FINANCE(15));
每股未分配:=CONST(FINANCE(32));
每股公积金:=CONST(FINANCE(18));
SY01:=净资收益率>3;
SY02:=净资收益率>0.01 AND 净资收益率<=3;
SY03:=主营利润率>2;
SY04:=主营利润率>0;
SY05:=主营业增长率>1;
SY06:=主营业增长率>0;
SY07:=净利润增长率>2;
SY08:=净利润增长率>0.2;
SY09:=每股收益>0.01;
SY10:= 每股收益>0.001;
SY11:=每股净资产>2;
SY12:=每股净资产>0.01;
SY13:=每股未分配>0.5;
SY14:=每股未分配>0.001;
SY15:=每股公积金>0.5;
SY16:=每股公积金>0.002;
SY17:=每股未分配>=2 AND 每股公积金>=2;
SY18:=每股未分配<2 OR 每股公积金<2;
优秀:=SY01 AND SY03 AND SY05 AND SY07 AND SY09 AND SY11
AND SY13 AND SY15;
较好:=SY02 AND SY04 AND SY06 AND SY08 AND SY10 AND SY12
AND SY14 AND SY16;
一般:=NOT(优秀) AND NOT(较好);
DRAWTEXT_FIX(优秀 AND 较好=0,0.43,0,0,'综合评估基本面：优秀！'),COLORMAGENTA;
DRAWTEXT_FIX(较好,0.43,0,0,'综合评估基本面：较好！'),COLORRED;
DRAWTEXT_FIX(一般,0.43,0,0,'综合评估基本面：一般！'),COLORGREEN;
DRAWTEXT_FIX(SY17,0.55,0,0,'是否具备高送转潜力：是！'),COLORMAGENTA;
DRAWTEXT_FIX(SY18,0.55,0,0,'是否具备高送转潜力：否！'),COLORGREEN;
VAR11:=3*SMA((C-LLV(L,180))/(HHV(H,180)-LLV(L,180))*100,5,1)
-2*SMA(SMA((C-LLV(L,180))/(HHV(H,180)-LLV(L,180))*100,180,1),15,1);
超级主升:=EMA(VAR11,5);
XG1:=CROSS(超级主升,100);
DRAWICON(XG1,0.98*LOW,1);
FL:=MA(CLOSE,17)+ABS(MA(CLOSE,17)-REF(MA(CLOSE,17),1));
FS:=MA(CLOSE,17)+MA(CLOSE,17)-REF(MA(CLOSE,17),1);
BB:=IF(MA(CLOSE,17)<FS,FS,MA(CLOSE,17));
NX:=EMA(C,250);
A:=BB-(EMA(C,3)-BB);
DIFF:=EMA((NX-(EMA(C,3)-NX)),5);
CC:=IF(BB=FS,BB,BB);
止损线:=EMA(COST(81),10);
牛熊线:=EMA(COST(27),120);
XG2:=CROSS(CC,DIFF);
DRAWICON(XG2,0.99*LOW,38);
{macdkdj}:
周DI:(EMA(CLOSE,60)-EMA(CLOSE,130)),NODRAW;
周DE:EMA(周DI,25),NODRAW;
周DIF:=20*周DI;
周DEA:=20*周DE;
DRAWBAND(周DIF,RGB(139,0,139),周DEA,RGB(0,100,50));
XG2:=CROSS(周DEA,0);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:(DIF-DEA)*40,COLORSTICK;
DIFF:20*DIF,COLORWHITE;
DEAA:20*DEA,COLORYELLOW;
DRAWICON(XG2,2*DEAA,42);DRAWTEXT(XG2,2*DIFF,'周');
MACD250:=REF(MACD,BARSLAST(MACD=HHV(MACD,250))),COLORA00000,DOTLINE;
XG:=NOT(REF(MACD250,1)=MACD250);
STICKLINE(XG,0,MACD,1,0),COLORYELLOW;
周MACD:(周DIF-周DEA)*2,COLORSTICK,NODRAW;
MA250:=MA(C,250);
DRAWICON(周DIF>=0 AND CROSS(DIF,DEA) AND C>=MA250,2,11);
{跌穿250:=CROSS(MA250,C);
年线之下天数:BARSLAST(跌穿250),NODRAW;}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1)COLORYELLOW;
D:=SMA(K,3,1),COLORBLUE;
J:=3*K-2*D,COLORWHITE;
月N:=DAY;
月HIGH:=IF(DAY=月N,HHV(H,30),0);
月LOW:=IF(DAY=月N,LLV(L,30),0);
月CLOSE:=IF(DAY=月N,CLOSE,0);
月RSV:=(月CLOSE-LLV(月LOW,72))/(HHV(月HIGH,72)-LLV(月LOW,72))*100;
月K:=SMA(月RSV,3,1),COLORWHITE ;
月D:=SMA(月K,3,1),COLORYELLOW ;
月J:=3*月K-2*月D ;
{DRAWBAND(月K,RGB(255,0,0),月D,RGB(0,0,250));}
周N:=WEEKDAY;
周HIGH:=IF(WEEKDAY=周N,HHV(H,4),0);
周LOW:=IF(WEEKDAY=周N,LLV(L,4),0);
周CLOSE:=IF(WEEKDAY=周N,CLOSE,0);
周RSV:=(周CLOSE-LLV(周LOW,45))/(HHV(周HIGH,45)-LLV(周LOW,45))*100;
周K:=SMA(周RSV,3,1),COLORWHITE ;
周D:=SMA(周K,3,1),COLORYELLOW ;
周J:=3*周K-2*周D,COLORFFFFFF ;
{DRAWBAND(周K,RGB(255,255,0),周D,RGB(0,100,200));}
D1:=1;
{15,POINTDOT,COLOR00FF00;}
B:=C-MA250;
DRAWICON((B>=0 AND CROSS(J,K) AND 月D>=50 AND 周D>=20 AND DIFF>=0),0,1);
