以下是通达信启动进场公式主图源码(无源码的请下载附件导入)
启动进场
EMA3:EMA(C,3),COLORWHITE,LINETHICK2;
EMA13:EMA(C,13),COLORYELLOW;
EMA21:EMA(C,21),COLORFF00FF;
EMA55:EMA(C,55),COLORGREEN;
AR1:=EMA21>EMA13 AND EMA13>EMA3;
AR2:=BARSLAST((C-EMA3)/EMA3*100<-6);
AR3:=EMA3>=REF(EMA3,2);
AR4:=COUNT(CROSS(C,EMA3),AR2)=1;
AR5:=AR1 AND AR2 AND AR3 AND AR4;
AR6:=AR5 AND FILTER(AR5,10);
DRAWTEXT(AR6,L-0.09,'启动'),COLORYELLOW;
{STICKLINE(AR6,H,L,0.5,1),COLORYELLOW;}
{STICKLINE(AR6,O,C,6,1),LINETHICK2,COLORYELLOW;}
BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;
BR2:=ABS((EMA3-EMA13)+(EMA13-EMA21))/C<0.2;
BR3:=C>EMA21 AND (REF(C,1)<REF(EMA21,1) OR REF(C,2)<REF(EMA21,2) OR REF(C,3)<REF(EMA21,3) OR REF(C,4)<REF(EMA21,4) OR REF
(C,5)<REF(EMA21,5));
BR4:=BR1 AND BR2 AND BR3;
DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'转强'),COLOR00C5FF;
HR2:=EMA3>=REF(EMA3,3) AND EMA13>=REF(EMA13,1) AND EMA21>=REF(EMA21,1) AND CROSS(C,EMA3) AND CROSS(C,EMA13) AND CROSS
(C,EMA21){ AND CROSS(C,EMA55)};
DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.09,'进场! '),COLORFFC8FF;
{=======================================================}
所属地域:DRAWTEXT_FIX(1,0.005,0.05,0,DYBLOCK),COLORWHITE;
所属行业:DRAWTEXT_FIX(1,0.005,0.1,0,HYBLOCK),COLORWHITE;
所属概念:DRAWTEXT_FIX(1,0.005,0.15,0,GNBLOCK),COLORWHITE;
SSTS:=STRCAT(STRCAT('上市:',CON2STR(FINANCE(42)/1,0)),'天');
LTSZ:=STRCAT(STRCAT('流通市值:',CON2STR(FINANCE(40)/100000000,0)),'亿');
YSTB:=STRCAT(STRCAT('营收同比:',CON2STR(FINANCE(44)/1,2)),'%');
LRTB:=STRCAT(STRCAT('利润同比:',CON2STR(FINANCE(43)/1,2)),'%');
DRAWTEXT_FIX(1,0.005,0,0,SSTS),COLORWHITE;
DRAWTEXT_FIX(1,0.085,0,0,LTSZ),COLORWHITE;
DRAWTEXT_FIX(1,0.185,0,0,YSTB),COLORWHITE;
DRAWTEXT_FIX(1,0.285,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.45,0,0,'综合评估基本面:优秀!'),COLORMAGENTA;
DRAWTEXT_FIX(较好,0.45,0,0,'综合评估基本面:较好!'),COLORRED;
DRAWTEXT_FIX(一般,0.45,0,0,'综合评估基本面:一般!'),COLORGREEN;
DRAWTEXT_FIX(SY17,0.65,0,0,'是否具备高送转潜力:是!'),COLORMAGENTA;
DRAWTEXT_FIX(SY18,0.65,0,0,'是否具备高送转潜力:否!'),COLORGREEN;
818111303.jpg
818188021.png
818266579.png
|