我把常用的一个主图与大家分享一下。
内容包括:(1)个股基本信息
(2)涨跌停变色显示
(3)个股当日成交量、换手率
图1
图2通达信指标公式(正常直接复制到公式编辑器就可了,公式名称自己随意取,没有参数设置)
EMA5:EMA(C,5),COLORWHITE;
EMA13:EMA(C,13),COLORYELLOW;
EMA34:EMA(C,34),COLORF00FF0;
EMA55:EMA(C,55),COLORGREEN;
AA05:=EMA5;
角度1:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
AA051:=EMA13;
角度2:=ATAN((AA051/REF(AA051,1)-1)*100)*180/3.1416;
AA052:=EMA34;
角度3:=ATAN((AA052/REF(AA052,1)-1)*100)*180/3.1416;
IF(角度1>60,EMA5,DRAWNULL),COLORRED,LINETHICK1;
IF(角度2>45,EMA13,DRAWNULL),COLORRED,LINETHICK1;
IF(角度3>30,EMA34,DRAWNULL),COLORRED,LINETHICK1;
BK:=IF(INBLOCK('科创板'),0.2,IF(INBLOCK('创业板'),0.2,IF(INBLOCK('ST板块'),0.05,0.1)));
YA_1:=IF(DATE<=1200823,1,0);
旧涨停:=(C>=ZTPRICE(REF(CLOSE,1),0.1) AND C=H) AND YA_1=1;
旧跌停:=(C<=DTPRICE(REF(CLOSE,1),0.1) AND C=L) AND YA_1=1;
涨停:=C>=ZTPRICE(REF(C,1),BK) AND C=H;
跌停:=C<=DTPRICE(REF(C,1),BK) AND C=L;
曾涨停:=(H>=ZTPRICE(REF(C,1),BK) AND C<H) OR (H>=ZTPRICE(REF(CLOSE,1),0.1) AND C<H AND YA_1=1);
曾跌停:=(L<=DTPRICE(REF(C,1),BK) AND C>L) OR (L<=DTPRICE(REF(CLOSE,1),0.1) AND C>L AND YA_1=1);
STICKLINE(旧涨停 AND PERIOD=5,O,C,2,0),COLORYELLOW;
STICKLINE(旧跌停 AND PERIOD=5,O,C,2,0),COLORGREEN;
STICKLINE(涨停 AND PERIOD=5,C,O,2,0),COLORYELLOW;
STICKLINE(跌停 AND PERIOD=5,C,O,2,0),COLORGREEN;
S1:="DMI.PDI";
S2:=S1>EMA(EMA(EMA(S1,2),2),2);
S3:= C/REF(C,1)>1.05;
DRAWTEXT(BETWEEN(DMI.PDI,37,45) AND S3 AND S2,L*0.98,'↖亮剑'),COLORYELLOW;
DRAWTEXT(BETWEEN(DMI.PDI,45,50)AND S3 AND S2,L*0.98,'↖小牛'),COLORYELLOW;
DRAWTEXT(BETWEEN(DMI.PDI,50,53)AND S3 AND S2,L*0.98,'↖大牛'),COLORYELLOW;
DRAWTEXT(DMI.PDI>53 AND S3 AND S2, L*0.98,'↖疯牛'),COLORYELLOW;
DRAWTEXT(REF(DMI.ADX,1)>50 AND CROSS(REF(DMI.ADX,1),DMI.ADX),H*1.01,'↙变盘'),COLORMAGENTA;
DRAWTEXT(REF(DMI.PDI,1)>53 AND CROSS(REF(DMI.PDI,1),DMI.PDI),H*0.98,'←↓大顶↓'),COLORGREEN;
DRAWTEXT(FILTER(BARSLASTCOUNT(REF(MA(C,5),1)/REF(MA(C,5),2)>=1.01)>=5 AND (IF(FROMOPEN<240 AND ISLASTBAR,DYNAINFO(7),C)/REF(C,1)<=0.96 OR BARSLASTCOUNT(H<HHV(H,4))>=3 OR IF(FROMOPEN<240 AND ISLASTBAR,DYNAINFO(7),C)<EMA(C,5)),3),H*1.00,'↓跑↓'),COLORGREEN;
所属板块:=STRCAT('所属板块: ',STRCAT(STRCAT(STRCAT('[行业]-',HYBLOCK),STRCAT(' [地域]-',DYBLOCK)),STRCAT(' [概念]-',GNBLOCK)));
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿股');
流通盘:=STRCAT(STRCAT('流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿股');
每股收益:=STRCAT(STRCAT('每股收益: ',CON2STR(FINANCE(29)/FINANCE(1)/FINANCE(37)*4,2)),'元');
每股未分配:=STRCAT(STRCAT('每股未分配: ',CON2STR(FINANCE(32),2)),'元');
每股公积金:=STRCAT(STRCAT('每股公积金: ',CON2STR(FINANCE(18),2)),'元');
总市值:=STRCAT(STRCAT('总市值: ',CON2STR(FINANCE(1)*C/100000000,2)),'亿元');
市值:=STRCAT(STRCAT('流通值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿元');
A1:=FINANCE(42);
A2:=DATETODAY(CONST(DATE));
A3:=A2-A1;
XDATE:=DAYTODATE(A3)+19000000,NODRAW;
年 := ROUND(XDATE/10000);
月 := ROUND((XDATE - 年*10000)/100);
日 := XDATE - 年*10000 - 月*100;
年月日:=STRCAT(STRCAT(STRCAT(STRCAT(CON2STR(年,0),'-'),CON2STR(月,0)),'-'),CON2STR(日,0));
上市日期:=STRCAT(' 上市日期: ',年月日);
收同增:=STRCAT(STRCAT('收同增: ',CON2STR(FINANCE(44),2)),'%');
PE:=STRCAT('PE(动): ',CON2STR(DYNAINFO(39),2));
毛利率:=STRCAT(STRCAT('毛利率: ',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2)),'%');
主营净利润率:=STRCAT(STRCAT('主营净利润率: ',CON2STR(FINANCE(30)/FINANCE(20)*100,2)),'%');
营收:=STRCAT('营收: ',STRCAT(CON2STR(FINANCE(20)/FINANCE(37)*4/100000000,2),'亿'));
净利润:=STRCAT('净利润: ',STRCAT(CON2STR(FINANCE(29)/FINANCE(37)*4/100000000,2),'亿'));
利同增:=STRCAT(STRCAT('利同增: ',CON2STR(FINANCE(43),2)),'%');
PS:=STRCAT('PS: ',CON2STR(C*FINANCE(1)/(FINANCE(20)/FINANCE(37)*4),2));
PB:=STRCAT('PB: ',CON2STR(C/FINANCE(34),2));
ROE:=STRCAT(STRCAT('ROE: ',CON2STR(FINANCE(33)/FINANCE(34)*100,2)),'%');
APE:=STRCAT('PE(年): ',CON2STR(DYNAINFO(39)/(1+FINANCE(43)/100),2));
DRAWTEXT_FIX(ISLASTBAR,0.000,0,0,上市日期),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.025,0,所属板块),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.05,0,总股本),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.05,0,毛利率),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.327,0.05,0,每股收益),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.075,0,流通盘),COLORCYAN;
收同增正:=IF(FINANCE(44) > 0 , 收同增, '');
收同增平:=IF(FINANCE(44) = 0 , 收同增, '');
收同增负:=IF(FINANCE(44) < 0 , 收同增, '');
DRAWTEXT_FIX(ISLASTBAR,0.177,0.075,0,收同增正),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.075,0,收同增平),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.075,0,收同增负),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.327,0.10,0,每股未分配),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.10,0,总市值),COLORCYAN;
利同增正:=IF(FINANCE(43) > 0 , 利同增, '');
利同增平:=IF(FINANCE(43) = 0 , 利同增, '');
利同增负:=IF(FINANCE(43) < 0 , 利同增, '');
利同增倍:=IF(FINANCE(43) >2*FINANCE(44) , 利同增, '');
DRAWTEXT_FIX(ISLASTBAR,0.177,0.10,0,利同增正),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.10,0,利同增平),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.10,0,利同增负),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.10,0,利同增倍),COLORMAGENTA;
营收大:=IF(FINANCE(20)/FINANCE(37)*4/100000000 >=5 , 营收, '');
营收小:=IF(FINANCE(20)/FINANCE(37)*4/100000000 < 5 , 营收, '');
DRAWTEXT_FIX(ISLASTBAR,0.177,0.125,0,营收大),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.125,0,营收小),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.327,0.075,0,每股公积金),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0.327,0.125,0,净利润),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.125,0,市值),COLORCYAN;
PS大:=IF(C*FINANCE(1)/(FINANCE(20)/FINANCE(37)*4) >=15 , PS, '');
PS小:=IF(C*FINANCE(1)/(FINANCE(20)/FINANCE(37)*4) < 15 , PS, '');
DRAWTEXT_FIX(ISLASTBAR,0.177,0.15,0,PS大),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.15,0,PS小),COLORRED;
ROE大:=IF(FINANCE(33)/FINANCE(34)*100 >=10 , ROE, '');
ROE小:=IF(FINANCE(33)/FINANCE(34)*100 < 10 , ROE, '');
DRAWTEXT_FIX(ISLASTBAR,0.327,0.15,0,ROE大),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.327,0.15,0,ROE小),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.15,0,PE),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.177,0.175,0,PB),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.002,0.175,0,APE),COLORYELLOW;
HSL:=100*VOL/(FINANCE(7)/100);
换手:=STRCAT(STRCAT('换手: ',CON2STR(HSL,2)),'%');
DRAWTEXT_FIX(ISLASTBAR,0.85,0.95,0,换手),COLORMAGENTA;
CJ:=DYNAINFO(10)/100000000;
成交:=STRCAT(STRCAT('成交: ',CON2STR(CJ,2)),'亿');
DRAWTEXT_FIX(ISLASTBAR,0.85,1,0,成交),COLORMAGENTA;