通达信 Tdx 公式，显示年份刻度、行业、市值、主营等

{年份刻度显示}

ISYEAR:=YEAR-REF(YEAR,1)>0;
S:=H-L;
{PZ:=MIN6(L,MA250,MA120,MA60,MA20,MIN(MA10,MA5))-MA(S,5);}
PZ:=L*0.9;
STICKLINE(ISYEAR,0,PZ,0,-1),COLORC0C0C0;
{STICKLINE(ISYEAR,H+S,HHH+S,0,0),COLOR828282;}

HW:=IF(MONTH>=7,HHV(H,200),0);

DRAWTEXT(ISYEAR,PZ,VARCAT('& ',VAR2STR(YEAR,0))),COLORC0C0C0;
{年份刻度显示};

{显示名称行业市值}

{板块}
DRAWTEXT_FIX(ISLASTBAR,0.52,0,0,ZDBLOCK);{显示所属自定义板块信息}
DRAWTEXT_FIX(ISLASTBAR,0.52,1,0,ZDBLOCK);{显示所属自定义板块信息}

DRAWTEXT_FIX(ISLASTBAR,0 ,0,0,ZSBLOCK);{指数板块信息}
DRAWTEXT_FIX(ISLASTBAR,0.85,0.017,1,GNBLOCK);{概念板块信息}

{流通市值}
LTSZV:=FINANCE(40)/100000000;
LTSZ1:=CON2STR(LTSZV,0);
LTSZSTR:=STRCAT('市值',STRCAT(LTSZ1,'亿'));

{Z市值}
ZSZV:=FINANCE(46)/100000000;
ZSZ1:=CON2STR(ZSZV,0);
ZSZSTR:=STRCAT('Z市值',STRCAT(ZSZ1,'亿'));
SZSTR:=STRCAT6(LTSZSTR,' ',ZSZSTR,'','','');

{主营,市值}
S1:=STRCAT6('      [' ,MAINBUSINESS,' ',LEVE