通达信极限底主图指标公式

MA5:MA(C,5);
MA10:MA(C,10);
MA20:MA(C,20);
MA30:MA(C,30);
MA60:MA(C,60),COLORFF0000;
{MA120:MA(C,120),DOTLINE,COLORFF0080;}
TC1:=IF(H=HHV(H,48),H,DRAWNULL);
TC2:=CONST(BArslAST(TC1=H))+1;
UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1)));
BC1:=IF(L=LLV(L,48),L,DRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;
AB:=EMA(((2*C+H+L)/4-LLV(LOW,30))/
(HHV(HIGH,30)-LLV(LOW,30))*100,8);
BA1:=EMA(AB,5);
上轨:=REFDATE(REF(HHV(MAX(C,O),96),5),DATE);
下轨:=REFDATE(REF(LLV(MIN(C,O),96),5),DATE);
中轨:=((上轨)+(下轨))/2;
YXHX:=DATE>=REF(DATE,BARSLAST(IF(BC2>TC2,LP,HP)));
上沿:IF(AB>0 AND AB-BA1<=0 AND YXHX,上轨,上轨),POINTDOT,COLORWHITE;
中枢:IF(AB>0 AND AB-BA1<=0 AND YXHX,中轨,中轨),POINTDOT,COLORWHITE;
下沿:IF(AB>0 AND AB-BA1<=0 AND YXHX,下轨,下轨),POINTDOT,COLORWHITE;
极限底部:REFDATE(LLV(L,130),DATE)COLORYELLOW;
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORYELLOW;
总股本:=STRCAT(STRCAT('总股本: ',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘: ',CON2STR(CAPITAL/1000000,2)),'亿');
市值:=STRCAT(STRCAT(' 流通市值: ',CON2STR((CAPITAL/1000000)*C,2)),'亿');
每股公积金:=STRCAT(' 每股公积金:',CON2STR(FINANCE(18),2));
每股未分利润:=STRCAT(' 每股未分利润:',CON2STR(FINANCE(32),2));
每股净资产:=STRCAT(' 每股净资产:',CON2STR(FINANCE(34),2));
显示内容:=STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),市值),每股公积金),每股未分利润),每股净资产);
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,显示内容),COLORGRAY;
DRAWKLINE(HIGH,OPEN,LOW, CLOSE);